Buonasera, avrei questo problema.
Ho modificato la Userform impostandola "a tutto schermo" all'avvio del file e nascondendo quindi i fogli dietro la userform.
Adesso però mi da un errore di "Variabile non definita" quando provo a fare la ricerca, digitando per intero o parzialmente il numero cartella.
Il debug mi riporta a questa riga di codice...(in grassetto e sottolineato)... mi sto dimenticando qualcosina??
Private Sub CommandButton1_Click()
If TextBox1 = "" Then
MsgBox "Inserisci il numero della Cartella"
TextBox1.SetFocus
Exit Sub
End If
If OptionButton1.Value = True Then
primo
End If
If OptionButton2.Value = True Then
With ActiveSheet.Range("B3:B302")
Dim X As String
X = TextBox1.Value
Set C = .Find(X, LookIn:=xlValues) ', LookAt:=xlWhole
If Not C Is Nothing Then
firstAddress = C.Address
Do
C.Cells.Select
TextBox2 = C.Value
TextBox3 = C.Offset(0, 1).Value
TextBox4 = C.Offset(0, 2).Value
TextBox5 = C.Offset(0, 3).Value
....