표 색상 채우기 방법


'표생성
Dim TB As Object
Set TB = HwpCtrl1.CreateAction("TableCreate")

'표정보설정
Dim TB_Rows9Cols4 As Object
Set TB_Rows9Cols4 = TB.createSet()

TB.GetDefault TB_Rows9Cols4
TB_Rows9Cols4.SetItem "Rows", 9
TB_Rows9Cols4.SetItem "Cols", 4
TB.Execute TB_Rows9Cols4

'테이블표 위치 초기화
HwpCtrl1.Run ("TableCellBlock")
HwpCtrl1.Run ("TableCellBegin")
HwpCtrl1.Run ("TableCellPageUp")

첫번째 셀의 색상을 ‘표 채우기’ - RGB(255,255,255) 15% 어둡게로 칠하고 싶습니다.

https://forum.developer.hancom.com/t/setidtable-hwp/743/5?u=cwy

안녕하세요! 한컴디벨로퍼 운영자입니다. :slight_smile: 상기 링크 접속하셔서 참고 부탁드립니다. 문제 해결에 도움이 되었으면 좋겠습니다.

1개의 좋아요

안녕하세요~
vba와 그나마 좀 비슷한 파이선 예제 작성해봤습니다 ㅠ…
색상값은 RGBColor api를 이용해서 원하시는 색상 입력이 가능합니다~!

act = hwp.CreateAction("CellFill");
set = act.CreateSet();
act.GetDefault(set);
fillattrSet = set.CreateItemSet("FillAttr", "DrawFillAttr");

fillattrSet.SetItem("Type", 1);
fillattrSet.SetItem("WinBrushFaceStyle", 0xffffffff);
fillattrSet.SetItem("WinBrushHatchColor", 0x00000000);
fillattrSet.SetItem("WinBrushFaceColor", hwp.RGBColor(153, 153, 153));
act.Execute(set);
2개의 좋아요