you cant mix 1 line if then else with multiple line if then else

so either

if a=b then c else d

or

if a=b then
c
else
d
endif



keepITcool

< email : keepitcool chello nl (with @ and .)
< homepage: http://members.chello.nl/keepitcool


"AlanN" wrote:

Can someone tell me what's wrong with this? I keep getting the error
"else without if"

Sub test()

Dim Msg, Style, Title

Msg = "Do you want to go ahead and continue setting up the individual
store pages?" Style = vbYesNo + vbCritical + vbDefaultButton2
Title = "Individual Store Pages"
Response = MsgBox(Msg, Style, Title)

If Response = vbYes Then GoTo Reports

Else

GoTo Endit

End If

Reports:

code

Endit:

more code

End Sub