Condividi:        

[Excel 2013] Problema con commandbutton

Vuoi potenziare i tuoi documenti Word? Non sai come si fa una macro in Excel? Devi creare una presentazione in PowerPoint?
Oppure sei passato a OpenOffice e non sei sicuro di come lavorare al meglio?

Moderatori: Anthony47, Flash30005

[Excel 2013] Problema con commandbutton

Postdi fastbike73 » 20/11/14 09:45

Buongiorno a tutto il forum. Nella userform che ho creato per l'inserimento di dati
ho previsto 2 pulsanti per far scorrere all'interno dei campi della userform i record già
inseriti per un eventuale modifica o cancellazione.
Nel foglio i dati incominciano dalla riga 3, in riga 2 ho le intestazioni dei campi. Io vorrei
che in fase di "scorrimento in su" vengano letti soltanto i dati (quindi fino alla riga 3) e non i campi (riga 2).
Questo è il codice che ho utilizzato per il pulsante "scorri in su":

Codice: Seleziona tutto
Private Sub CommandButton5_Click()
If ActiveCell.Offset(-1, 0).Value = "Nr.cartella" Then
MsgBox "Inizio elenco"
Exit Sub
End If

ActiveCell.Offset(-1, 0).Select
TextBox2 = ActiveCell.Offset(0, 0).Value
TextBox3 = ActiveCell.Offset(0, 1).Value
TextBox4 = ActiveCell.Offset(0, 2).Value
.....
.....
TextBox24 = ActiveCell.Offset(0, 22).Value
TextBox25 = ActiveCell.Offset(0, 23).Value
TextBox26 = ActiveCell.Offset(0, 24).Value

End Sub


Per completezza riporto il codice relativo all'evento Initialize della userform:

Codice: Seleziona tutto
Private Sub UserForm_Initialize()
Me.MultiPage1.Value = 0
Worksheets("Foglio1").Range("B3").Select
ComboBox1.RowSource = "B3:B302"
End Sub
fastbike73
Win 10 & Office365
Filemaker Pro v. 13
fastbike73
Utente Senior
 
Post: 256
Iscritto il: 23/04/14 10:54

Sponsor
 

Re: [Excel 2013] Problema con commandbutton - Risolto!!

Postdi fastbike73 » 20/11/14 10:03

Scusate il disturbo, ho trovato il problema!!! Per correttezza, l'errore era nel foglio in quanto
avevo lasciato uno spazio tra la parola "Nr." e "cartella", cosa che non avevo fatto nel codice. Appena ho
tolto lo spazio il pulsante ha funzionato correttamente!!!
Grazie lo stesso a tutti!!
fastbike73
Win 10 & Office365
Filemaker Pro v. 13
fastbike73
Utente Senior
 
Post: 256
Iscritto il: 23/04/14 10:54


Torna a Applicazioni Office Windows


Topic correlati a "[Excel 2013] Problema con commandbutton":


Chi c’è in linea

Visitano il forum: Nessuno e 40 ospiti