[VBA] Errore definito dall'applicazione o dall'oggetto

[Grambo]

ciao a tutti
sto cercando di fare un banalissimo programmino in vba per farmi calcolare in automatico (al click di un pulsante) una serie di informazioni, ma non capisco perchè non mi esegue questa parte del programma
restituendomi l'errore in oggetto

Private Sub CommandButton1_Click()
riga = 26
colonna = 7
tappe = 0
Do While Foglio1.Cells(riga, colonna) <> ""
tappe = tappe + 1
colonna = colonna + 1
Loop
colonna = 7
For i = 1 To tappe
p1 = Foglio1.Cells(riga, colonna)
p2 = Foglio1.Cells(riga, colonna + 1)
trovato = 0
riga2 = 3
colonna2 = 1
 Do While trovato = 0
  If Foglio2.Cells(riga2, colonna2) = p1 Then
  MsgBox "trovato"
  trovato = 1
  Else
  riga2 = riga2 + 1
  End If
Loop
Next i
End Sub

[Grambo]

ho risolto

semplicemente
Como non è uguale a COMO
e mi andava i n errore, con un ucase() ho risolto grazie

[LeleFT]

Io, intanto, sposto nel forum corretto: Visual Basic e .NET Framework.


Ciao.