1. 개발도구 > 추가기능에서 Web 으로 검색해서 Web Viewer 추가기능을 추가합니다.2. 추가된 Web Viewer 추가기능을 클릭하여 슬라이드에 추가하고 크기를 조절합니다.3. 웹브라우저에서 구글 스트리트 뷰에서 점 세 개를 누르고 이미지 공유 또는 삽입 을 누르고지도 퍼가기 주소를 복사합니다.복사한 주소에서 www.google.com/maps 부터 따옴표 전까지 복사해서Web Viewer 주소에 붙여 넣습니다. 반드시 https:// 는 생략해야함에 유의하세요.www.google.com/maps/embed?pb=!4v1728815825435!6m8!1m7!1snvekigVIih0Czwl2yv3ozg!2m2!1d37.57485888109894!2d126.9771074238897!3f321..
전체 글 검색 결과
워드 문서의 1페이지마다 사진(또는 사진 설명 포함)을 하나씩 일괄로 삽입하는 방법입니다. 매크로 안쓰는 방법1. 파워포인트에서 삽입 > 사진 앨범 기능으로 사진 100장 일괄 삽입2. 다른이름으로 저장이나 내보내기에서 PDF로 저장3. MS워드에서 PDF파일 불러오기 > 자동 변환또는 아래와 같은 VBA를 이용할 수 있습니다. ChatGPT코드를 활용하였으나 오류가 다수 발생하여 대폭 수정하였습니다. 더보기Option ExplicitSub InsertImagesCenteredOnEachPage() Dim imgFolder As String Dim imgFile As String Dim imgPath As String, sExt As String Dim doc As..
위처럼 의료기기를 검색하는 사이트( https://emedi.mfds.go.kr/portal )의 검색결과를 엑셀로 가져오는 예시입니다. 여러가지 항목으로 검색할 수 있는데일단 명칭(query2)과 업체명(entpName) 으로 검색하는 예시 파일을 만들어 보았습니다. 첨부파일 매크로 허용해서 열고명칭이나 업체명을 입력하고 시작페이지 ~ 마지막 페이지를 입력하고마우스 우클릭해서 getMed 를 실행합니다.위와 같이 화면입니다.내부적으로 xmlHttp를 이용해서https://emedi.mfds.go.kr/search/data/list?chkList=1&nowPageNum=1&tabGubun=1&query2=브러쉬&entpName=신원&chkGroup=GROUP_BY_FIELD_01&pageNum=1&se..
'철수와 영희가 같이 있다'에서 '철수'만 애니메이션을 적용하려면해당 부분만 따로 텍스트 상자를 만들어야 합니다.그런데 따로 텍스트상자로 복사해서 위치를 맞추고 편집하는 것이 매우 귀찮은 작업입니다.이런 경우 아래 VBA를 이용하면 빈칸을 기준으로 텍스트를 분리해서자동으로 단어마다 텍스트 상자를 만들어줄 수 있습니다.alt+F11 창에서 삽입 > 모듈 추가한 후에 아래 코드를 붙여넣습니다.그리고 코드 창을 닫고 원하는 텍스트 상자나 도형을 선택한 상태에서 Alt+F8을 누르고 매크로를 실행하면 되됩니다.더보기Option Explicit'Const SplitChar = "/"Const SplitChar = " "Sub SplitCurrentTextframe() Dim shp As Shape, ..
VBA를 이용해서 위와 같은 애니메이션 점수판을 자동 생성합니다. 작동화면입니다. 애니메이션 창을 켜놓아서 영상 뒷부분은 버벅입니다. 점수판을 생성하고 싶다면 첨부파일을 차단해제하고 매크로 허용해서 열고새 슬라이드에서 Alt+F8 로 Auto 매크로를 실행합니다. 그러면 팀의 개수와 최고 점수를 묻는데 5, 10 을 입력하면 5팀 10점짜리 점수판이 생성됩니다.2,15 라든가 4, 5 혹은 10, 5 등 원하는대로 팀의 개수와 최고 점수를 입력할 수 있습니다. 가장 큰 특징은 아래처럼 모든 기능이 VBA가 필요 없이 애니메이션으로 구동한다는 점입니다.애니메이션으로 직접 만드는 방법은 지식인 링크를 참고하세요.투명도형과 약간 복잡한 트리거 애니메이션을 이용하였습니다.최종 결과물은 매크로를 제외하고 p..
데이터를 타이핑하는 대신 간단히 옵션을 클릭해서 선택해서 입력하고 싶다면엑셀로 하는 것이 간편하고 효율적입니다.'과일' 이름이 들어갈 셀을 선택하고 나서데이터 > 데이터 유효성검사를 누르고 원본에 '사과,배,딸기,바나나'를 입력하면 됩니다.원본란에 시트의 특정 셀 영역을 선택해도 됩니다.◆ ◆ ◆ ◆ ◆파워포인트에서 VBA를 활용해야 합니다.ListBox 나 ComBoBox를 이용해서 목록을 선택하게 할 수 있습니다.그런데 파워포인트 Active-X 선택상자는 슬라이드쇼에서만 작동하고슬라이드쇼를 새로 시작하면 목록이 초기화되어 버리며또한 선택한 값이 양식상자안에 들어 있어서 값을 가져오기도 어렵습니다.양식상자에서 선택한 값을 표에 남겨놓는 방법을 써야 합니다.ComboBox 와 SpinButt..
파워포인트에서 글머리기호 숫자를 적용하고 나면시작하는 글자가 Bold체이면 글머리기호 숫자도 따라서 Bold로 변해 버립니다. 글머리 문단 시작글자를 진하게 설정하면 글머리 숫자는일반 굵기의 글자로 변경이 안된다는 불편한 점이 있습니다. 이 때 시작 글자 앞에 보이지 않는 '넓이 없는 유령문자'인 유니코드 '200B'글자를 삽입하고Bold 속성을 해제하는 방법이 있습니다. 글머리 기호 다음 위치에서 삽입 >기호를 누르고유니코드로 문자코드를 200b 를 입력하고 '삽입'하시면 이 넓이 없는 유령문자를 넣을 수 있습니다.그리고 나서 이 유령문자에 Ctrl+B 로 볼드체를 해제해 주시면 파워포인트를 속일 수 있습니다.텍스트 상자가 많다면 아래 VBA를 이용하시면 일괄로 모든 글머리 번호 시작위치에 볼드체가..
Click the Dice를 누릅니다.그러면 랜덤으로 3D 주사위가 뜨면서 주사위 눈이 나타납니다.또한 횟수와 각 눈별 누적 개수를 차트로 보여줍니다. 아래와 같은 스타일의 차트도 가능합니다. 아래와 같은 스타일의 차트도 가능합니다. ReStart 를 누르면 차트 누적 데이터를 초기화하고 첫 슬라이드로 다시 시작합니다. 실행화면: 사용 코드:더보기Option ExplicitDim dRound As Integer '회차Const Stage = 2 '무대는 3슬라이드Sub ReStart() Reset SlideShowWindows(1).View.GotoSlide 1, msoTrueEnd SubSub Roll() Dim i As Integer Dim r As..
최근댓글