HSV
Inventaris
- Lid geworden
- 18 jul 2008
- Berichten
- 20.317
- Office versie
- Office 365
Zet met F9 een onderbrekingspunt op "Sub TimeStamp().
Sluit de VB-editor en druk op de knop en loop met F8 door de code.
Wat doet de code?
Edit.
Als het helemaal niet gaat:
Andere methode:
Sluit de VB-editor en druk op de knop en loop met F8 door de code.
Wat doet de code?
Edit.
Als het helemaal niet gaat:
Andere methode:
Code:
Sub TimeStamp()
Cells(2, 4).Offset(Day(Now), 3 + (Cells(2, 4).Offset(Day(Now), 1) = "") * 2) = Time
End Sub
Laatst bewerkt: