Hello,
In the event Workbook_Open() from ThisWorkBook I am calling several functions.
During the opening of the workbook excel didn't execute anything from Workbook_Open().
Even the msgbox didn't pop.
I was told to place all the functions that I call in this procedure within ThisWorkBook.
For example I moved the function ColorInit(0, "") from a module just after "Private Sub Workbook_Open()" as you can see below.
Upon opening everything works now. Thats great.
However,
The problem has changed side.
My other calls of these functions don't see them.
For Example Call ColorInit (... is unkwown in the rest of my code. I can't use it, it is not defeined.
Does any one have an idea to fix this?
In the event Workbook_Open() from ThisWorkBook I am calling several functions.
During the opening of the workbook excel didn't execute anything from Workbook_Open().
Even the msgbox didn't pop.
I was told to place all the functions that I call in this procedure within ThisWorkBook.
For example I moved the function ColorInit(0, "") from a module just after "Private Sub Workbook_Open()" as you can see below.
Upon opening everything works now. Thats great.
However,
The problem has changed side.
My other calls of these functions don't see them.
For Example Call ColorInit (... is unkwown in the rest of my code. I can't use it, it is not defeined.
Does any one have an idea to fix this?
Rich (BB code):
Private Sub Workbook_Open()
Dim F As String, GGDriveSavePath As String, TempStr As String
Dim TempTbl As Variant
Dim BkupFileTbl() As String
Dim FileDateTbl() As Date
ReDim BkupFileTbl(1 To 1000)
ReDim FileDateTbl(1 To 1000)
Msgbox "Open is executing"
Version = "Zanzibar operation V3.8 December 1st, 2023"
Call ColorInit(0, "")
....
End Sub
Function ColorInit(ColorNb As Long, ColorName As String) As Variant
Dim T As Long
ReDim ColorList(1 To 30, 1 To 2)
...
Last edited by a moderator: