[R] Colors according to value (Excel-Export)

[Mat]

i tried it this way. With this Code the Row "Difference" gets complete green.
But i want the color change to red according to a different value.

highlight_other<-out.ex1[(out.ex1$AUFTR_NAME=="Difference"),]$LFD2
zellen_other<-paste(paste("A",highlight_other,sep=""),paste("S",highlight_other,sep=""),sep=":")


# Libray
library(RDCOMClient)

#Start Excel
xl <- COMCreate("Excel.Application")  

#Öffnen von Excel
xl[["Visible"]] <- FALSE                      
xl[['DisplayAlerts']] <- FALSE 	 

#Datei öffnen
wkbk <- xl$Workbooks()$Open(pfad)       
 
#Formel einfügen
sh <- xl$ActiveSheet()

#Difference
O3R <- sh$Range(zellen_other)
O3RF <- O3R$Font()
O3RF[["Bold"]] <- TRUE
O3RF[["Size"]] <- "10"
O3RF[["Color"]] <-"5287936"




--
View this message in context: http://r.789695.n4.nabble.com/Colors-according-to-value-Excel-Export-tp4652331p4652466.html
Sent from the R help mailing list archive at Nabble.com.