'슬라이드노트'에 해당되는 글 2건

  1. 2008/09/26 clubkona 슬라이드 노트 한꺼번에 지우기 (1)
  2. 2008/09/26 clubkona 슬라이드 노트 한꺼번에 지우기 (1)

슬라이드 노트 한꺼번에 지우기

IT 2008/09/26 11:21 clubkona

일단 F12키로 다른 이름으로 저장합니다.
맨 처음 슬라이드로 이동 후 Alt+F11키로 Visual Basic Editor로 이동합니다.
도구, 옵션, 편집기 탭에 "변수 선언 요구"를 체크하고 확인합니다.
삽입, 모듈을 선택합니다.
모듈 창에 아래 내용을 복사후 붙여넣기 하고 실행(F5)시키면 각 슬라이드에 있는 노트가 삭제됩니다.

Sub DeleteTheNotes()

Dim oSlide as Slide
On error resume next

For each oSlide in activewindow.presentation.slides
     oSlide.NotesPage.Shapes("Rectangle 3").Delete
Next oSlide

End sub

 

2008/09/26 11:21 2008/09/26 11:21
TAG , ,
받은 트랙백이 없고, 댓글 하나가 달렸습니다.

댓글+트랙백 RSS :: http://clubkona.hosting.paran.com/rss/response/167

댓글+트랙백 ATOM :: http://clubkona.hosting.paran.com/atom/response/167

슬라이드 노트 한꺼번에 지우기

IT 2008/09/26 11:21 clubkona

일단 F12키로 다른 이름으로 저장합니다.
맨 처음 슬라이드로 이동 후 Alt+F11키로 Visual Basic Editor로 이동합니다.
도구, 옵션, 편집기 탭에 "변수 선언 요구"를 체크하고 확인합니다.
삽입, 모듈을 선택합니다.
모듈 창에 아래 내용을 복사후 붙여넣기 하고 실행(F5)시키면 각 슬라이드에 있는 노트가 삭제됩니다.

Sub DeleteTheNotes()

Dim oSlide as Slide
On error resume next

For each oSlide in activewindow.presentation.slides
     oSlide.NotesPage.Shapes("Rectangle 3").Delete
Next oSlide

End sub

 

2008/09/26 11:21 2008/09/26 11:21
TAG , ,
받은 트랙백이 없고, 댓글 하나가 달렸습니다.

댓글+트랙백 RSS :: http://clubkona.hosting.paran.com/rss/response/514

댓글+트랙백 ATOM :: http://clubkona.hosting.paran.com/atom/response/514

◀ 이전페이지 1 다음페이지 ▶