Ich habe einer Sub Routine eine Variable gefüllt. Beim Sprung in die nächste Routine, die sich in einem anderen Workbook befindet leert sich diese Variable.
Ich weiß nicht warum.
Die Variable, die ich mit hinüber nehmen muss heißt STR_ATTACH_PATH
Option Explicit
Global STR_ATTACH_PATH As String
Public Sub EXTRACT_DCO_VIEWS()
Application.Run "scriptHUB.xlsm!GET_VAR_WB_POG_MACRO"
STR_ATTACH_PATH = Workbooks(STR_VAR_WBNAME).Sheets("UI").Range("B43")
Debug.Print STR_ATTACH_PATH
Application.Run "scriptHUB.xlsm!EXTRACT_DCO_PREQS"
Application.Run "scriptHUB.xlsm!EXTRACT_DCO_POS"
End Sub
In einem Schritt davor muss ich auch eine Variable mitnehmen (STR_VAR_WBNAME), und diese verschwindet beim Sprung in die nächste Routine seltsamerweise nicht:Option Explicit
Global STR_VAR_WBNAME As String
Public Sub GET_VAR_WB_POG_MACRO()
Dim wb As Workbook
Dim STR_SEARCH_VAR_WBNAME As String
STR_SEARCH_VAR_WBNAME = "pog_macro_20"
For Each wb In Application.Workbooks
If wb.Name Like STR_SEARCH_VAR_WBNAME & "*.xlsm" Then
STR_VAR_WBNAME = wb.Name
With wb.Sheets("UI")
End With
End If
Next wb
End Sub