Makro um Makros auszuwählen?

[Elex]

Hi

Oder die Variante.

Code:

Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Intersect(Target, Range("A5")) Is Nothing Then
       Application.Run (Target.Value)
    End If
End Sub

Gruß Elex

[Case]

[ari-2001]

Ohhhhhhhhhhhhh, Case!

Hab vielen Dank! Wenn Du die Tage Post von meinem Notar bekommst, liegt dass daran, dass ich Dich in meinem Testament berücksichtigt habe  .
Ich bin einfach nicht drauf gekommen.

Vielen lieben Dank und einen schönen Samstag!

Viele Grüße
Andreas