R XLConnect 스타일이 유지되지 않습니다

Question

데이터로 기존 Excel 파일의 서식을 지정하거나 스타일을 지정하는 중에 문제가 있습니다. 숫자 셀의 형식을 변경하고 배경색과 테두리를 추가하고 싶습니다.

require(XLConnect) 
wb <- loadWorkbook("example.xlsx", create = FALSE) 
cs <- createCellStyle(wb) 
setDataFormat(cs, format = "###,##0") 
setFillBackgroundColor(cs, color = XLC$"COLOR.YELLOW") 
setBorder(cs, side = "all", type = XLC$"BORDER.THIN", 
      color = XLC$"COLOR.BLACK") 
setCellStyle(wb, sheet = "PSNB", row = 24, col = 3, cellstyle = cs) 
saveWorkbook(wb) 

위의 코드를 실행 한 후, 세포는 지속 배경 색상 (노란색)과 데이터 형식을 가지고 있지 않습니다. 셀을 두 번 클릭하면 배경색이 노란색으로 변하고 쉼표 (예 : 100,000)가 나타납니다.

도움이 될 것입니다. 내가

Answer 1

XLConnect 0.2-13을 사용하고

나는 오히려 채우기 전경색 대신 채우기 배경 색상을 설정 찾고 있습니다 생각합니다. 배경색은 일반적으로 비 단색 채우기 패턴과 함께 만 필요합니다 (setFillPattern 참조).

다음은 당신이 찾고있는 무엇을 할 수

require(XLConnect) 
wb <- loadWorkbook("example.xlsx", create = FALSE) 
cs <- createCellStyle(wb) 
setDataFormat(cs, format = "###,##0") 
setFillForegroundColor(cs, color = XLC$"COLOR.YELLOW") 
setFillPattern(cs, fill = XLC$FILL.SOLID_FOREGROUND) 
setBorder(cs, side = "all", type = XLC$"BORDER.THIN", 
      color = XLC$"COLOR.BLACK") 
setCellStyle(wb, sheet = "PSNB", row = 24,col = 3, cellstyle = cs) 
saveWorkbook(wb) 

주에게 setFillForegroundColor 및 setFillPattern 대신 setFillBackgroundColor의 사용을.