Ich habe ein Makro geschrieben, das eine Exceltabelle kopieren, einfügen und umbenennt und anschließend ein paar Formeln einfügt.
Bisher hat das Skript auch funktioniert; jetzt habe ich in drei Formeln allerdings eine IF-Abfrage eingebaut und nun bekomme ich das dieser Stelle den Laufzeitfehler 1004: Anwendungs- oder objektdefinierter Fehler!
Hier der Code an der fraglichen Stelle:
For i = 8 To 12 'Aufbau
Range("K" & i).Formula = "=IF(Luftschall_Allgm!C" & (5 * messung + i - 9) & "=" & Chr(34) & Chr(34) & ";" & Chr(34) & Chr(34) & ";Luftschall_Allgm!C" & (5 * messung + i - 9) & ")"
[...]
Next i
Für i = 8 sollte die Formel wie folgt aussehen:
=IF(Luftschall_Allgm!C4="";"";Luftschall_Allgm!C4)
Ich hoffe, mir kann jemand weiterhelfen!
BTW: bisher hatte ich an der Stelle folgenden Code:
Range("K" & i).Formula = "=Luftschall_Allgm!C" & (5 * messung + i - 9)
Komischerweise wurde mir im Blatt statt dem Wert nur die Formel angezeigt:
=Luftschall_Allgm!C4
Bei allen anderen Formeln gab es keine Probleme... |