Expected End Sub
An Endprocedure statement must match theprocedure in which it occurs. This error has the following cause and solution:
- You used End Function or End Property to end a Sub procedure. Use End Sub for this type of procedure.
For additional information, select the item in question and press F1 (in Windows) or HELP (on the Macintosh).