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.

______________________________________________
R-help@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.

Reply via email to