scope of public variables - Sheet1 can't see ThisWorkbook

[yky]

In the Workbook_Open() procedure, I set eDate to the current date. When the workbook is opened, a message box pops up showing the current date. But in the sheet1 beforedboubleclick event procedure, I have the following code


eDate = eDate - 1
msgbox(eDate)

and the message box showed -1.

What happened to the public variable eDate?
===============================
Public eDate As Date

Sub Workbook_Open()
eDate = Date
MsgBox (eDate)

End Sub

 

[mvptomlinson]

If I'm going to use a global variable, I'll put it in a standard code module, not in one of the worksheet or thisworkbook modules.

 

[Jaafar Tribak]

In the Workbook_Open() procedure, I set eDate to the current date. When the workbook is opened, a message box pops up showing the current date. But in the sheet1 beforedboubleclick event procedure, I have the following code


eDate = eDate - 1
msgbox(eDate)

and the message box showed -1.

What happened to the public variable eDate?
===============================
Public eDate As Date

Sub Workbook_Open()
eDate = Date
MsgBox (eDate)

End Sub

Or you could change the codee you have in the beforedblclick event as follows :

With ThisWorkbook
    .eDate = .eDate - 1
    MsgBox (.eDate)
End With