Avatar billede wind25 Nybegynder
29. januar 2014 - 09:28 Der er 7 kommentarer

Auto dato når der skrives i celle

Hej Eksperter

Jeg er interesseret i at høre om der findes en funktion til automatisk at skrive dato. Det skal foregå således:

A1(dato) B1(tekst)

Når der skrives i B1, kommer der automatisk dato(dagsdato) i A1.

A1 må ikke ændres, skulle der laves ændringer i B1 på et senere tidspunkt.

Findes der en smart funktion til det?
Avatar billede supertekst Ekspert
29. januar 2014 - 10:24 #1
En makro kan gøre dette.
Skal der anvendes beskyttelse af celler?
Avatar billede wind25 Nybegynder
29. januar 2014 - 10:41 #2
Igen kommer du til undsætning supertekst :)

Bruger flg. kode

Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Range("B:B")) Is Nothing Then Exit Sub
If Target.Count > 1 Then Exit Sub
Target.Offset(0, -1) = Now
End Sub


hvilket ser ud til at gøre det. Kan du bekræfte dette?

Og hvordan giver jeg point, skylder vidst nogle til dig :)
Avatar billede wind25 Nybegynder
29. januar 2014 - 10:51 #3
jeg ønsker selvfølgelig at datoen er statisk, så den ikke ændres hvergang jeg åbner filen
Avatar billede supertekst Ekspert
29. januar 2014 - 11:01 #4
Jeg ser lige på koden..

Jeg kan lægge svar på dit spørgsmål vedr. "det langesomme regneark". Dette skal du så blot acceptere.
Avatar billede store-morten Ekspert
29. januar 2014 - 11:23 #5
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Range("B:B")) Is Nothing Then Exit Sub
If Target.Count > 1 Then Exit Sub
If Target.Offset(0, -1) = "" Then Target.Offset(0, -1) = Now
End Sub
Avatar billede wind25 Nybegynder
29. januar 2014 - 11:29 #6
store-morten

ved at tilføje "" Then Target.Offset(0, -1)

gør det så datoen statisk?
Avatar billede store-morten Ekspert
29. januar 2014 - 11:44 #7
If Target.Offset(0, -1) = ""

Gør at datoen kun skrives hvis celle er tom.
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Vi har et stort udvalg af Excel kurser. Find lige det kursus der passer dig lige her.

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester