Ich möchte aus einer Sub bf_Korrigieren Variablen an eine andere Unterfunktion weitergeben. Dies sieht im Ausschnitt so aus:
Dim dings As Range 'Zelle des verwendeten Bereichs
Dim i As Integer 'durchläuft alle Arbeitsblätter
Dim j As Integer 'Zähler für Rangfolge bedingter Formate
...
Set formel1 = ActiveWorkbook.Worksheets(i).dings.FormatConditions(j).Formula1
...
Leider funktioniert das nicht. Ein Objekt ist erforderlich. Was mache ich falsch?
Kann mir jemand weiterhelfen? Vielen Dank schon einmal.
Viele Grüße,
Soti