jordanburch
Active Member
- Joined
- Jun 10, 2016
- Messages
- 439
- Office Version
- 2016
Hi All
This public variables isnt working
Public data_wbk1 As String
Public data_wbk2 As String
Public data_wbk3 As String
Public data_wbk4 As String
Public data_wbk5 As String
Public data_wbk6 As String
Public data_wbk7 As String
Public data_wbk8 As String
Public data_wbk9 As String
Public Sub openfiles()
data_wbk1 = InputBox("Enter FY I.E. FY20", Default:="FY20")
data_wbk2 = InputBox("Enter month I.E. 08-MAY20", Default:="08-MAY20")
data_wbk3 = InputBox("Enter monthFY I.E. MAY20:", Default:="MAY20")
Workbooks.Open ("K:\SHARED\TRANSFER\Enterprise Wide Suspense Initiative\Monthly Suspense Recon\" & data_wbk1 & "\" & data_wbk2 & "\" & "CARS" & "\" & data_wbk3 & " " & "CARS Detail Transaction Lines.xls*")
data_wbk4 = InputBox("Enter FY I.E. FY20", Default:="FY20")
data_wbk5 = InputBox("Enter month I.E. 08 - MAY20", Default:="08 - MAY 2020")
data_wbk6 = InputBox("Enter month Name I.E. YYYYMM:", Default:="202005")
data_wbk7 = InputBox("Enter month Name I.E. MAY:", Default:="MAY")
data_wbk8 = InputBox("Enter Prior month Name I.E. APRIL:", Default:="APRIL")
data_wbk9 = InputBox("Enter Prior month I.E. 07 - APR 2020", Default:="07 - APR 2020")
its not carrying to other subs in the same module. Whats wrong with it?
This public variables isnt working
Public data_wbk1 As String
Public data_wbk2 As String
Public data_wbk3 As String
Public data_wbk4 As String
Public data_wbk5 As String
Public data_wbk6 As String
Public data_wbk7 As String
Public data_wbk8 As String
Public data_wbk9 As String
Public Sub openfiles()
data_wbk1 = InputBox("Enter FY I.E. FY20", Default:="FY20")
data_wbk2 = InputBox("Enter month I.E. 08-MAY20", Default:="08-MAY20")
data_wbk3 = InputBox("Enter monthFY I.E. MAY20:", Default:="MAY20")
Workbooks.Open ("K:\SHARED\TRANSFER\Enterprise Wide Suspense Initiative\Monthly Suspense Recon\" & data_wbk1 & "\" & data_wbk2 & "\" & "CARS" & "\" & data_wbk3 & " " & "CARS Detail Transaction Lines.xls*")
data_wbk4 = InputBox("Enter FY I.E. FY20", Default:="FY20")
data_wbk5 = InputBox("Enter month I.E. 08 - MAY20", Default:="08 - MAY 2020")
data_wbk6 = InputBox("Enter month Name I.E. YYYYMM:", Default:="202005")
data_wbk7 = InputBox("Enter month Name I.E. MAY:", Default:="MAY")
data_wbk8 = InputBox("Enter Prior month Name I.E. APRIL:", Default:="APRIL")
data_wbk9 = InputBox("Enter Prior month I.E. 07 - APR 2020", Default:="07 - APR 2020")
its not carrying to other subs in the same module. Whats wrong with it?