반응형

직접 실행 창 3

두 문장의 같은 단어 비교(2) - 매크로 실행, 디버그

5. 매크로 실행 가. 단추 누르기 (1) '문장 비교' 단추 누르기 '문장 비교' 단추를 누르면 첫 줄에서는 '우리의', '자유와', '국민'이라는 글자가 빨간 색으로 바뀌고, 둘째 줄에서는 '우리의', '자유', '국민으로서,'가 빨간 색으로 바뀝니다. 포함관계를 따지기 때문에 '국민'과 '국민으로서'는 '국민'이 같기 때문에, '자유와'와 '자유'는 '자유'가 같기 때문에 빨간 색이 됐고, '우리의'는 첫째 줄과 둘째 줄이 똑 같아서 빨간 색이 됐습니다. (2) '초기화' 단추 누르기 초기화 버튼을 누르면 빨간 글자가 모두 검은 색 글자로 바뀝니다. 6. 디버깅 가. 중단점 설정 len1 줄 왼쪽 기둥(Side Bar)을 클릭해서 중단점을 설정합니다. 그러면 실행 아이콘(▶)을 눌렀을 때 중단점이 ..

EXCEL - VBA 2023.05.09

엑셀 VBA - 배열(2)

5. ReDim 가. 정의 ReDim을 배열의 크기를 재설정하는 것입니다. 처음에는 배열의 크기를 모르거나 배열의 크기가 유동적으로 변하는 경우 사용합니다. 나. ReDim 문 데이터는 아래와 같이 작성했습니다. Dim intNum(3) As Integer라고 이미 배열의 크기를 선언한 상태에서 ReDim intNum(5)라고 하면 아래와 같이 에러가 발생합니다. 따라서, 배열의 크기는 지정하지 않고, Dim intNum() as integer라고 한 다음 ReDim intNum(5)라고 해야 에러가 발생하지 않습니다. 그다음부터는 ReDim intNum(6)이라고 해도 에러가 발생하지 않습니다. Option Explicit Option Base 1 Sub 변수선언() Dim i As Integer Di..

EXCEL - VBA 2022.12.07

엑셀의 표를 티스토리의 표로 변환하는 매크로(3) - 셀 병합1

아래와 같이 병합된 셀이 가로, 세로, 가로와 세로 모두된 경우를 대상으로 해보겠습니다. 작업할 파일은 아래와 같습니다. 1. 준비 가. 셀 병합 여부 및 유형 판단 VBA에서 병합된 경우는 병합된 셀의 개수를 세어 판단을 하는데, 단순히 셀주소.MergeArea.Count로 하면 병합된 셀의 방향을 알 수 없으므로, 셀주소.MergeArea.Rows.Count와 셀주소.MergeArea.Columns.Count를 사용해야 합니다. 가로,세로 모두 병합인지 알려면 2개를 모두 사용하면 됩니다. 개발도구 - Visual Basic을 눌러 Visual Basic Editor를 실행하고, 직접 실행창에(없다면 보기메뉴에서 직접 실행창을 클릭하면 됨) ?range("a1").Mergearea.Rows.count..

EXCEL - VBA 2022.09.29
반응형