Come si fa ad aggiungere automaticamente data e ora a un commento in Excel?
Quando si inserisce un commento in una cella, per impostazione predefinita viene inserito automaticamente un Nome utente. Vi siete mai chiesti se anche il Data e ora correnti possa essere aggiunto automaticamente al commento? Ciò vi aiuterà a identificare rapidamente il momento in cui avete creato i commenti. In questo articolo presenterò alcuni trucchi per risolvere questo problema in Excel.
Aggiungere manualmente data e ora al commento con scorciatoie da tastiera
Aggiungere automaticamente data e ora al commento con codice VBA
Aggiungere manualmente data e ora al commento con scorciatoie da tastiera
Senza dover digitare manualmente data e ora nella casella del commento, potete inserirle in modo rapido e semplice grazie a queste comode scorciatoie da tastiera. Procedete come segue:
1. Fate clic su una cella in cui desiderate inserire un commento con la data e l’ora correnti, quindi fate clic con il tasto destro del mouse e scegliete Inserisci commento dal menu contestuale, come mostrato nello screenshot:
2. Dopo aver inserito il commento, nella casella del commento premete Ctrl + ; per inserire la data corrente, digitate uno spazio e poi premete Ctrl + Maiusc + ; per aggiungere l’ora corrente: in questo modo data e ora verranno inserite contemporaneamente nel commento, come mostrato nello screenshot:
3. A questo punto potete personalizzare il commento in base alle vostre esigenze.
Aggiungere automaticamente data e ora al commento con codice VBA
Se non siete familiari con le scorciatoie da tastiera, non preoccupatevi: vi mostrerò un codice VBA che inserisce automaticamente data e ora al vostro posto.
1. Selezionate la cella in cui volete inserire il commento.
2. Tenete premuti i tasti ALT + F11 per aprire la finestra Microsoft Visual Basic, Applications.
3. Fate clic su Inserisci > Modulo, quindi incollate il seguente codice nella finestra del modulo.
Codice VBA: Aggiungi automaticamente data e ora al commento
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. Premete quindi il tasto F5 per eseguire il codice: verrà inserito un commento nella cella selezionata con data e ora automatiche, che potrete modificare a vostro piacimento, come mostrato nello screenshot:
Suggerimento: Questo codice VBA non funziona se nella cella selezionata è già presente un commento.
Articoli correlati:
Come ripristinare tutte le posizioni dei commenti in Excel?
Come evidenziare tutti i commenti in Excel?
Migliori Strumenti per la Produttività in Office
Potenzia le tue competenze in Excel con Kutools per Excel e sperimenta un’efficienza mai vista prima.Kutools per Excel offre oltre 300 funzionalità avanzate per aumentare la produttività e Risparmia tempo.Clicca qui per ottenere la funzionalità di cui hai più bisogno...
Office Tab Porta l'interfaccia a schede in Office e rende il tuo lavoro molto più semplice
- Abilita la modifica e la lettura a schede in Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Apri e crea più documenti in nuove schede all’interno della stessa finestra, invece che in finestre separate.
- Aumenta la tua produttività del 50 % e risparmia centinaia di clic del mouse ogni giorno!
Tutti i componenti aggiuntivi di Kutools in un unico programma di installazione.
Kutools for Office è la suite che include componenti aggiuntivi per Excel, Word, Outlook e PowerPoint, oltre a Office Tab Pro: la soluzione ideale per i team che lavorano su diverse app di Office.
- Suite completa— componenti aggiuntivi per Excel, Word, Outlook e PowerPoint + Office Tab Pro
- Un unico programma di installazione, una sola licenza— configurazione in pochi minuti (pronto per MSI)
- Funziona meglio insieme— produttività ottimizzata tra le app di Office
- Prova gratuita di 30 giorni con tutte le funzionalità— nessuna registrazione, nessuna carta di credito
- Miglior rapporto qualità-prezzo— risparmia rispetto all’acquisto dei singoli componenti aggiuntivi