표선타입 및 표선굵기 코드공유용

한글 오토메이션
1 
from win32com.client.gencache import EnsureDispatch
from tkinter import*

한컴=EnsureDispatch("HWPFrame.HwpObject")
한컴.XHwpWindows.Item(0).Visible=True

def 표테두리굵기(상,하,좌,우):
    총 = 한컴.CreateAction("CellBorderFill")
    총알 = 총.CreateSet()
    총.GetDefault(총알)
    총알.SetItem("BorderWidthTop", 상)
    총알.SetItem("BorderWidthBottom", 하)
    총알.SetItem("BorderWidthLeft", 좌)
    총알.SetItem("BorderWidthRight", 우)
    총.Execute(총알)
    
def 표내부선굵기(가로, 세로):
    총 = 한컴.CreateAction("CellBorderFill")
    총알 = 총.CreateSet()
    총.GetDefault(총알)
    총알.SetItem("WidthHorz", 가로)
    총알.SetItem("WidthVert", 세로)
    총.Execute(총알)

def 표단일선(위치,굵기,종류):
    총 = 한컴.CreateAction("CellBorderFill")
    총알 = 총.CreateSet()
    총.GetDefault(총알)
    
    if 위치=="상":
        총알.SetItem("BorderWidthTop", 굵기)
        총알.SetItem("BorderTypeTop", 종류)
    if 위치=="하":
        총알.SetItem("BorderWidthBottom", 굵기)
        총알.SetItem("BorderTypeBottom", 종류)
    if 위치=="좌":
        총알.SetItem("BorderWidthLeft", 굵기)
        총알.SetItem("BorderTypeLeft", 종류)
    if 위치=="우":
        총알.SetItem("BorderWidthRight", 굵기)
        총알.SetItem("BorderTypeRight", 종류)            

    총.Execute(총알)


창=Tk()
창.attributes("-topmost", True)

버튼1 = Button(창, text="겉바속촉", 
    command=lambda:[표테두리굵기(6,6,6,6),표내부선굵기(1,1)])
버튼1.place(x=0, y=0)

버튼2 = Button(창, text="하단이중선", 
    command=lambda:[표단일선("하",6,8)])
버튼2.place(x=0, y=30)


창.mainloop()
2개의 좋아요
2

안녕하세요. 한컴디벨로퍼입니다.

유용한 정보를 공유해 주셔서 감사합니다.
한컴디벨로퍼는 고객님의 참여로 성장하고 있습니다. 관심과 기대에 부응하는 한컴디벨로퍼가 되겠습니다.

감사합니다.
한컴디벨로퍼 드림

1개의 좋아요