표안에 셀의 크기를 적는 방법 문의

function OnScriptMacro_삽도크기적기()
{
HAction.Run(“TableCellBlock”);
HAction.GetDefault(“StyleEx”, HParameterSet.HStyle.HSet);
with (HParameterSet.HStyle)
{
Apply = 11;
}
HAction.Execute(“StyleEx”, HParameterSet.HStyle.HSet);
HAction.GetDefault(“TablePropertyDialog”, HParameterSet.HShapeObject.HSet);
with (HParameterSet.HShapeObject)
{
HSet.SetItem(“ShapeType”, 3);
HSet.SetItem(“ShapeCellSize”, 1);
}
HAction.Execute(“TablePropertyDialog”, HParameterSet.HShapeObject.HSet);
HAction.Run(“Cancel”);
HAction.GetDefault(“Paste”, HParameterSet.HSelectionOpt.HSet);
with (HParameterSet.HSelectionOpt)
{
}
HAction.Execute(“Paste”, HParameterSet.HSelectionOpt.HSet);
HAction.GetDefault(“InsertText”, HParameterSet.HInsertText.HSet);
HParameterSet.HInsertText.Text = " x ";
HAction.Execute(“InsertText”, HParameterSet.HInsertText.HSet);
HAction.Run(“TableCellBlock”);
HAction.Run(“Cancel”);
HAction.Run(“MoveLineEnd”);
HAction.GetDefault(“Paste”, HParameterSet.HSelectionOpt.HSet);
with (HParameterSet.HSelectionOpt)
{
}
HAction.Execute(“Paste”, HParameterSet.HSelectionOpt.HSet);
}

액션으로 가능할줄 알았더니.
셀 너비와 높이를 복사해서 넣을려고합니다.
액션 매크로로는 클립보드에 복사되어 있는 내용을 적어넣네요…

셀의 (높이 x 너비) 를 적는 법이 있을까요?

이 범주에서는 한글 오토메이션에 대한 다른 사용자의 기술 지원을 제공받을 수 있습니다.

  1. 한글 오토메이션의 API 사용/연동은 개발 가이드를 참조하세요.
  2. 일반 문의는 한글과컴퓨터 웹사이트의 고객 지원을 이용하세요.
  3. 개인정보가 포함되지 않도록 유의하세요. 게시글 또는 댓글에 개인정보가 포함된 내용이 있을 경우 게시물이 숨김처리 될 수 있습니다.

안녕하세요

현재 셀에서 높이, 넓이 가져와서 입력하는 예제 간단하게 스크립트로 만들어보았습니다.

감사합니다 ^^

var Height;
var Width;
HAction.GetDefault("TablePropertyDialog", HParameterSet.HShapeObject.HSet);
Height = HParameterSet.HShapeObject.ShapeTableCell.Height / 283;
Width = HParameterSet.HShapeObject.ShapeTableCell.Width / 283;

Height = parseInt(Height);
Width = parseInt(Width);
var msgbox = XHwpMessageBox;
var msgstring = Height+"x"+Width;

msgbox.String = msgstring;
msgbox.DoModal();

var act = CreateAction("InsertText");
var set = act.CreateSet();
act.GetDefault(set);
set.SetItem("Text",msgstring);
act.Execute(set);

3개의 좋아요

감사합니다. 덕분에 업무효율이 엄청 올라갈거 같습니다. 잘 쓰도록 하겠습니다.

적용하다 보니 궁금한게 하나 있어 추가 질문 드려도 될까요?? 소수점 2자리까지 표현할려고 toFixed를 적용하니 소수점 은 다른 숫자가 나오네요. parsint를 지우고 글자를 적히게 해보니. 소수점은 생각지 못한 숫자들이 나옵니다. 최소 소숫점 1자리까지는 맞는 숫자가 나와야 해서 방법이 있을까요??

1개의 좋아요

안녕하세요,
parsint 를 제거하고 아래와 같이 하면될것 같은데 반올림이 적용이 되네요 ㅎㅎ…;
Height = parseFloat(Height.toFixed(1));

javascript라면 Math를 이용하면 될것 같지만 한글의 스크립트의 경우 ms제공하는 jscirpt를 이용해서 더이상은 방법이 없을것 같습니다 …!

2개의 좋아요

셀크기가 150.50으로 설정했는데 150.73 등의 왜 이런지 모를 소수점이 나오는 데. 한글 자체의 문제인가 보네요. 셀크기를 잘 조정해서 써보는 쪽으로 해보겠습니다. 감사합니다.

1개의 좋아요

안녕하세요 ^^

저도 긴가민가 생각나서 283으로만 나눠서요 ㅎㅎ… ;

나눌때 값을 283.465로 나누시면 될것 같습니다.!

1 mm = 283.465HWPUNIT

감사합니다…!

2개의 좋아요

몇일 지나서 확인했네요.!! 감사합니다. 덕분에 완벽하게 사용할 수 잇겠습니다.