Worksheet Function

[Paul Morris]

Hi All,

Getting a type mismatch error from the below line - any ideas on what's wrong with it? Currently the variable 'a' is undeclared.

Cheers,
Paul


a = Application.WorksheetFunction.CountA(Workbooks(UpdateFile).Sheets(1).Range("A:A"))

 

[Albert 1]

Name of the workbook: you forgot the quotes I think:
....Workbooks("UpdateFile").....

Albert 1

 

[erik.van.geit]

Hi, Paul,

did you do something like this ?
ERROR
Dim UpdateFile As Workbook
Set UpdateFile = ThisWorkbook

then you need

a = Application.WorksheetFunction.CountA(UpdateFile.Sheets(1).Range("A:A"))

kind regards,
Erik