You are here:Home-Domande su Excel Generale-[RISOLTO] Impostare nomi in base alle date-Rispondi a: [RISOLTO] Impostare nomi in base alle date
Rispondi a: [RISOLTO] Impostare nomi in base alle date2018-11-28T08:21:34+01:00

Home Forum Domande su Excel Generale [RISOLTO] Impostare nomi in base alle date Rispondi a: [RISOLTO] Impostare nomi in base alle date

BySalvBySalv
Amministratore del forum
    Post totali: 692

    Ciao il discorso è sempre lo stesso, basta aggiungere una riga nel codice con il prossimo elemento.

    Private Sub CommandButton1_Click()
    Dim idx, x
    
    idx = ComboBox1.ListIndex + 1
    With Sheets("Prospetto")
        .Cells(idx, 2) = ComboBox2
        .Cells(idx, 3) = ComboBox3
        .Cells(idx, 4) = ComboBox4
        .Cells(idx, 5) = ComboBox5
    End With
    For x = 1 To 5
        Controls("Combobox" & x) = ""
    Next x
    ComboBox1.SetFocus
    End Sub

    Ciao By Sal :bye:

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