관련: 지식인 현재 파워포인트 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. 셀들을 먼저 모두 선택한 상태에서 '테두리 없음'을 선택하고 테두리 > '안쪽 세로 테두리'를 클릭해서 '테두리 없음'속성을 선택된 셀들에 적용 그런데 여기서 주의할 것은 만약 오른쪽 병합된 셀에서 테두리선 스타일이 '테두리 없음'이 선택된 상태에서 '오른쪽 테두리'를 선택하면 오른쪽 테두리가 '테두리 없음'으로 설정됩니다. 아이콘만 보고서 왼쪽 테두리를 누르면 왼쪽 테두리가 없어지게 됩니다. 현재 선택된 테두리 속성이 선택한 테두리영역에 적용됨을 유의해야 합니다. 4. 점선이나 다른 선 굵기나 선 색상을 적용할 때 셀들..
관련: 지식인 파워포인트에는 표를 자동으로 잘라주는 기능을 지원하지는 않습니다. 텍스트 상자의 경우 2페이지로 나눠주는 기능이 MS에서 시험중인 걸로 압니다. 텍스트상자를 자동으로 자르는 것은 지난 게시글을 참고하세요. 또한 표를 ListBox로 변환하거나 웹페이지 ScrollArea로 만들어서 Web Viewer로 스크롤할 수 있게 만드는 방법도 있습니다. 여기서는 세로로 긴 표(테이블)을 아래와 같은 vba를 이용해서 자동으로 페이지별로 나눠주는 방법을 소개합니다. aLT-f11 창에서 삽입>모듈을 추가한 후에 아래 코드를 붙여넣고 코드창을 닫은 다음 표를 선택하고 aLT-f8 누르고 SplitTable 을 실행하세요. 더보기 Option Explicit Dim TableTop As Single ..
관련: 지식인 1. 랜덤 슬라이드로 이동하게 하려면 VBA를 이용하는 것이 효과적입니다. 1-1. 아래와 같이 구역별로 문제나 제시어를 넣어둡니다. 1-2. 첫번째 차례 슬라이드에 구역 이름이 적힌 도형을 배치하여 선택하게 합니다. 구역도형내의 텍스트와 '구역이름'이 정확히 일치해야 합니다. 첫번째 도형 텍스트가 '동물'이라면 구역 중의 하나의 이름이 '동물'이어야 합니다. 1-3. Alt-F11 창에 삽입 > 모듈을 하나 추가하고 아래 코드를 붙여넣고 창을 닫습니다. 더보기 Option Explicit Dim sPos() As Long Dim sCount As Integer Dim sOrder() As New Collection Dim sName() As String Sub onSlideShowPa..
관련: 지식인 https://konahn.tistory.com/entry/MergePPT PPT 합치기 PPT를 합치는 방법은 다양한 방법이 있습니다. https://kin.naver.com/qna/detail.naver?d1id=1&dirId=102020103&docId=430910486&sc%20https://kin.naver.com/qna/detail.naver?d1id=1&dirId=102020103&docId=430910486&scrollTo=answer1 VBA로 파일이 konahn.tistory.com 이전 글에서 PPT파일을 합치는 방법을 안내한 적이 있습니다. PPT파일이 합쳐지는 순서를 마음대로 변경하고 싶을 때, PPT파일 내부의 일부 슬라이드만 골라서 합치고 싶을 때, PPT파일의 ..
관련: 지식인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..
관련: 지식인 상황이나 도형의 형태에 따라 다르겠지만 점과 점 사이의 평행을 맞추기가 쉽지 않은 경우 점편집보다는 기존 도형에서 임의의 사각형 도형을 도형병합(빼기)로 빼는 방법을 추천합니다. 다른 방법으로는 VBA를 이용해서 정확한 수치로 좌표를 이전 노드 혹은 다음 노드의 좌표와 일치시킬 수 있습니다. 아래와 같은 사각형(Freeform)이 있을 때 노드는 총 5개로 구성됩니다. 시작 노드와 마지막 노드는 같아야 닫힌 도형이 됩니다. 노드의 x,y 좌표는 슬라이드 크기 px값으로 나타냅니다. 아래의 경우 720 * 405입니다. printXY매크로를 실행해서 각 노드의 구성을 살펴볼 수 있습니다. (참고: 이 경우는 직선 도형인 경우로 꼭지점 개수 +1 개의 노드가 존재하지만 만약 곡선이 ..
최근댓글