29. november 2007 - 13:19Der er
7 kommentarer og 1 løsning
Automatisk aktuel dato ved indtasting i celle
Jeg har en kolonne hvor hver række (1,2,3,osv.) skal udfyldes automatisk med den aktuelle dato, hver gang jeg indtaster et nummer i cellen i kolonnen ved siden af:
A B 1 29-11-07 20 2 01-12-07 130 3 12-05-08 457 4
A4 forbliver blank, indtil jeg indtaster et tal i B4
Private Sub Worksheet_Change(ByVal Target As Range) If Intersect(Target, Range("B1:B100")) Is Nothing Then Exit Sub If Target.Value <> "" Then Target.Offset(0, -1) = Date End Sub
Arkets kodemodul finder du ved at højreklikke på arkfanen og vælg "Vis programkode"
Har lige et spørgsmål Hvis du i dag indtaster et tal i celle B9, så får du 29-11-2007 i A9 men i morgen vil der stå 30-11-2007 i celle A9 med formelløsning. Er det den løsning du søger ?
Ja lige præcis. Har testet ved at ændre datoen på computeren, og det virker.
Synes godt om
Ny brugerNybegynder
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.