이 범주에서는 한글 오토메이션에 대한 다른 사용자의 기술 지원을 제공받을 수 있습니다.
- 한글 오토메이션의 API 사용/연동은 개발 가이드를 참조하세요.
- 일반 문의는 한글과컴퓨터 웹사이트의 고객 지원을 이용하세요.
- 개인정보가 포함되지 않도록 유의하세요. 게시글 또는 댓글에 개인정보가 포함된 내용이 있을 경우 게시물이 숨김처리 될 수 있습니다.
안녕하세요, 저번주까지 잘 작동되던 한글 매크로가 갑자기 실행하면 종료되는 현상이 일어나고 있습니다. 다른 매크로는 모두 정상이나 수식관련 매크로만 모두 강제 종료 당하고 있습니다. 혹시 해결 방법 알 수 있을까요?
function OnScriptMacro_수식제일뒤에빈칸모두제거반복문v1()
{
HAction.Run("MoveTopLevelBegin");
var Hc=HeadCtrl;
cnt=0;
do{
if(Hc.CtrlID=="eqed"){
수식();
FindCtrl();
HAction.GetDefault("EquationPropertyDialog", HParameterSet.HShapeObject.HSet);
with (HParameterSet.HShapeObject)
{
Width = 1012;
HSet.SetItem("ShapeType", 3);
//String = String + "`"; // ` 개수가 빈칸 개수임. 1개 넣었지만 원하는 대로 변경가능
String = String.replace(/`+$/g, "" ); // 문자열 제일 뒤에 ` 만 모두 지움.
}
HAction.Execute("EquationPropertyDialog", HParameterSet.HShapeObject.HSet);
HAction.Run("Cancel");
HAction.Run("MoveRight");
Repeat();
cnt++;
}
Hc=Hc.next
}while(Hc)
XHwpMessageBox.String= " "+cnt+" 개의 수식을 처리하였습니다." ;
XHwpMessageBox.Flag=0;
XHwpMessageBox.DoModal();
}
function Repeat()
{
HAction.GetDefault("RepeatFind", HParameterSet.HFindReplace.HSet);
with (HParameterSet.HFindReplace)
{
}
HAction.Execute("RepeatFind", HParameterSet.HFindReplace.HSet);
HAction.Run("Cancel");
}
function 수식()
{
HAction.GetDefault("Goto", HParameterSet.HGotoE.HSet);
with (HParameterSet.HGotoE)
{
HSet.SetItem("DialogResult", 37);
SetSelectionIndex = 5;
}
HAction.Execute("Goto", HParameterSet.HGotoE.HSet);
}
function OnScriptMacro_수식뒤에빈칸넣기반복문v1()
{
HAction.Run("MoveTopLevelBegin");
var Hc=HeadCtrl;
cnt=0;
do{
if(Hc.CtrlID=="eqed"){
수식();
FindCtrl();
HAction.GetDefault("EquationPropertyDialog", HParameterSet.HShapeObject.HSet);
with (HParameterSet.HShapeObject)
{
Width = 1012;
HSet.SetItem("ShapeType", 3);
String = String + "`"; // ` 개수가 빈칸 개수임. 1개 넣었지만 원하는 대로 변경가능
}
HAction.Execute("EquationPropertyDialog", HParameterSet.HShapeObject.HSet);
HAction.Run("Cancel");
HAction.Run("MoveRight");
Repeat();
cnt++;
}
Hc=Hc.next
}while(Hc)
XHwpMessageBox.String= " "+cnt+" 개의 수식을 처리하였습니다." ;
XHwpMessageBox.Flag=0;
XHwpMessageBox.DoModal();
}
function Repeat()
{
HAction.GetDefault("RepeatFind", HParameterSet.HFindReplace.HSet);
with (HParameterSet.HFindReplace)
{
}
HAction.Execute("RepeatFind", HParameterSet.HFindReplace.HSet);
HAction.Run("Cancel");
}
function 수식()
{
HAction.GetDefault("Goto", HParameterSet.HGotoE.HSet);
with (HParameterSet.HGotoE)
{
HSet.SetItem("DialogResult", 37);
SetSelectionIndex = 5;
}
HAction.Execute("Goto", HParameterSet.HGotoE.HSet);
}
이 2개만 실행하면 프로그램이 강제 종료됩니다.