표 VBA로 작업하는 동안 사용하는 가장 중요하고 널리 사용되는 개체 중 하나입니다. 엑셀에서. 이 문서에서는 Excel 표를 사용하는 방법을 보여 드리겠습니다. VBA 사용 .
VBA와 함께 Excel 표를 사용하는 9가지 방법
표는 첫 번째 행에 머리글이 포함된 Excel의 특수한 유형의 데이터 집합입니다.
VBA에서 , ListObject 카테고리에 속합니다. . Excel 표를 사용하는 방법은 다음과 같습니다. VBA .
1. Excel에서 VBA로 표 만들기
먼저 표를 만드는 방법을 알아보겠습니다. VBA 사용 엑셀에서.
표를 만들려면 VBA 사용 Excel에서는 먼저 Table ListObject로 .
그런 다음 표를 삽입해야 합니다. 원하는 범위에서.
Dim Table1 as ListObject
Set Table1 = ActiveSheet.ListObjects.Add(xlSrcRange, Range("B4:D13"), , xlYes)
이 코드를 실행합니다. 표 가 생성됩니다. B4:D13 범위 내 활성 워크시트의.
이제 원하는 경우 테이블 이름을 원하는 대로 변경할 수 있습니다.
Table1.Name = "MyTable"
테이블 이름이 MyTable로 변경됩니다.
자세히 알아보기: 바로 가기를 사용하여 Excel에서 표 만들기
2. VBA로 Excel 표 참조
표를 만드는 방법을 배웠습니다. VBA 사용 엑셀에서.
이제 표를 참조하세요. Excel에서 이미 생성된 경우 먼저 Table ListObject로 .
그런 다음 표를 참조하세요. Excel에서 사용할 수 있는 이름으로.
Dim Table1 As ListObject
Set Table1 = ActiveSheet.ListObjects("MyTable")
<강한> 
"MyTable" 테이블을 나타냅니다. Excel에서 Table1이라는 이름으로 .
자세히 알아보기: Excel 표 참조 사용 방법
3. Excel에서 VBA를 사용하여 테이블에 값 입력
표 내부에 값을 입력하려면 , 먼저 표를 참조해야 합니다. .
그런 다음 Range.Cells를 사용하여 셀에 값을 입력해야 합니다. VBA 속성 .
Dim Table1 As ListObject
Set Table1 = ActiveSheet.ListObjects("MyTable")
Table1.Range.Cells(2, 1) = "A Tale of Two Cities"
<강한> 
이 코드를 실행합니다. “Tale of Two Cities” 문자열을 입력합니다. 두 번째 행 및 첫 번째 MyTable 테이블의 열 활성 워크시트의.
4. Excel에서 VBA를 사용하여 테이블에 행과 열 삽입
표에 행이나 열을 삽입하려면 VBA 사용 , 먼저 표를 참조하세요. .
그런 다음 행을 추가하려면 ListRows.Add를 삽입하세요. 재산.
Dim Table1 As ListObject
Set Table1 = ActiveSheet.ListObjects("MyTable")
Table1.ListRows.Add
<강한> 
MyTable 테이블 끝에 새 행을 추가합니다. .
또는 열을 추가하려면 ListColumns.Add를 삽입하세요. 재산.
Dim Table1 As ListObject
Set Table1 = ActiveSheet.ListObjects("MyTable")
Table1.ListColumns.Add
<강한> 
MyTable 테이블 오른쪽에 새 열이 추가됩니다. .
다시 말하지만, 표의 특정 위치에 행이나 열을 추가하려면 , ListRows.Add 내에서 위치 지정 또는 ListColumns.Add 재산.
Dim Table1 As ListObject
Set Table1 = ActiveSheet.ListObjects("MyTable")
Table1.ListRows.Add (4)
4번째로 새 행을 추가합니다. MyTable 테이블 행 .
새 열을 추가할 때도 마찬가지입니다.
자세히 알아보기: Excel 표에서 행과 열을 삽입하거나 삭제하는 방법
5. VBA를 사용하여 테이블에서 데이터 읽기
VBA를 사용하여 테이블에서 데이터를 읽으려면 , Range.Cells 사용 VBA 속성 .
Dim Table1 As ListObject
Set Table1 = ActiveSheet.ListObjects("MyTable")
MsgBox Table1.Range.Cells(3, 1)
코드를 실행하면 세 번째의 값이 표시됩니다. 행 및 첫 번째 MyTable 테이블의 열 . 사랑의 40가지 규칙입니다. .
유사한 수치
- Excel에서 피벗 테이블을 새로 고치는 VBA(예제 5개)
- VBA로 모든 피벗 테이블을 새로 고치는 방법(4가지 방법)
- Excel에서 피벗 테이블 편집(5가지 방법)
- 피벗 테이블 범위를 업데이트하는 방법(적절한 5가지 방법)
6. VBA를 사용하여 테이블의 행 또는 열 반복
VBA를 사용하여 테이블의 각 행을 반복하려면 , ListRows.Count 사용 재산.
Dim Table1 As ListObject
Set Table1 = ActiveSheet.ListObjects("MyTable")
For i = 1 To Table1.ListRows.Count
Table1.ListRows(i).Range.Select
Next i
Table1 테이블의 각 행을 반복합니다. 선택합니다.
마찬가지로 테이블의 각 열을 반복하려면 ListColumns.Count를 사용합니다. 재산.
7. 테이블에서 특정 값 찾기
VBA가 있는 테이블의 행이나 열에서 특정 값을 찾으려면 , DataBodyRange.Rows.Find 사용 또는 DataBodyRange.Columns.Find VBA 속성 .
Dim Table1 As ListObject
Set Table1 = ActiveSheet.ListObjects("MyTable")
Set Value = Table1.DataBodyRange.Columns(1).Find("Mother", LookAt:=xlWhole)
MsgBox Value
"어머니" 값을 찾습니다. MyTable 표의 첫 번째 열 , 값을 찾으면 반환합니다.
8. Excel에서 VBA로 표 크기 조정
표의 크기를 새 모양으로 조정하려면 먼저 범위를 설정하세요. 테이블 크기가 조정됩니다.
그런 다음 표 크기를 조정합니다. 해당 범위로 .
Dim Table1 As ListObject
Set Table1 = ActiveSheet.ListObjects("MyTable")
Dim Rng As Range
Set Rng = Range("B4:C8")
Table1.Resize Rng
먼저 범위를 설정합니다. B4:C8로 , 다음 MyTable 표 크기 조정 새로운 범위로 .
9. Excel에서 VBA로 표 삭제
VBA가 있는 테이블을 삭제하려면 , 삭제 사용 VBA 속성 .
Dim Table1 As ListObject
Set Table1 = ActiveSheet.ListObjects("MyTable")
Table1.Delete
MyTable 테이블이 삭제됩니다. 활성 워크시트에서.
기억해야 할 사항
테이블은 ListObject입니다. VBA . 그러나 간단한 범위로 액세스하려면 개체, Table.Range 사용 VBA 속성 . 표를 범위로 반환합니다. 개체 및 범위의 모든 속성에 액세스할 수 있습니다. VBA 개체 .
결론
이러한 방법을 사용하면 VBA가 있는 테이블을 사용할 수 있습니다. . 질문있으세요? 언제든지 문의하십시오.
추가 자료
- Excel에서 피벗 테이블을 자동으로 새로 고치는 방법(2가지 방법)
- Excel 피벗 테이블의 그룹 열(2가지 방법)
- 피벗 테이블 맞춤 그룹화:3가지 기준
- Excel 표의 수식을 효과적으로 사용(예제 4개 포함)