Makro in Basic
Code: Alles auswählen
public function Hintergrund_Aehnlich(RRef as Range,RT as Range) as integer
dim c1 as long
dim c2 as long
Hintergrund_Aehnlich=0
c1=RRef.CellRange.CellBackColor
c2=RT.CellRange.CellBackColor
if c1=c2 then Hintergrund_Aehnlich=1
end function
Code: Alles auswählen
dim c1 as long
Code: Alles auswählen
public function Hintergrund_Aehnlich(RRef as Range
Starte die Berechnung manuell und die Funktion arbeitet einwandfrei
Kennt jemanden eine Lösung für dieses Verhalten? was mache ich falsch?