When executing the following code.

Dim WkbName As String

WkbName = Application.CommandBars.ActionControl.Parameter
If WkbName = "" Or WkbName = "ThisWorkbook" Then WkbName = ThisWorkbook.Name

I get the following error message

Run-time error '91':
Object variable or With block variable not set

COuld someone please help me correct the problem or help me with the syntax