관련: 지식인 스핀버튼을 넣어서 누를 때마다 개수가 반영되어 계산되게 해보았습니다. ​ 아래와 같은 코드가 Slide1에 사용되었습니다. Function getCell(r As Integer, c As Integer) As TextRange Dim sld As Slide Dim shp As Shape Set sld = Slide1 Set shp = sld.Shapes("표 1") Set getCell = shp.Table.Cell(r, c).Shape.TextFrame.TextRange End Function Function doCalc() getCell(5, 2) = Format(Val(getCell(4, 2)) + Val(getCell(4, 3)) + Val(getCell(4, 4)), "###,##..

"세 살 버릇 여든까지 간다"라는 속담처럼 초보시절 코딩 습관이 경력직이 될 때까지 이어질 수 있습니다. 사소한 습관 하나가 크나큰 버그를 초래할 수도 있고 작은 습관이 치명적 에러를 피할 수 있게 해줄 수도 있습니다. Alt-F11 코드창에 VBA코드를 작성할 때 주의할 사항 혹은 지키면 좋은 습관 몇가지를 생각나는대로 모아봤습니다. 1. Option Explicit 항상 이거 맨 처음에 써주세요. 안써도 되지만 오타방지해줍니다. Explicit는 '명시적인'이라는 뜻인데 미리 Dim i as Integer 라고 명시적으로 선언하고 쓰겠다는 뜻입니다. 미리 선언하지 않은 변수는 실행시 에러를 출력하기 때문에 오타를 찾아내주고 항상 미리 변수 선언하는 (초보자로서) 좋은 습관을 길러줍니다. 또한 미리 변..

VBA나 어떤 프로그래밍 언어를 배우고자 하는 분들에게 해주고 싶은 이야기가 있습니다. 바로 누군가로 하여금 배(boat)를 만들게 하고 싶다면 배 만드는 방법을 가르쳐 주지 말고 바다(sea)가 얼마나 멋진가를 가르치라는 이야기입니다. VBA 언어는 글자이기 때문에 딱딱할 수밖에 없습니다. 언어만 배우다 보면 쉽게 지치기 쉽습니다. VBA를 이용해서 만든 화면 결과물이 얼마나 멋진가를 가르쳐줘야 합니다. 손으로 일일이 수작업으로 한땀한땀 작업하던 것들이 버튼 한 번에 순식간에 처리되는 모습을 보여줘야 합니다. 그런면에서 엑셀이나 워드보다 비쥬얼적인 도구인 파워포인트가 적합하고 매력적이라고 생각합니다. VBA를 배우고 싶다면 필요한 것은 약간의 코드로 화면에 뭔가를 만들어 내는 것에 신기함과 재미를 느끼..

파워포인트 작업을 하다가 보면 단순 반복작업이 많습니다. 똑같은 작동을 하도록 같은 작업을 수십번 하는 것이 지겨울 수 있습니다. 그럴 때는 VBA매크로를 이용해보세요. (물론 처음엔 VBA를 작성하는 것이 수작업보다 시간이 더 걸릴 수는 있습니다.) 이번 경우는 배경도형위에 텍스트 상자가 있을 때 배경도형 중앙에 텍스트 상자가 오도록 하는 작업입니다. 지식인 링크(PPT 텍스트 상자 및 도형과 텍스트상자 정렬하기) 아래와 같은 코드로 현재 선택된 텍스트박스와 도형을 정렬시킬 수 있습니다. 두 도형을 위치와 크기를 동일하게 맞추고 가운데 정렬합니다. ​ Alt-F11누르고 삽입-모듈 추가하고 코드를 붙여넣고 코드창 닫은 다음 일반편집화면에서 텍스트박스와 도형을 동시에 선택하고 Alt-F8로 AlignCu..

관련지식인 질문: https://kin.naver.com/qna/detail.nhn?d1id=1&dirId=102&docId=328132346#answer1 Vbs 비주얼베이직 도움이 필요합니다 Vbs 비주얼베이직 도움이 필요합니다안녕하십니까 제가 직장에서 프로그램을 하나 운용을해야하는데 프로그램 반입이 제한이되서 메모장으로 소스입력후 획장자명을 병경하는 비주얼베이직을 이... kin.naver.com iphlpapi.dll 을 이용하면 간단하게 ping 결과를 가져올 수 있습니다. Private Declare Function GetRTTAndHopCount Lib "iphlpapi.dll" _ (ByVal lDestIPAddr As Long, ByRef lHopCount As Long, _ ByVal ..

https://www.fluentu.com/blog/english-kor/지금-바로-배워야-할-가장-유용한-영어-속담-50-가지 지금 바로 배워야 할 가장 유용한 영어 속담 50 가지 직장에서 사람들이 이상한 말을 하는 것을 들어본 적이 있나요?"The cat's out of the bag." 이라고 직장동료가 회의에서 말합니다. "But it's no use crying over spilled milk. We can still make a lot of progress today.""Ok guys, let's strike while the iron is hot." 이라고 상사가 말하지요.대체 무슨 의미냐고 당신의 상사에게 물어본다면, www.fluentu.com 위 사이트의 내용(이미지와 텍스트)을 가져..

지식인 링크: https://kin.naver.com/qna/detail.nhn?d1id=1&dirId=102&docId=316777745&page=1#answer1 RSS XML데이터를 읽는 방법은 여러가지입니다. VBA 없이 손쉽게 읽어 오는 방법은먼저 개발도구의 '원본'을 눌러서RSS 주소를 넣어주고RSS 트리가 불러와 지면item 폴더를 끌어서 셀에 갖다 놓고우클릭해서 '갱신'을 선택해주면RSS 내용을 필터형식으로 조회할 수 있습니다. 그 과정을 VBA를 이용한다면 Workbook.XmlImport를 이용해서 아래와 같습니다. 12345678910111213141516171819202122232425Sub Xml_Import() Dim str As String On Error Resume Next..

VBA를 이용한 Powerpoint 타이머입니다. 게임할 때, 시험볼 때나 제한 시간을 줄 때 유용합니다. 지정된 시간에서 카운트 다운하다가 00:00:00에 멈춥니다. 제일 상단에는 현재 시간이 표시되고 맨아래의 눈금은 진행 상태바라고 볼 수 있습니다. 노란색으로 점점 채워집니다. 우측 상단 톱니바퀴 아이콘을 누르면 제한시간을 지정할 수 있습니다. 최대 23:59:59 까지 지정할 수 있습니다. hh:mm:ss 형식이 맞지 않으면 동작하지 않습니다. 카운트 도중 타이머숫자나 왼쪽 상단 아이콘을 누르면 일시정지/재시작합니다. TV나 빔프로젝터 환경에 따라 16:9와 4:3 버전으로 나눴습니다. 16:9화면 버전 4:3화면 버전 ***** 00:00:00가 되면 다시 카운트를 증가시키는 버전 16:9화면 ..