Sub test()
Dim textVAR(0 To 5) As String
Dim i as Long
textVAR(0) = "Do"
textVAR(1) = "Re"
textVAR(2) = "Me"
textVAR(3) = "Fa"
textVAR(4) = "So"
textVAR(5) = "La"
For i = LBound(textVAR) To UBound(textVAR)
If textVAR = "Do" Then
msgbox textVAR
Else
msgbox "Nope"
End If
next i
End Sub
if i...