AIUTO!!! Problemi con la numerazione progressiva
Ciao a tutti, sono nuovo del forum ed mi sto approcciando a VBA, vi chiedo cortesemente se potete aiutarmi perchè non riesco a risolvere questo problema:
1) ho una userform che attivo tramite un pulsante in un foglio excel e vorrei che lo stesso pulsante oltre che ad aprire la userform mi inserisse in una TextBoxNumeroRicevuta della userform il numero successivo libero che ho nella colona A (la colonna A ha una numerazione progressiva) il codice che ho ora per l'apertura della Userform è questo:
Sub MASCHERA()
UserForm1.Show
End Sub;
2) quando ho compilato la userform ed cliccato sul pulsante per l'inserimento vorrei che la TextBoxNumeroRicevuta del numero aumentasse di uno per procedere con il record successivo il codice che ho ora è questo:
Private Sub CmdInserisci_Click()
Dim ur As Long
ur = Cells(Rows.Count, 1).End(xlUp).Row
Cells(ur + 1, 1).Value = TextBoxNumeroRicevuta.Value
Cells(ur + 1, 2).Value = CDate(TextBoxData.Value)
Cells(ur + 1, 3).Value = TextBox2.Value
Cells(ur + 1, 4).Value = TextBoxNome.Value
Cells(ur + 1, 5).Value = ComboBoxTotale.Value
Cells(ur + 1, 6).Value = TextBox1.Value
Cells(ur + 1, 7).Value = ComboBoxMese.Value
End Sub
Vi ringrazio in anticipo per i consigli che mi darete.
Io sono 2 giorni che ci lavoro ma non trovo la soluzione
[Modificato da SpartanMobility 30/12/2016 18:48]