stupid cryptic messages
 

can someone explain to me why this isn't working and what the error message

compile error: Object required.

Sub tester()
Dim cntr As Integer
Set cntr = ActiveWorkbook.Names.Count

End Sub

stupid cryptic messages
 

Set is only used for objects, hence the message. Change to:

cntr = ActiveWorkbook.Names.Count

hth,

Doug

"Jonathan Cooper" wrote in
message ...
can someone explain to me why this isn't working and what the error
message

compile error: Object required.

Sub tester()
Dim cntr As Integer
Set cntr = ActiveWorkbook.Names.Count

End Sub