«While .. End While» не работает в VBA?

Приведенный ниже код представляет собой VBA для Excel. Я использую редактор Visual Basic, входящий в состав Excel 2007.

Dim counter As Integer
counter = 1
While counter < 20
    counter = counter + 1
end while '<- the compiler is complaining about this statement

Код не компилируется. Над кодом у меня только объявления. Согласно MSDNэто должно работать, но не работает. Что случилось?