주어진 문자열을 한글자씩각 슬라이드에 가득차게 분할하는 매크로를 만들어보았습니다. 첨부파일 Alt-F11 눌러보면str="파워포인트지식인" 에서원하시는 문자열로 바꾸시고F5로 매크로 실행해보세요.- msoTextEffect10 값을 바꾸면 효과가 바뀝니다.- .Font.Color.RGB = rgbBlue ' rgb(255,125,255) 여기서 Font 색깔도 바꿀 수 있습니다.- 소스 아래쪽에 3차원 효과를 원하지 않으면 주석처리하세요.매크로는 아래와 같습니다. Sub 가득차게글자분할() Dim pres As Presentation Dim sld As Slide Dim shp As Shape Dim str As String, s As String Dim SW As Si..
꽉차게 검색 결과
해당 글 2건
각 슬라이드에 한글자씩 가득차게 분할 출력
PPT+VBA
2019. 7. 2. 10:13
파워포인트 여러 슬라이드 유인물 출력
This VBA convert slides to 3-Slides Handout. 관련 링크: https://kin.naver.com/qna/detail.nhn?d1id=1&dirId=102&docId=315605202#answer1 위 링크에 답변대로 3슬라이드를 오른쪽에 줄이 아니라 빈 여백을 두고 싶을 때 짝수 페이지마다 빈페이지를 삽입하고 6슬라이드씩 프린트하는 방법을 소개하였습니다. 그런데 질문자는 유인물 로 출력할 때 3슬라이드씩 프린트하려면 우측에 줄이 나오고 슬라이드가 작게 나오는데 좀더 슬라이드만 꽉 채워서 프린트하고 싶은 경우입니다. Alt-F8 로 매크로를 실행하면 아래처럼 16:9 세로로 된 3슬라이드가 한꺼번에 출력된 PPT가 생성됩니다. 구체적인 과정은 각 슬라이드를 PNG로 저장..
PPT+VBA
2018. 12. 2. 21:48
최근댓글