You are here:Home-Domande su Excel VBA e MACRO-[RISOLTO] Inserimento separatore durante la digitazione della data-Rispondi a: [RISOLTO] Inserimento separatore durante la digitazione della data
Rispondi a: [RISOLTO] Inserimento separatore durante la digitazione della data2020-05-22T19:05:26+02:00

Home Forum Domande su Excel VBA e MACRO [RISOLTO] Inserimento separatore durante la digitazione della data Rispondi a: [RISOLTO] Inserimento separatore durante la digitazione della data

BySalvBySalv
Amministratore del forum
    Post totali: 804

    Ciao MisterExcel ecco una soluzione:

    Private Sub TextBox1_Change()
    
    Select Case Len(TextBox1)
        Case 2: TextBox1 = TextBox1 & "/"
        Case 5: TextBox1 = TextBox1 & "/"
    End Select
    End Sub

    anche se non è funzionale, in quanto non fa un controllo della data, nel senso che se tu vorrest scrivere

    1/5/2020

    il textbox non controlla se tu hai inserito 1 e non 01 come pure i mesi ad 1 cifra prima del 10.

    nella data sopra scriverebbe 15/20/20 stravolgendo tutta la data.

    a questo punto occorre un controllo completo dell’inserimento di una data, ma comunque ci sarebbero sempre interpretazioni errate, esempio 222020 che in pratica sarebbe 02/02/2020 però potrebbe anche essere 22/02/020.

    il metodo più sicuro sarebbe un DTPicker cioè un calendario per scegliere la data, oppure tagliando la testa al toro far scrivere in automatico la data odierna del tipo

    textbox1 = Date

    e nel caso aggiustarla se sia diversa.

    al limite massimo inserire il “.” punto per la separazione che verrà trasformato in “/” ed in ultimo convertito in 00/00/0000

    fai sapere cosa intendi fare, Ciao By Sal (8-D

    Ciao By Sal (8-)
    se ti piace la soluzione aiuta a sostenere il Forum con una DONAZIONE a piacere, Grazie