Hallo,

ich möchte ein Makro mit einer If Formel mehrmals verwenden und immer wenn die Formel negativ ist soll ein neues Makro ausgelöst werden. Da nach jeden negativen Lauf ein anderes Makro ausgelöst werden soll würde ich das entsprechende Makro gerne via String eintragen. Leider funktioniert es nicht, die restlichen übertragenen Werte funktionieren. Was mache ich falsch?

Danke 

If .Range("HX2").Value = .Range("BPK2").Value Then
Call Prüfung Berechnung(Berechnung_2, "BPN2", "BPO2", 3, "BQC3:DTL3", 10, 13, 14)
End If

Sub Prüfung_Berechnung(par1, par2, par3, par4, par5, par6, par7, par8 As String)

Else: Call par1