CELL_BACKCOLOR
Verfasst: Di 3. Mai 2016, 21:48
Hallo,
habe folgende Funktion zur Ermittlung der Hintergrundfarbe einer Zelle in einem anderen Forum gefunden:
Function CELL_COLOR(vSheet,lRowIndex&,iColIndex%)
Dim v
v = getSheetCell(vSheet,lRowIndex&,iColIndex%)
if vartype(v) = 9 then
CELL_COLOR = v.CellBackColor
else
CELL_COLOR = v
endif
End Function
Mein Problem ist, dass das (in meiner Installation) nicht funktioniert. Der Compiler streikt in der 3. Zeile mit "Syntax Error"
Gibts dazu eine Loesung oder Altrernative? Besten Dank an Alle
habe folgende Funktion zur Ermittlung der Hintergrundfarbe einer Zelle in einem anderen Forum gefunden:
Function CELL_COLOR(vSheet,lRowIndex&,iColIndex%)
Dim v
v = getSheetCell(vSheet,lRowIndex&,iColIndex%)
if vartype(v) = 9 then
CELL_COLOR = v.CellBackColor
else
CELL_COLOR = v
endif
End Function
Mein Problem ist, dass das (in meiner Installation) nicht funktioniert. Der Compiler streikt in der 3. Zeile mit "Syntax Error"
Gibts dazu eine Loesung oder Altrernative? Besten Dank an Alle