Application.Run aus Klassen
22.02.2023 08:00:19
Shouchen
ich würde gerne aus einer Klasse ein Sub namens "Begeistert" aufrufen, welche einen Integer aus "Board.Buffda" erhält.
Die kriritschen Zeilen sind hier:
Teiln.Begeistert Board.Buffda.Value
Application.Run Bu, Board.Buffda.Value
da ich diese, sofern in Bu exakt "Teiln.Begeistert" steht, so verstehe, dass diese gleichwertig sind.
Sub Buffen(Bu As String, Teila As String)
Bu = "Teiln." & Bu
Dim i As Integer
For i = 1 To Teil.Count
Set Teiln = Teil(i)
If Teiln.m_name = Teila Then
Teiln.Begeistert Board.Buffda.Value
Application.Run Bu, Board.Buffda.Value
End If
Next
End Sub
In meinem String "Bu" steht exakt:
"Teiln.Begeistert", dennoch findet er das Macro nicht. Die Zeile darüber läuft aber durch.
Gibt es einen anderen Weg, das Ganze als String und somit fluide aufzurufen oder habe ich einen Denkfehler bei der Funktionsweise?
Vielen Dank im voraus für eure Hilfe. :)