Vai al contenuto principale
 

Come inserire il timbro della data in una cella se è stata selezionata una casella di controllo in Excel?

Autore: Silvia Ultima modifica: 2020-07-22

Normalmente, inserisci un timbro della data utilizzando i tasti di scelta rapida in Excel. Che ne dici di inserire il timbro della data in una cella tramite una casella di controllo in Excel? Quando si spunta la casella di controllo, il timestamp viene inserito automaticamente in una cella specificata. Questo articolo ti aiuterà a risolverlo.

Inserisci il timbro della data in una cella se è selezionata una casella di controllo con il codice VBA


Inserisci il timbro della data in una cella se è selezionata una casella di controllo con il codice VBA

Questa sezione introdurrà uno script VBA per aiutarti a inserire automaticamente un timbro data in una cella se è selezionata una casella di controllo in Excel. Si prega di fare quanto segue.

1. Dopo aver inserito una casella di controllo, premere altro + F11 tasti contemporaneamente per aprire il file Microsoft Visual Basic, Applications Edition finestra.

2. Nel Microsoft Visual Basic, Applications Edition finestra, fare clic inserire > Moduli. Quindi copia e incolla il codice VBA sottostante nella finestra del modulo.

Codice VBA: inserisci il timbro della data in una cella se è selezionata una casella di controllo

Sub CheckBox_Date_Stamp()
Dim xChk As CheckBox
Set xChk = ActiveSheet.CheckBoxes(Application.Caller)
With xChk.TopLeftCell.Offset(, 1)
    If xChk.Value = xlOff Then
        .Value = ""
    Else
       .Value = Date
    End If
End With
End Sub

3. Stampa altro + Q i tasti per chiudere il file Microsoft Visual Basic, Applications Edition finestra.

4. Fare clic con il pulsante destro del mouse sulla casella di controllo e selezionare Assegna Micro dal menu di scelta rapida. Vedi screenshot:

5. Nel Assegna macro finestra di dialogo, selezionare CheckBox_Date_Stamp nel Nome della macro casella, quindi fare clic su OK pulsante. Vedi screenshot:

Quando si spunta la casella di controllo, il timbro della data verrà inserito automaticamente nella cella adiacente.


Articoli correlati:

I migliori strumenti per la produttività in ufficio

🤖 Assistente AI di Kutools: Rivoluziona l'analisi dei dati basandosi su: Esecuzione intelligente   |  Genera codice  |  Crea formule personalizzate  |  Analizzare i dati e generare grafici  |  Richiama le funzioni di Kutools...
Funzioni popolari: Trova, evidenzia o identifica i duplicati   |  Elimina righe vuote   |  Combina colonne o celle senza perdere dati   |   Round senza formula ...
Super ricerca: VLookup a criteri multipli    VLookup a valori multipli  |   VLookup su più fogli   |   Ricerca fuzzy ....
Elenco a discesa avanzato: Crea rapidamente un elenco a discesa   |  Elenco a discesa dipendente   |  Elenco a discesa a selezione multipla ....
Gestore di colonna: Aggiungi un numero specifico di colonne  |  Sposta colonne  |  Attiva/disattiva lo stato di visibilità delle colonne nascoste  |  Confronta intervalli e colonne ...
Funzionalità in primo piano: Messa a fuoco della griglia   |  Vista di progettazione   |   Grande barra delle formule    Gestore di cartelle di lavoro e fogli   |  Resource Library (Testo automatico)   |  Date picker   |  Combina fogli di lavoro   |  Crittografa/decrittografa le celle    Invia e-mail per elenco   |  Super filtro   |   Filtro speciale (filtro grassetto/corsivo/barrato...) ...
I 15 migliori set di strumenti12 Testo Strumenti (aggiungi testo, Rimuovi personaggi, ...)   |   50+ Grafico Tipi (Diagramma di Gantt, ...)   |   40+ Pratico Formule (Calcola l'età in base al compleanno, ...)   |   19 Inserimento Strumenti (Inserisci il codice QR, Inserisci immagine dal percorso, ...)   |   12 Conversione Strumenti (Numeri in parole, Conversione di valuta, ...)   |   7 Unisci e dividi Strumenti (Combina righe avanzate, Celle divise, ...)   |   ... e altro ancora

Potenzia le tue competenze di Excel con Kutools per Excel e sperimenta l'efficienza come mai prima d'ora. Kutools per Excel offre oltre 300 funzionalità avanzate per aumentare la produttività e risparmiare tempo.  Fai clic qui per ottenere la funzionalità di cui hai più bisogno...


Office Tab porta l'interfaccia a schede in Office e semplifica notevolmente il tuo lavoro

  • 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 della stessa finestra, piuttosto che in nuove finestre.
  • Aumenta la produttività del 50% e riduce ogni giorno centinaia di clic del mouse!