Hej!
Jag sitter och håller på med en liten excel-fil som jag har fyra kollumner i: referensnr (tal), Kommentar, Datum samt vecka.
När jag har fyllt i referensnummer och kommentaren och trycker enter vill jag att datum-kollumnen skall fyllas i efter följande syntax: ÅÅÅP-MM-DD - HH:MM ex: 2002-09-26 08:41
Jag vill även att veckonummer skall fyllas i beräknat på datumet.
Skulle även vilja ha ett makro som automatiskt fixar detta när jag trycker CTRL+t
Tacksam för hjälp
/Erik
Excel-fråga...
2 svar · 281 visningar · startad av ChrOmeE
Sub DatumTidVeckonr()
'
' Infogar datum och tid i aktiv cell
' samt veckonummer i första cellen till
' höger om aktiv cell
'
ActiveCell.FormulaR1C1 = "=NOW()"
Selection.Copy
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
Application.CutCopyMode = False
ActiveCell.Offset(0, 1).Select
ActiveCell.FormulaR1C1 = "=VECKONR(RC[-1],2)"
End Sub
OBS! Jag är som framgår av koden ingen riktig programmerare, men detta tycks ändå fungera på det sätt som står angivet längst upp i kodsnutten.
Lycka till!
Duget gott ;)