Sub makro2()
dim variable as string
variable = "xyz"
End Sub
Sub makro1()
msgbox "abc" & variable
End Sub
Ich möchte also die variable im makro2 ins makro1 übernehmen.
wie mach ich das?
Sub makro2()
dim variable as string
variable = "xyz"
End Sub
Sub makro1()
msgbox "abc" & variable
End Sub
Ich möchte also die variable im makro2 ins makro1 übernehmen.
wie mach ich das?
Sub Makro1()
pstrVar = "aus_makro1"
Call Makro2
End Sub
Sub Makro2()
MsgBox "abc" & pstrVar
pstrVar = ""
End Sub
Grüße Gerd
Option Explicit
Public pstrVar As String
Sub Makro1()
variable = "aus_makro1"
Call Makro2
variable = ""
End Sub
Sub Makro2
If variable "" Then
variable2 = variable
Else: variable2 = ""
msgbox variable2 'alleine ausgeführt: leer, von makro1 ausgeführt: "aus makro1"
End If
end sub
Vielen Dank für die Mithilfe,
Grüsse,
Tobias