Buonasera a tutti,
non capisco come mai quando eseguo questo codice mi esce la segnalazione di errore di compilazione next senza for.
For intnr = LBound(tipidisegno()) To UBound(tipidisegno())
MsgBox tipidisegno(intnr)
'Next intnr
If Me.CasellaCombinata353.Value = tipidisegno(intnr) Then
Next intnr
Else
MsgBox "ATTENZIONE - PREMONTAGGIO NON IN ELENCO"
Exit For
End If
Il ciclo che vorrei fare è che se il valore della casellacombinata353 è uguale a tipidisegno va avanti nel ciclo se è diverso esce la segnalazione e esce dal for.
Dov'è l'errore?
Grazie a chi mi aiuterà in anticipo.
Giuseppe