관련: 지식인 현재 파워포인트 365 구독버전만 도형의 잠금기능을 지원합니다. 비슷한 효과를 VBA로 구현할 수 있습니다. 구현 원리는 현재 선택한 도형을 슬라이드 마스터 레이아웃으로 복사해서 보내고 현재 도형은 숨김 처리함으로써 현재 슬라이드에는 현재 도형이 슬라이드마스터 레이아웃을 통해 보이면서 선택이나 편집을 할 수 없게 만듭니다. ==> 관련 지식인 답변 파워포인트에 오브젝트 락걸기 단축키 있나요? 파워포인트에 오브젝트 락걸기 단축키 있나요? 고수님들 답변주세요~~ㅠ kin.naver.com 그런데 VBA는 매크로를 허용해야 하고 단축키를 지정하는 것도 Alt+숫자키를 사용해야 하는 불편함이 있습니다. 그래서 이 기능을 AutoHotkey로 변환해서 만들어보았습니다. VBA와 달리 실행파일만 실행..

참고: 지식인 선택한 셀에 일정 여백을 두고 그림을 빠르게 삽입할 수 있게 AutoHotKey로 만들어 보았습니다. 여백은 exe 파일명 _뒤에 숫자를 넣어주면 됩니다. XLinsertPicture_5.exe 이면 여백을 5px 둡니다. _이 없으면 기본 여백 5를 두고 삽입하고 XLinsertPicture_0.exe 이면 여백 없이 삽입하겠습니다. 첨부한 exe 파일(XLInsertPicture_5.exe )을 실행하고 엑셀 셀에서 F3을 누르면 여백 5px을 남기고 현재 셀에 선택한 그림파일을 정확히 삽입해줍니다. 해당 셀의 기존 그림은 삭제합니다. 그림도형의 이름은 파일명으로 지정합니다. 그림 폴더는 엑셀파일이 있는 폴더에서 시작하고 한 번 선택하면 해당 폴더에서 시작합니다. 실행화면입니다. 실행화..

관련: 지식인1, 지식인2, 지식인3 위 그림처럼 파워포인트에서 선택한 도형들을 위아래로 붙이거나 혹은 좌우로 붙이는 기능을 원하는 경우입니다. 도형이 많을 때는 가이드선에 맞춰서 도형을 정확히 붙이는 것이 힘들 수 있습니다. 자동으로 도형을 정렬하려면 . . . 1. 아래와 같은 VBA를 이용하시면 되겠습니다. Sub attach_가로() With ActiveWindow.Selection.ShapeRange For i = 2 To .Count .Item(i).Left = .Item(i - 1).Left + .Item(i - 1).Width '.Item(i).Top = .Item(i - 1).Top Next i End With End Sub Sub attach_세로() With ActiveWindow.S..

관련: 지식인 두 개의 도형간의 거리를 복사해서 다른 도형도 같은 거리로 만들고 싶다는 질문입니다. 크기가 같은 도형인지, 가로간격/세로간격 등 어떤 간격을 말씀하시는지 등 더 구체적인 조건은 명시하지 않았는데 어쨋든 방법을 찾아보았습니다. ​ ​ 기본 기능으로는 스마트 가이드를 켜고 A와 B도형 위치로 일단 C와 D를 옮겼다가 다시 원래 위치쪽으로 가져가는 방법을 써야겠습니다. ​ ​ 자주 써야 하는 기능이라면 아래와 같은 VBA를 이용할 수 있습니다. ​ Alt-F11 창에서 삽입 > 모듈 추가후 코드를 넣고 기준이 되는 두 도형을 선택하고 getDistance 를 실행해서 가로와 세로 간격을 구하고 나서 ​ 다시 새로운 C와 D도형을 선택하고 MatchDistace 를 실행하면 기억해둔 가로 간격과..

