object variable or with block variable not set mean
 

What does object variable or with block variable not set
really mean?
I have the statement coded as thus:

This part declared in declarations:
Public ThsWrkBk As Workbook

This part executed in a Public Static procedu
Dim ThsWrkBk
Set ThsWrkBk = ActiveWorkbook

This part executed in a Public procedure using
Public PostPymnt(ThsWrkBk, ShtNme)
ThsWrkBk.Active

object variable or with block variable not set mean
 

Hi Rick,

It would be better if you were to post the actual code.

However, perhaps, try deleting:

Dim ThsWrkBk

and try changing:

ThsWrkBk.Active

to

ThsWrkBk.Activate.


---
Regards,
Norman

"Rick" wrote in message
...
What does object variable or with block variable not set
really mean?
I have the statement coded as thus:

This part declared in declarations:
Public ThsWrkBk As Workbook

This part executed in a Public Static procedu
Dim ThsWrkBk
Set ThsWrkBk = ActiveWorkbook

This part executed in a Public procedure using
Public PostPymnt(ThsWrkBk, ShtNme)
ThsWrkBk.Active

object variable or with block variable not set mean
 

Thanks Norman it worked

"Norman Jones" wrote:

Hi Rick,

It would be better if you were to post the actual code.

However, perhaps, try deleting:

Dim ThsWrkBk

and try changing:

ThsWrkBk.Active

to

ThsWrkBk.Activate.


---
Regards,
Norman

"Rick" wrote in message
...
What does object variable or with block variable not set
really mean?
I have the statement coded as thus:

This part declared in declarations:
Public ThsWrkBk As Workbook

This part executed in a Public Static procedu
Dim ThsWrkBk
Set ThsWrkBk = ActiveWorkbook

This part executed in a Public procedure using
Public PostPymnt(ThsWrkBk, ShtNme)
ThsWrkBk.Active

object variable or with block variable not set mean
 

Yo are redifining ThsWrkBk with local scope, and this will take precedence
over the one you defined in your declarations. Dont (re)dim it in the proc.

"Rick" wrote:

What does object variable or with block variable not set
really mean?
I have the statement coded as thus:

This part declared in declarations:
Public ThsWrkBk As Workbook

This part executed in a Public Static procedu
Dim ThsWrkBk
Set ThsWrkBk = ActiveWorkbook

This part executed in a Public procedure using
Public PostPymnt(ThsWrkBk, ShtNme)
ThsWrkBk.Active