|
* 답변하시는 분들께 도움이 되도록 자신의 환경을 아래 항목 옆에 기재해 주세요.
- 파워포인트 버전(95,97,2000,xp,2003,2007):
오피스 365
* 아래줄에 질문을 작성하세요 >>
안녕하세요.
매크로 실행하면 인풋박스창이 나오고 창에서 슬라이드 번호 입력 (ex : 3,5,10) 입력하면
3,5,10번 슬라이드가 선택되는 매크로를 생각하고 있습니다.
한개는 하겠는데 여러 슬라이드 선택하는것이 안됩니다. 고수님들 답변 기다립니다.
Sub test()
Dim strresponse2 As String
Dim iresponse2 As String
strresponse2 = InputBox("페이지 번호를 입력하세요" & vbCr & "(구분자는 , 콤마입니다.)" & vbCr & "ex) 2,4,11,5" & vbCr & "없는경우 ""취소""를 눌러주세요")
If IsNumeric(strresponse2) Then
iresponse2 = strresponse2
End If
ActiveWindow.Selection.Unselect
ActivePresentation.slides.Range(Array(iresponse2)).Select
'여기서 에러남
'ActivePresentation.Slides.Range(Array(2, 4, 11,5)).Select
'이렇게 하면 에러가 안남
End Sub
이상입니다. |
|