안녕하세요. EDNC입니다.
PADS에서 실행하는 Basic script를 공부하신다는 것인가요? 출력물에서 문자가 깨진다면 Tools - option이 Global의 general의 Text encoding을 확인하시기 바랍니다. korea(Johab)이나 Korea(Wansung)으로 해보신후에 출력해보시기 바랍니다.

Basic script에 한글 입력이 되지 않습니다.
예를 들어 엑셀로 Part list 출력 시 셀의 문구를 한글로 출력하고 싶은데,
Basic script 에디트 창에서 한글 입력시에 깨짐현상이 발생합니다. 방법이 있을까요?

추가로 ED&C 자료실에 있는 Script 한 부분 해석좀 부탁드립니다.
For i=0 To cnt
If pPartType(i) = comp.PartType  And pval(i) = AttrValue(comp, "VALUE") Then
pName(i) =    pName(i)+"," + comp.Name                   
pSum(i)  =    pSum(i) + 1
isExist = False
End If

이부분이 정확히 어떤 의미인지 모르겠어서 요청 드립니다.
감사합니다.

ED&C님의 댓글

ED&C  | 18-08-08 09:12

안녕하세요. EDNC 입니다.
현재 안타깝게도 pads 의 basic script editor 는 한글을 지원하지 않습니다.
아래 스크립트는, 첨부한 내용만을 해석하면,
pPartType(i) 가 현재 comp의 parttype 과 같고, pval(i) 가 현재 comp 의 attribute 중 "VALUE" 의 데이터와 같으면  pName(i) 와 pSum(i) 를 바꾸고, isExist 를 false 로 하는 소스입니다.
미루어 짐작하건데, 상단에서 모든 comp 를 확인하여, "VALUE" attribute 와 Patrtype 같은 comp 를 한번씩만 pName 과 pSum을 하기 위해 isExist 를 사용한 것으로 보입니다.
이상입니다.
감사합니다.

하나만 더 물어볼게요..
xls.Range("B1:H3").Select
With xls.Selection

.Merge
.HorizontalAlignment = xlCenter

End With

셀 서식 관련해서 스크립트 추가하고있는데, 엑셀에서 매크로 입력시엔 위의 코드로 적용이 되는데
이상하게 pads에선 에러가 나네요.
"Range 클래스 중 HorizontalAlignment 메서드에 오류가 있습니다."
라고 나옵니다.
혹시 제가 뭘 잘못입력했을까요?

ED&C님의 댓글

ED&C  | 18-08-10 13:21

안녕하세요. 이디앤씨입니다.

스크립트의 일부분만 봐서는 문의 하신 내용 확인이 어렵습니다.
pads@ednc.com으로 전체 스크립트 보내주시면 확인 후 연락 드리겠습니다.

감사합니다.