지난번에 이어 이번에는 '코끼리'에 관한 Bomb Game을 만들어 보았습니다. 이번 기회에 인공지능 구글 Gemini 를 활용해서 퀴즈 문제를 생성/추출하고 엑셀파일과 PPTM 자동 매크로를 활용해서 손쉽게 Bomb Game 을 대량으로 제작하는 과정을 상세히 소개합니다. 1. 먼저 구글 Gemini 에게 문제를 출제해달라고 요청합니다. 처음 사용한 프롬프트는 아래와 같습니다.코끼리에 대한 특이한 사실에 대한 퀴즈문항을 30문제 만들려고 해 사람들이 믿지 못하거나 몰랐을, 아주 특이하고 깜짝 놀랄만한 사실에 대한 퀴즈를 내줘. 퀴즈 종류는 OX퀴즈, 빈칸넣기, 주관식, 다른관련동물문제로 균등하게 출제해줘. 출력은 'No, 항목, 문제, 정답, 해설' 로 텍스트파일형식의 CSV형태로 출력해줘, 긴..

파워포인트에서 특정 도형모양을 계속 그리고 싶을 때 도형아이콘을 더블 클릭하면 계속 그릴 수 있습니다.그런데 연속적으로 그릴 때는 상관이 없지만 다른 작업을 하다가 혹은 다른 도형을 그리다가 특정 도형모양을 바로 그리고 싶을 때는 방법이 없습니다. 예를 들어 자유형: 도형을 자주 쓰고 싶다면 삽입 > 도형 누르고 선 종류에서 자유형 도형 아이콘을 마우스로 선택해야 합니다. 단축키로는 상당히 어렵습니다. Alt+n을 누르고 s, h 도형을 선택하면 도형 모양들이 뜹니다. 그 다음은 따로 단축키가 없어서 방향키를 여러번 눌러야 합니다. 게다가 마지막 자유형 도형 아이콘에서 엔터를 치면 시작점을 찍을 수 있게 되는 것이 아니라 화면에 대각선 하나만 삽입되고 위치를 지정할 수도 없습니다. 이 때는 Auto..

먼저 직사각형 위에 부채꼴을 추가해서 캡슐 절반의 단면을 완성합니다. 핵심 원리는 위와 같은 도형아래에 원을 그리고 FollowMe 기능을 이용합니다. 원을 따라 기존 도형이 회전하게 됩니다. 두께가 있고 속이 비어 있다면 아래처럼 원래 도형을 복제해 10%쯤 크기를 줄이고안쪽을 삭제하고 나서 FollowMe 기능을 적용합니다. 알파벳 J 글자 모양의 도형을 Follow Me 기능으로 회전시키는 것입니다. 아래와 같이 속이 빈 총알 머리 모양도형이 완성됩니다. 하나 더 복제하고 크기를 10%키우고 아래에 배치합니다. 3D Builder에서 색을 바꾸거나 회전, 크기를 바꿀 수도 있고 다른 3MF 등의 형식으로 변환할 수 있습니다.애니메이션 적용 화면: 온라인에서 캡슐모양 3D모델을 다운로드할 ..

원래는 슬라이드를 한꺼번에 다른 프레젠테이션 파일에 붙여넣으면하이퍼링크가 다시 계산되어 링크 페이지가 업데이트됩니다.​하지만 목차 슬라이드만 다른 프레젠테이션에 붙여넣거나링크로 이동되는 슬라이드만 다른 프레젠테이션에 삽입하는 경우 등은링크 페이지가 업데이트될 수 없습니다.​또한 하이퍼링크가 특정 슬라이드 페이지가 아니라 슬라이드 이름으로 링크된 경우도자동으로 업데이트가 안될 수 있습니다.​이렇게 슬라이드 링크 페이지에 오차가 발생했을 때 몇페이지 앞으로 당기거나 뒤로 밀려면VBA로 일괄로 링크 페이지를 +/- 증감시켜줄 수 있습니다.​첨부파일을 다운로드해서 파일 속성에서 '차단해제' 후 매크로 허용해서 열거나 현재 프레젠테이션에서 Alt+ F11 누르고 창이 뜨면 삽입 > 모듈을 추가한 뒤에 아래 코드를..

셀에 특정 색상을 적용해 놓고지정한 색상의 값들만 합산하고 싶을 때 사용할 수 있는 사용자 함수입니다. VBA로 주어진 색상이 칠해진 셀들의 합을 구하는 사용자 함수를 만들어 사용할 수 있습니다.=SumColor(범위, 기준색상셀) 형식입니다.=SumColor(A2:B20, F2) 라면 A2:B20 범위에서 F2의 배경색상과 같은 셀의 숫자를 모두 합한 결과를 출력합니다. Function SumColor(Rng As Range, cRng As Range) As Long Dim r As Range For Each r In Rng If r.Interior.Color = cRng.Interior.Color Then If IsNumeric(r.Value) ..

지난번 Bomb24 생성기를 바탕으로 만든, 태양계에서 지구와 가장 가까운 붉은 행성 화성에 대한 Bomb Game형식의 OX퀴즈 샘플입니다. 총 20문제입니다.각 번호 뒤에 문제에 대한 힌트를 담은 사진을 보고 문제를 추측해서 번호를 누릅니다. 문제를 누르면 O 혹은 X와 해설이 나타납니다. 오른쪽 상단 Home 버튼을 누르면 다시 번호 화면으로 돌아갑니다.한 번 누른 번호는 사라집니다.(이것이 Bomb Game이지요) 문제는 구글 Gemini 에게 출제해서 CSV로 출력해 달라고 했습니다.아래처럼 엑셀 파일로 저장해서 문제를 생성하도록 했습니다. 실행화면: 번호 도형생성, 엑셀에서 문제 슬라이드 생성, 하이퍼링크, 트리거 애니메이션 등의 과정은 VBA를 이용해서 자동화해서 만들었습니다. 1..

=Now 수식은 파일을 열 때마다, 계산이 발생할 때마다 현재시간으로 달라지게 됩니다.변하지 않는 셀값으로 넣으면서 초단위까지 서식을 지정하려면 아래와 같은 VBA로 가능합니다. Sub insertCurrentTime() With ActiveCell '.NumberFormat = "h:mm:ss AM/PM" .NumberFormat = "hh:mm:ss" .Value = Format(Now, "hh:mm:ss") '.Columns.AutoFit '셀 넓이 자동 조절 End With End Sub빠른 실행에 추가하고 Alt+숫자키로 실행할 수 있습니다.단, 엑셀 매크로 파일이 열려 있어야 합니다. 항상 실행하고 싶다면 추가기능으로 만들거나A..

모바일 다음에서 뉴스기사를 검색하면 아래와 같은 URL로 접속됩니다.https://m.search.daum.net/search?w=news&q=인공지능최대한 간단히 줄인 주소입니다.PC웹에서 검색해도 비슷한데 효율성을 위해서 모바일 검색을 기준으로 알아봅니다. 다음에서 검색에 대한 API를 제공하지만 신문사를 조건으로 검색하는 등의 상세한 기능은 지원하지 않아 Http문서를 크롤링하는 방법을 이용합니다. 검색 결과 형태는 아래와 같습니다. HTML 구조를 살펴보면 아래와 같습니다.주황색 네모 영역이 기사제목이고 파란색 네모가 제목내용이 들어 있는 태그입니다. 태그의 여러 정보를 가져올 때 GetElementsByClassName 이나 GetElementsById 등을 이용할 수 있는데여기서는 Query..