In meinem Makro steht folgendes drin:
With Selection.Interior
        .ColorIndex = 1
        .Pattern = xlSolid
    End With
Hab das dann versucht so umzusetzten:
$format->Selection->Interior->ColorIndex = 3;
In meinem Makro steht folgendes drin:
With Selection.Interior
        .ColorIndex = 1
        .Pattern = xlSolid
    End With
Hab das dann versucht so umzusetzten:
$format->Selection->Interior->ColorIndex = 3;