Kreise überlagern feststellen - Für Variable einen Bereich festlegen

[spirit]

mhh ich glaube ich drück mich falsch aus...

For TEST = 50 To 500
Next

If TEST = 66 Then
MsgBox "JA!"
End If

--------------------------------------------------------------------------------------------------
For TEST = 50 To 500 ' Bereich festlegen
If TEST = 66 Then ' Abfrage welcher wert die Variable Test hat
MsgBox "JA!" ' Wenn Wert = 66 dann MSGBox
End If
Next ' nächster Versuch

Deine Abfrage steht hinter der Schleife und vergleicht lediglich den Schleifenendwet(500)
mit dem gesuchten Wert(66)