제목대로네이버 파워링크와 블로그 검색결과를 엑셀로 정리해주는 매크로 프로그램입니다. 지식인 질문 링크:https://kin.naver.com/qna/detail.nhn?d1id=1&dirId=102&docId=307239121&page=1#answer1 1.파워링크 검색: 위와 같은 파워링크 검색 결과를 아래처럼 엑셀 시트에 가져옵니다. 파워링크는 한페이지가 25개인데 더 있을 경우 제한 검색건수를 입력한 만큼 검색합니다.파워링크는 블로그와 달리 페이지단위로 마지막 페이지까지 검색합니다. 조회 URL: https://ad.search.naver.com/search.naver?where=ad&query=검색어검색어는 한글도 검색되도록 URLEncode 했습니다. 2. 블로그 검색: 블로그 검색결과를 아래 ..
분류 전체보기 검색 결과
단어 리스트에 대해 실시간으로 네이버사전을 검색해서 첫번째 뜻과 예문 등을 가져오고 또한 해당 단어 발음(첫번째 미국식)을 Mp3폴더에 자동으로 다운 받는 매크로입니다. 사용법: 첨부파일을 다운받고 매크로 컨텐츠를 허용합니다. 2행부터는 삭제해도 됩니다. B열에 Word 아래에 단어목록을 적습니다. 많이 적을 수록 검색 시간이 길어집니다. 좌측 상단 '검색' 버튼을 누르면 위 화면과 같이 네이버 영어사전에서 단어를 검색합니다. Mp3폴더 아래에 단어명.mp3 파일을 다운로드합니다. (매크로 파일이 있는 폴더에 Mp3폴더가 미리 있어야 합니다.) 1.각 단어에는 해당단어에 대한 네이버사전으로 하이퍼링크가 추가됩니다. 자세히 알고 싶을 때 클릭하면 브라우져 창이 열립니다. 2. 발음기호를 클릭하면 다운 받은..
아래처럼 휠 다이아그램 혹은 사이퍼 디스크 모양을 ppt에서 만들어 보겠습니다. 원 출처는 아래 지식인 질문입니다. https://kin.naver.com/qna/detail.nhn?d1id=1&dirId=102&docId=303978262 다른 분께서 도너츠모양 챠트를 이용한 방법을 답변해주셨습니다.https://blog.naver.com/lemon-butter/221303482267 저는 VBA를 이용해서 만드는 방법을 소개합니다. 원래 Jobs라는 추가기능으로 만들어뒀던 매크로를 약간 수정했습니다. 먼저 첨부파일을 다운로드하여 열어주세요. 매크로 컨텐츠는 반드시 허용해야 합니다. 1. 빈슬라이드를 만들고Alt-F8이나 개발도구-매크로를 눌러서AddBlockArc1() 을 실행합니다.알파벳도 자동으로..
구글API나 MS API를 이용할 수 있겠으나 따로 승인절차가 있어서 여기서는 간단히 구글번역사이트의 결과HTML을 파싱하여 슬라이드를 번역하도록 해봤습니다. 사용법은 먼저 좌측 미리보기 창에서 원하는 슬라이드들을 모두 선택하고 나서 Alt-F8 이나 개발도구-매크로에서 TranslateSlides 매크로를 실행시키면 됩니다. 첨부파일을 열고 Alt-F11 로 열어보면 모듈에 매크로 소스가 있습니다. 여러 슬라이드 보기 상태에서도 똑같이 실행할 수 있습니다. 참고로 중국어, 러시아어, 아랍어 등을 시험삼아 넣어 봤습니다. 슬라이드가 많을 경우를 대비하여 진행상황을 알 수 있게 작업진행창(프로그레스바)를 넣었습니다. 작업결과입니다. 번역이 부드럽진 않지만 자동으로 번역이 되었습니다. MS자체 번역기능이나 ..
전시회나 작품 발표회 때 컴퓨터로 방명록을 작성하는 경우를 위한 자동화도구입니다. 방명록 입력은 파워포인트를 이용하고 방명록 데이터는 엑셀 파일에 저장합니다. (아이콘은 Flaticon.com 에서 받았습니다.) 성명은 필수이고이메일은 @를 검사하고연락처는 처음 두글자가 숫자인지 검사합니다. 원래 파워포인트 TextBox 에는 SetFocus 가 작동하지 않지만Shyam Pillai 님의 소스를 활용해서 작동하도록 했습니다. ( Textbox Setfocus function is made by Shyam Pillai - Shyam@Mvps.Org http://skp.mvps.org ) 저장은 방명록.xlsx 파일에2번째 줄부터 성명, 이메일, 전화, 메모, 작성 시간 순으로 저장이 됩니다.기존 자료에 추..
VBA로 네이버 오늘의 단어 가져오기 URL: http://m.wordbook.naver.com/endic/today/recite.nhn?targetDate=2018.04.09기능: 시트이름이 Daily, Monthly, Weekly 로 시작하면 각각 날짜별, 달별, 일주일별 오늘의 단어 5개씩을 가져옴사용 개체: WinhttpRequest, HTMLDocument, IHTMLElementCollection 등을 이용함.HTML을 파싱할 때 Split, Instr 을 이용하지 않고 GetElementBYTagName 을 이용함. 사용방법:매크로를 허용하고 연 다음왼쪽 상단 '날짜선택'을 누르고 대상 날짜를 입력.오늘 날짜가 자동으로 뜸.현재 선택된 시트이름이 Daily, Weekly, Monthly 로 ..
노트북 WIFI 제한된 액세스 문제 해결무선연결을 여러번 시도해야 접속되고자주 제한된 액세스가 뜨는 현상이 있었는데아래 글을 참고하여 조치하니 한번에 연결이 되었다.https://answers.microsoft.com/ko-kr/ie/forum/ie_other-windows_7/%EB%85%B8%ED%8A%B8%EB%B6%81/af1e497c-967b-4523-97f2-18d18be112bd 최소한 이 컴퓨터에서는 해결이 되어 정보삼아 올림. 1. 무선 네트워크 속성에서IPv6 에 체크 해제후 확인, 재부팅 IPv4 만 사용하기 때문에 IPv6은 사용할 일이 없으므로 해제해도 무방함. 유선 로컬연결도 IPv6을 해제해 놓을 수 있다. 2. 어떤 경우는 아래 명령으로 해결한 분도 있음. 시작 -> cmd ..
https://kin.naver.com/qna/detail.nhn?d1id=1&dirId=1020201&docId=289781472&ref=me2lnk 이 질문 글에서 내용이 긴 경우 중간에 멈춘다는 분이 있어서VBA로 텍스트를 불러와서 글자가 위로 올라가는 애니메이션을 추가해주는 매크로를 만들었습니다. 이런 화면에서 Add 를 눌러서 텍스트파일을 선택하면스크롤 효과를 추가하는 방식입니다. 기존 효과는 자동으로 없애기 때문에 Remove는 따로 누를 필요 없습니다.기존에 있던 애니메이션 효과 도형을 수동으로 없애는 기능입니다. Option : Automatic/ Manual Advance 는 자동으로 혹은 수동으로 스크롤하는 옵션입니다. 슬라이드 화면입니다. 세가지 버전을 만들었습니다. FadingSen..
최근댓글