첨부파일에서 마우스 우클릭을 하면 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입니다. 일단 아래 코드는 테스트를 위해 현재 워드 문서에 원하는 만큼의 빈 페이지를 추가하고각 페이지 상단에 페이지 번호를 추가합니다.Sub AddPagesAndPageNums() Dim i As Long Dim totalPages As Long Dim rng As Range ' 총 페이지 수를 100으로 설정 totalPages = 100 ' 문서에 페이지가 부족하면 추가 While ActiveDocument.ComputeStatistics(wdStatisticPages) 아래 코드는 현재 문서를 20페이지씩 분할하여 0001.docx, 0002.docx, 0..
VBA없이 자동으로 현재 시간을 계속 실시간으로 표시하는 방법입니다. 삽입 > 날짜 및 시간 에서 원하는 날짜 형식이나 시간을 선택하고반드시 '자동으로 업데이트'에 체크합니다. 그냥 삽입하면 바닥글에 삽입되는데 삽입된 바닥글을 중앙으로 끌어와도 됩니다. 그보다는 기존 텍스트 상자에 날짜/시간을 삽입하면위처럼 날짜와 시간 등 여러개의 자동 업데이트 되는 날짜/시간을 삽입할 수 있습니다. 슬라이드가 한 개이면 작동하지 않습니다.최소 4개이상, 추천은 5개에서 10개 정도 복제해서 추가하는 것이 좋습니다. 전환 메뉴에서 전환 시간을 0.25초나 0.10초 등으로 설정하세요.전환 효과를 적용하는 경우 기간을 0.25초 등 짧은 시간으로 적용하세요. 마지막으로 슬라이드 쇼 설정에서ESC를 누를 때까지 계속 실..
365 엑셀의 새기능인 셀안의 그림(PictureInCell) 기능입니다.마치 아래 한/글에서 그림을 글자 취급하는 것처럼엑셀 시트에서 그림을 셀안에 종속적으로 삽입할 수 있습니다.글자처럼 간주되어 정렬도 가능합니다. 우클릭해서 '셀 위에 놓기'를 선택해서 일반 그림으로 변경할 수도 있습니다. 반대로 일반 그림을 '셀에 배치'를 선택해서 '셀안의그림'으로 바꿀 수도 있습니다. 셀에서 사용자 함수인 Image 를 이용할 수 있습니다.=IMAGE(source, [alt_text], [sizing], [height], [width]) 세번째 인수:0 이미지를 셀에 맞추고 가로 세로 비율을 유지합니다. 1 셀을 이미지로 채우고 가로 세로 비율을 무시합니다. 2 셀 경계를 초과할 수..
지난 번에 실시간으로 D-Day를 표시하는 것과 비슷한 '남은 시간 카운터'입니다.새로운 해가 가까이 다가오는 이 시점에서 새해맞이 카운터를 만들었습니다.요즘 같은 시기 다른 이벤트가 있을 때도 타이머를 만들 때 유용하겠습니다. 1슬라이드에는 Timer 와 Clock 이라는 텍스트상자를 삽입합니다.도형 이름으로 도형을 찾아가기 때문에 Alt+F10 창에서 도형 이름을 정확히 입력해야 합니다. VBA코드를 Module1에 넣습니다. 더보기Option Explicit#If VBA7 Then Declare PtrSafe Function SetTimer Lib "user32" (ByVal hwnd As LongPtr, ByVal nIDEvent As LongPtr, _ ByVal uElaps..
Dictionary 를 이용해서 단어의 빈도수 통계를 내볼 수 있습니다.Sheet1 에 아래와 같이 텍스트가 들어 있습니다.Alt+F8로 CountWords 매크로를 실행하면 아래처럼 각 단어의 빈도수를 Sheet2 에 알려줍니다.코드는 아래와 같습니다.Alt+F11 창 도구 > 참조에서 Microsoft SCripting Runtime 라이브러리를 체크해주세요.더보기Option ExplicitSub CountWords() Dim sht1 As Worksheet, sht2 As Worksheet Dim rng As Range '도구-참조에서 Microsoft Scripting Runtime 체크 필수 Dim d As Dictionary 'Dim d as Object ..
도형이 회전하면서 뒤에 있는 내용이 나오게 하려면 3D기능을 이용해야 해서 어렵습니다.https://kin.naver.com/qna/detail.naver?d1id=1&dirId=102020103&docId=469885854 PPT 도형 양면 만드는법도형의 한면에 글자가 있고 도형이 회전해서 도형의 뒷면이 보일때 다른 글자가 보이게 하고 싶습니다 그렇게 만드는법 최대한 자세히 알려주세요kin.naver.com 간단히 1번 박스도형을 클릭하면회전하면서 사라지고 밑에 있는 도형이 나타나게 하는 것이 수월합니다.그 때 아래처럼 박스도형에 사라지기 효과 중 기본 회전 효과를 주고 '트리거'를 자기 자신 1번 도형(Box_1_1_1)에 적용하면 됩니다. 다른 네모 도형에는 애니메이션 복사 버튼을 더블 클릭하고 ..
최근댓글