1.빠른 실행 이용 페이지 레이아웃 > 용지방향에서 세로나 가로를 우클릭하고 빠른 실행에 추가하세요.그 다음 빠른실행에서 5번째이면 Alt+5 를 누르면 아래처럼 빠르게 접근 가능합니다.2. 다른 방법으로 오피스 단축키 시퀀스를 하나의 단축키에 설정할 수 있는 아래 오토핫키 프로그램을 이용할 수 있습니다. 몇번 소개했지만 복잡한 단축키 시퀀스를 한 번에 실행할 수 있게 만든 프로그램입니다. https://konahn.tistory.com/entry/OfficeAutoHotKey 오피스 단축키 만들기파워포인트, 엑셀 등에서 Alt키를 누르고 일련의 키를 눌러서 단축키를 쓸 수 있습니다. 예를 들어, 선택된 도형내 텍스트의 가로 정렬을 왼쪽으로 하려면 'Alt+H'를 누르고 그 다음 'A,L'을 누르는..
Excel 검색 결과
첨부파일에서 마우스 우클릭을 하면 Get Gemini Selected 와 Get Gemini All 메뉴가 뜹니다. Get Gemini Selected 는 현재 선택된 셀들에 대해 구글 Gemini 에게 [B1]셀에 주어진 프롬프트를 이용해서 명령을 보내서 돌아온 다시 쓴 문장을 원래 셀 오른쪽에 가져옵니다. Get Gemini All 은 B열에서 B1을 제외한 모든 B:B셀의 문장에 대해 [B1]의 프롬프트 명령을 실행해서 답변 결과를 각 셀의 오른쪽에 가져옵니다. 먼저 구글 API가 필요합니다. API 키 가져오기 | Google AI Studio 위 사이트에 자신의 구글 계정으로 로그인해서 'API 키 만들기'를 클릭하여 API 키를 생성하고 복사합니다.AIza~로 시작하는 40자리 알파..
VBA 처리과정도 마우스로 슬라이드의 표(테이블)을 복사해서 엑셀 시트에 붙여넣는 것과 유사합니다. 테이블.Copy 해서 시트의 셀.Paste 하거나 시트.PasteSpecial로 붙여넣습니다. 테이블이 여러개 일텐데 아래와 같은 샘플을 만들었습니다. VBA코드: 더보기 'Copy the table content on each slide to Excel sheet Option Explicit Const TextOnly As Boolean = False Sub CopyTableToSheet() Dim xl As Object 'New Excel.Application Dim wb As Object 'Excel.Workbook Dim sht As Object 'Excel.Worksheet Dim rn..
참고: 지식인 질문글 화면 및 주요 코드: 실행 결과: 질문자가 원하는 결과 문자열이 JSON 문자열과 거의 흡사하기 때문에 VBAJSON 라이브러리를 활용하였습니다. 엑셀 데이터의 첫번째 행은 카테고리로 읽어들이고 나머지 행은 Dictionary 구조를 이용해서 데이터 구조를 만들어서 최종적으로 ConvertToJson 함수를 이용해서 items 배열(컬렉션)을 Json 문자열로 변환합니다. 원래 JSON데이터는 카테고리명의 양쪽에 따옴표가 있는데 삭제시켰습니다. 따옴표를 원래대로 놔두려면 해당 부분(따옴표를 제거하는 for 문 부분)을 주석처리하면 됩니다. 더보기 'Add Reference to Microsoft Scripting Runtime Library Sub Convert() Dim..
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 로 ..
최근댓글