[파워포인트VBA] 파워포인트 매크로 리본 메뉴에 넣기
파워포인트 매크로(애드인, ADDIN) 리본 메뉴에 넣는 방법 허접하지만, 자작 매크로를 사용하기 편한 위치에 두고자 한다. 방법은 뭐 많을 수는 있지만, 리본메뉴에 넣어두려고 한다. PPAM 파일을 활용 방법이 많겠지만, 구글링을 통해 가장 편한 방법을 찾아봤다. 일단, 내장되어 있는 아이콘을 사용하고, PPT 오픈시에 자동으로 시작되도록 PPAM파일로 변환하여, ADDIN 폴더에 넣어주면 끝이다. auto_open 코드는 아래와 같다. 꼭 필요한지는 모르겠지만, auto_close도 해주는 것 같다. Sub auto_open() With Application.CommandBars("tools").Controls With .Add(msoControlButton, 1, "8889", , True) .Ca..
[파워포인트VBA] 컬러 조절창(RGBO)
파워포인트에서 도형의 컬러값을 RGB로 조정하고 싶을 때, 도형서식이나, 다른 채우기색 기능으로 확인 할때가 많은데, 과정이 영 귀찮다. 파워포인트 VBA는 참으로 귀찮은데, 그래도 꾹 참고 USERFORM을 만들어 본다. 도형이 하나 있다. 파란색의 RGB 값을 알고 싶다. 도형을 선택하고, USERFORM을 실행시키면, 위에서부터 RGB 맨 마지막에 Opacity 값이 나타난다. 보이는 것처럼, 좌우 버튼으로 값을 조정하면, 도형에 반영되도록 했다. 다른 색상을 고른 뒤 refresh 버튼을 누르면, RGB값이 업데이트 된다. 없는 기능을 만든게 아닌데, 주로 PICKER로 값을 추출한 다음, RGB값을 알아내는데 사용할 예정이다. 단지, RGB값이 0~255라는 제한이 있고, Opacity 역시 0..
[엑셀] 줄바꿈으로 구분된 셀의 값 텍스트 나누기
텍스트 나누기와 줄바꿈 아래와 같이 한개의 셀 안에 텍스트가 줄바꿈(char(10))으로 들어있는 경우, 텍스트 나누기를 하는 방법이다. 데이터탭의 텍스트나누기 기능으로 간단하게 할 수 있는데, 방법이 친숙하지는 않다. 왜냐면, 마법사에서, 구분 기호로 나온게 탭, 세미콜론, 쉼표, 공백 뿐이기 때문이다. 답은 기타에 있는데, 기타 체크박스를 찍고, 입력칸에서 Ctrl + Enter 를 쳐주면, 다음 페이지로 넘어가는데, 미리보기를 보면, 이미, 줄바꿈을 기준으로 텍스트가 나뉘어진 것을 알 수 있다. 아래 그림처럼 예쁘게 잘 나뉘어지는 것을 알 수 있다. 뻔한거지만, 모르면 모른다니까...
[엑셀VBA] 시트별로 따로 파일 저장하기
엑셀 시트별로 따로 파일 저장하기 엑셀의 시트를 따로 파일로 저장해야 하는 일은 뭐가 있을까? 청구서를 한개의 파일로 관리하다가, 업체별로 뿌린다거나, 각 팀별로 자료를 전달할때? 아직까지는 원하는 만큼 파일을 복사해두고, 파일을 하나하나씩 까서, 시트를 지웠던 것으로 기억한다. 하나씩 파일을 열고 시트를 지우다보면 내가 뭘 지웠는지, 어디까지 지웠는지, 뭘 남겼는지 혼란스러울 때도 있긴하다. 전제사항 당연한 이야기지만, 다른 시트에서 데이터를 참조하고 있다면, 시트를 분리하는 순간, 엉망징창이 될 것이니, 이때는 쓰지 않도록 한다.(원본 파일을 참조하게 된다.) 원본파일의 시트 이름이 Sheet1 처럼 기본적으로 주어지는 이름이라서, 새로 생성되는 파일과 이름이 같게 된다면, Sheet1(2)처럼 엑셀..
[엑셀VBA] 문자와 숫자가 섞여있는 셀값에서 숫자만 추출하기
상당히 귀찮은 일 어느날 업무 메일을 받았는데, 사과 30,000,000원 딸기 20,000,000원 과자 1,000,000원 과자 비율 : 2% 이 딴식으로 글이 써있다고 치고, 위의 내용을 엑셀로 복사하면 상당히 귀찮은 일이 펼쳐진다. 복사를 하면 아래그림과 같이 될 것이기 때문이다. 숫자만 빼서 사용하고 싶다. 반복적으로 사용할 수 있을 거 같으니, 가장 쉬운 방법으로 VBA를 짜본다. 음. 원했던 기능까지는 잘된다. 제약사항은 다음과 같다. [전제] 첫번째 나오는 숫자 배열만 인식 [전제] ,,+,-,%는 숫자로 인식 [전제] 비연속적이지 않은 숫자에서는 멈춘다. [제한] (1.금액 : 3,000,000원) 숫자를 앞에 쓴 문장이라면 당연히 거기서 멈춘다. 1만 추출된다. [제한] (- 3,000..
[엑셀] 사용자 지정 정렬(사용자 지정 목록)
정렬 매번 정렬을 할때마다 느끼는 거지만, 상당히 귀찮다. 그럼에도, 사용자 지정 목록 기능이 있어, 가끔 쓸만하다 싶다. 아직 모르는 분들을 위해 공유한다. '이름'열을 오름차순 정렬하면, 아래와 같이 된다. 맨 우측 정렬 옵션에서, 사용자 지정 목록을 눌러주면, 아래와 같은 등록창이 나오고, 새 목록 추가를 통해, 새로운 규칙을 만들 수 있다. 아래 그림은 타자 치기 귀찮아서, 노란칠된 이름만 적은 것이다. 반만 적으면... 적용을 하게 되면, 내가 적은 순서대로 정렬이 되고, 그 다음은 오름차순 정렬이 된다. 친절하게도, 목록을 한번 적으면, 내가 적은 순서의 반대 순서도 리스트에 나오게 된다. 단, 이때는, 나머지 것들이 내림차순으로 정렬이 되며, 내가 적은 내용들이 그 하위에 나오게 되므로 주의..
[엑셀] 한 개의 열에 모든 값이 들어있을 때, 분리하는 두 가지 방법
아래처럼 한 개의 열에 모든 관측치가 들어있을 때, 분리하는 두가지 방법을 알아보자. 셀 주소를 활용 오빠두 엑셀에서 본 내용이다. 참으로 신박한 사람들이로다. 원하는 값이 있는 셀 주소를 텍스트 형태로 미리 표에 넣어둔다. 자동완성으로 채워준다. 표 안에서 a의 값을 =a (수식으로) 변경해준다. 모두 바꾸기 하면 해당 셀 주소 참조로 변경이 된다. 단, A열의 위치가 B나 C로 변경되면 다시 작업을 반복해줘야한다. 함수사용 기존에 내가 쓰던 방법이다. 위의 내용과 비교했을 때, 좀 귀찮은 방법이지만, 함수이니, 재활용은 가능하다. a1셀을 참조하고 싶은 첫번째 셀에 아래와 같은 함수를 넣어준다. =INDIRECT("a"&ROW(A1)+ROWS($A$1:A1)-1) row값을 1,3,5,7,9... 순..