Each Do must be matched with a terminating Loop. This error has the following cause and solution:
Check that other control structures within the Do...Loop structure are correctly matched. For example, a block If without a matching End If inside the Do...Loop structure may generate this error.
For additional information, select the item in question and press F1 (in Windows) or HELP (on the Macintosh).