La consultazione del forum è libera per tutti.
Per poter porre un quesito è invece necessario essere un utente registrato (clicca qui se non lo sei).
Tutti gli utenti che richiedono un supporto, come da REGOLAMENTO, sono caldamente invitati ad allegare un file di esempio con l'indicazione di quello che si desidera ottenere.
Ciao a tutti
ho creato una user form che ha funzionato fino a pochi giorni fa. Da ieri inspiegabilmente quando la lancio compare il messaggio di errore che allego. Ho provato a cambiare il nome del foglio ma senza risultati.
Vi ringrazio in anticipo per il vostro aiuto.
Grazie.
Alpino
Ciao
Sarebbe molto utile avere il file ma, al limite, pubblica il codice perchè dall'immagine allegata io non riesco a leggere nulla.
Ciao,
Mario
ciao
a me è bastato ripristinare
Sh1.select
che avevi disabilitato
spero che non ti crei problemi aver postato con i nomi originali
se si avvisa che cancelliamo il file
Private Sub UserForm_Initialize()
'Riempie l'elenco a discesa della user form (1)
Dim Cella As Range
Sh1.Select
For Each Cella In Sh1.Range(Range("F2"), Range("F999999").End(xlUp))
cboRicGruppo.AddItem Cella.Value
cboRicAnno.AddItem Cella.Value
Next Cella
' For Each Cella In Sh1.Range(Range("O2"), Range("O999999").End(xlUp))
' cboRicAnno.AddItem Cella.Value
' Next Cella
End Sub
e il form funziona
ciao,
se hai risolto, sarebbe meglio che tu marcassi la discussione come "risolto"
grazie
