ich brauche nun mal eure Hilfe. Ich habe unten stehende Formel in einem etwas komplexeren Makro erstellt. Im Grunde soll diese Formel multilingual sein (auf unterschiedlichen Excelsprachen funktionieren). Bis ich das Array "SprachArray" eingebaut hatte, hat es auch funktioniert. Nun kommt aber die Fehlermeldung "Laufzeitfehler '1004': Anwendungs- oder objektdefinierter Fehler". Ich weiß nicht wie ich dieses Problem lösen soll. Da die Formel definitiv im Excel stehen muss, kann ich diese auch nicht rein über Makros berechnen.
Kurze Beschreibung zur Formel:
Sie prüft unterschiedliche Excelzellen nach Kriterien und gibt entsprechende Fehlermeldungen aus, wenn diese nicht erfüllt sind. Die Fehlermeldungen stehen im Array "SprachArray".
Ich hoffe mir kann jemand helfen. Ich verzweifle hier gerade. Danke schon jetzt für die Mühe.
ActiveCell.FormulaR1C1 = _
"=IF(AND(RC" & SP_E_KomplKasten & "=TRUE," _
& "RC" & SP_E_KorpBreite & "=""""),"""",IF(AND(" _
& "RC" & SP_E_KomplKasten & "=TRUE,ISERROR(VLOOKUP(" _
& "RC" & SP_E_KorpBreite & ",S_Breite,1,0))," _
& "RC" & SP_E_Rueckw & "" & SprachArray(144, SP) & ")" _
& "," & SprachArray(93, SP) & ",IF(AND(" _
& "RC" & SP_E_Zarge & "=78," _
& "RC" & SP_E_KorpBreite & "600," _
& "RC" & SP_E_KorpBreite & "900," _
& "RC" & SP_E_Rueckw & "=" & SprachArray(144, SP) & "),"""",IF(AND(" _
& "RC" & SP_E_KomplKasten & "=TRUE,ISERROR(VLOOKUP(" _
& "RC" & SP_E_KorpBreite & ",S_Breite,1,0))=FALSE," _
& "RC" & SP_E_Rueckw & "" & SprachArray(177, SP) & ",AND(" _
& "RC" & SP_E_KorpBreite & "=550," _
& "RC" & SP_E_InnenAlu & "0)=FALSE)" _
& "," & SprachArray(94, SP) & ",IF(AND(ISERROR(VLOOKUP(" _
& "RC" & SP_E_KorpBreite & ",S_Breite,1,0))," _
& "RC" & SP_E_Rueckw & "=" & SprachArray(177, SP) & ")" _
& "," & SprachArray(95, SP) & ","""")))))"