Hoe automatisch datum en tijd toevoegen om te reageren in Excel?
Wanneer u een opmerking in een cel invoegt, wordt standaard automatisch een gebruikersnaam ingevoegd. Heb je je ooit afgevraagd of de huidige datum en tijd ook automatisch aan de opmerking kunnen worden toegevoegd? Dit zal u helpen om snel het tijdstip te identificeren waarop u de opmerkingen heeft gemaakt. In dit artikel zal ik enkele trucs voor u introduceren om dit probleem in Excel op te lossen.
Voeg handmatig datum en tijd toe om commentaar te geven met sneltoetsen
Voeg automatisch datum en tijd toe om te reageren met VBA-code
Voeg handmatig datum en tijd toe om commentaar te geven met sneltoetsen
Zonder de gegevens en tijd in het opmerkingenveld te typen, kunt u deze sneltoetsen gebruiken om de gegevens en tijd snel en gemakkelijk in te voeren. Ga als volgt te werk:
1. Klik op een cel waarin u een opmerking wilt invoegen met de huidige gegevens en tijd, en klik met de rechtermuisknop om te kiezen Opmerking invoegen vorm het contextmenu, zie screenshot:
2. Druk na het invoegen van de opmerking in het opmerkingenvenster op CTRL+; om de huidige datum in te voegen, typ een spatiebalk en druk vervolgens op Ctrl + Shift +; om de huidige tijd in te voegen, en de huidige gegevens en tijd zijn in 茅茅n keer aan de opmerking toegevoegd, zie screenshot:
3. En dan kunt u uw opmerking naar behoefte bewerken.
Voeg automatisch datum en tijd toe om te reageren met VBA-code
Als u niet bekend bent met de sneltoetsen, hoeft u zich geen zorgen te maken, hier kan ik het hebben over een VBA-code om u te helpen de datum en tijd automatisch in te voeren.
1. Selecteer de cel waarin u de opmerking wilt invoegen.
2. Houd de ALT + F11 toetsen om de te openen Microsoft Visual Basic for Applications-venster.
3. Klikken Invoegen > Moduleen plak de volgende code in het Module Venster.
VBA-code: voeg automatisch datum en tijd toe om commentaar te geven
Sub DatedComment()
'Update 20141110
Dim pComment As Comment
Dim WorkRng As Range
Set WorkRng = Application.ActiveCell
Set pComment = WorkRng.AddComment(Application.UserName & ":" & vbLf & Now & vbLf)
pComment.Shape.TextFrame.Characters(1, VBA.Len(Application.UserName) + 1).Font.Bold = True
End Sub
4. Druk vervolgens op F5 toets om deze code uit te voeren, en een opmerking wordt automatisch in de geselecteerde cel ingevoegd met de datum en tijd, en u kunt de opmerking naar behoefte bewerken, zie screenshot:
Tip: Deze VBA kan niet werken als de geselecteerde cel al eerder een opmerking is ingevoegd.
Gerelateerde artikelen:
Hoe alle commentaarposities in Excel te resetten?
Hoe markeer ik alle cellen met opmerkingen in Excel?
Beste Office-productiviteitstools
Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar effici毛ntie als nooit tevoren. Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en tijd te besparen. Klik hier om de functie te krijgen die u het meest nodig heeft...
Office-tabblad Brengt een interface met tabbladen naar Office en maakt uw werk veel gemakkelijker
- Schakel bewerken en lezen met tabbladen in Word, Excel, PowerPoint in, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster in plaats van in nieuwe vensters.
- Verhoogt uw productiviteit met 50% en vermindert honderden muisklikken voor u elke dag!