Vergleich von 2 Zellen scheitert

Hallo,
wie die Überschrift schon sagt habe ich ein Problem zwei Zellen zu vergleichen. Mein Code sieht so aus:

Dim suchstr As String
Dim antwort As String
Dim LetzteZeile_test

LetzteZeile_test= Sheets("Tabelle1").Cells(Rows.Count, 1).End(xlUp).Row + 1
suchstr = "Bild"

For i = 1 To LetzteZeile_test

If Sheets("Tabelle1").Cells(i, 1) = suchstr And Sheets("Tabelle1").Cells(i, 2) = "" Then
antwort = "kein Bild vorhanden"
msgbox antwort
End If

Next

hat jemand ne Idee warum der Code nicht funktioniert?