Problème avec un if then else

Bonjour à tous,

étant débutant dans ce language, je ne vois pas ou se situe mon erreur :
voici le code :

Code:

---

1 2 3 4 5 6 7

If CmbstartBloc.SelText = "" Then StartBloc = "'*'" Else StartBloc = CmbstartBloc.SelText Do Until InStr(1, StartBloc, Chr$(32)) = 0 StartBloc = Replace$(StartBloc, " ", "") Loop End If

---

le message est : ...else sans if

Merci d'avance

Bonjour,

Si tu mets une instruction sur la même ligne que le then, il ne faut pas de enf if

Code:

---

1 2 3 4 5 6 7 8 9

If CmbstartBloc.SelText = "" Then StartBloc = "'*'" Else StartBloc = CmbstartBloc.SelText Do Until InStr(1, StartBloc, Chr$(32)) = 0 StartBloc = Replace$(StartBloc, " ", "") Loop End If

---

ok merci beaucoup pour la réponse.
A+