Why can't I addin Visual Basic? I'm sure its simple...

Why can't I addin Visual Basic? I'm sure its simple...

My code:

 c_size = application.counta(Worksheets("Sheet1").range("a1:a999"))
 c_size = c_size+1


My error:

Encountered "1" at line 49, column 21.Was expecting one of:
<NL>,  ":",  "&",  <DOT>,  "^",  "(",  "-",  "+",  "=",  ">",  "<",  ">=",  "<=",  "<>",  "\\",  "/",  "*",  "IS",  "LIKE",  "MOD",  "AND",  "OR",  "XOR",  "EQV",  "IMP", 


What am I missing?