관련: 지식인 아래아한글로 문서작업할 때 Shift+Tab 기능을 통해 현재 커서위치를 다음 줄부터 내어쓰기 위치로 지정해줍니다. 파워포인트에서는 지원하지 않는 단축키 기능입니다. 들여쓰기(내어쓰기)할 위치를 프로그램에 알려줘야 하는데요. 단락 서식에서 사용자가 직접 숫자로 입력하거나 화면에서 마우스로 표시를 해줘야합니다. ​ 빠르게 마우스로 위치를 표시하려면 보기메뉴 > '눈금자'를 체크해서 켜세요. ​ 그러면 눈금자 왼쪽에 모래시계모양 돌출된 마커가 있습니다. 맨아래 3번 네모는 전체단락 들여쓰기, 2번 아래 세모는 전체 들여쓰기와 동시에 첫줄은 내어쓰기 적용(2,3번은 항상 동시에 이동), 1번 세모는 첫줄만 들여쓰기입니다. ​ 이제 모래시계 아래 부분 2번 세모 눈금표시를 (2번째줄부터) 들여쓰기..

어떤 윈도우 화면이든 마우스 우클릭과 드래그로 화면창을 스크롤할 수 있는 오토핫키 스크립트가 있습니다. https://github.com/mmikeww/DragToScroll 위 파일을 실행하고 파워포인트나 웹브라우저에서 화면을 확대한 상태에서 마우스 우클릭하면 드래그하면 화면이 스크롤 됩니다. 시스템 트레이창에서 종료하거나 설정을 바꿀 수 있습니다. 특히 파워포인트 화면을 확대한 후 포토샵처럼 스페이스 누른 채로 마우스를 드래그해서 화면을 옮겨다닐 수 있으면 좋을겁니다. 예전에 추가기능이 있었던 것 같은데 찾을 수가 없네요. 간단히 오토핫키로 w,a,s,d키로 확대횐 슬라이드 편집화면을 스크롤할 수 있게 만들어 보았습니다. 어떤 도형이나 개체를 삽입했든 해당 단축키를 누르면 화면이 스크롤됩니다. #No..

슬라이드쇼 도중 단축키로 원하는 프로그램을 실행하거나 원하는 파일을 여는 방법입니다.​ 아래는 AutoHotKey로 키를 누르면 바탕화면의 msgbox.pyw 를 실행하는 예시입니다. ​ 첨부파일 Run_F3.exe 를 Run_F4.exe로 바꾸면 단축키는 F4가 됩니다. 특수키 등의 단축키 형식은 링크를 참고하세요. ​ Run_F3.exe를 실행하면 아래처럼 F3단축키가 눌렸을 때 실행할 대상을 지정하고 Get Ready버튼을 누르면 단축키를 기다리게 됩니다. Get Ready를 누르면 오토핫키프로그램은 시스템 트레이로 가게 됩니다. ​ 이제 슬라이드 쇼 도중 F3을 누르면 위에서 지정한 바탕화면의 msgbox.pyw 가 실행됩니다. .py대신 .pyw 확장자는 콘솔창 없이 파이썬코드를 실행합니다. ​..

원래는 VBA에서 아래와 같은 명령으로 선택된 도형의 폰트 윤곽선을 없앨 수 있습니다. ActiveWindow.Selection.ShapeRange.TextFrame2.TextRange.Font.Line.Visible = msoFalse 하지만 VBA 버그인지(?) 작동하지 않습니다. Line.Visible = msoTrue 는 작동하지만 Line.Visible = msoFalse 는 작동하지 않습니다. 엑셀에서 매크로 녹화를 해도 위와 같은 코드가 나오지만 실행하면 적용이 되지 않습니다. 직접 도형이나 텍스트를 선택하고 윤곽선 '없음'을 선택하면 적용이 됩니다. ​ VBA에서 처리하려면 임의의 텍스트 상자를 만들고 텍스트를 거기에 붙여넣고 다시 원래 도형에 붙여넣는 식의 작업을 해야합니다. 텍스트의 다..