/ / Excel VBA 컨트롤 컬렉션

Excel VBA 컨트롤 컬렉션

에서 사용자 정의를 작성할 때 Excel VBA, 컨트롤 컬렉션 컨트롤을 쉽게 반복하고 각 컨트롤의 속성을 특정 값으로 설정합니다.

우리가 생성 할 Userform은 다음과 같습니다.

Excel VBA에서 컨트롤 컬렉션

이 사용자 정의 폼을 만들려면 다음 단계를 수행하십시오.

1. Visual Basic Editor를 엽니 다. 프로젝트 탐색기가 보이지 않으면보기, 프로젝트 탐색기를 클릭하십시오.

2. Insert, Userform을 클릭하십시오. 도구 상자가 자동으로 나타나지 않으면보기, 도구 상자를 클릭하십시오. 화면은 다음과 같이 설정해야합니다.

Excel VBA의 사용자 폼 화면 설정

삼. 레이블, 텍스트 상자 (맨 위, 두 번째 첫 번째 등) 및 명령 단추를 추가하십시오. 이 작업이 완료되면 이전에 표시된 Userform 그림과 일치해야합니다. 예를 들어 도구 상자에서 TextBox를 클릭하여 텍스트 상자 컨트롤을 만듭니다. 다음으로, 사용자 정의 폼의 텍스트 상자를 끌 수 있습니다.

4. 사용자 정의 폼, 레이블 및 명령 단추의 캡션을 변경하려면보기, 특성 창을 누르고 각 제어 도구를 누르십시오.

5. 사용자 정의 폼을 표시하려면 워크 시트에 명령 단추를 놓고 다음 코드 줄을 추가하십시오.

Private Sub CommandButton1_Click()

UserForm1.Show vbModeless

End Sub

설명 : vbModeless를 추가하여 사용자 폼을 사용하고 워크 시트에서 동시에 작업 할 수 있습니다.

우리는 이제 Userform의 첫 번째 부분을 만들었습니다. 이미 깔끔하게 보이지만 사용자 정의 폼의 명령 단추를 클릭하면 아무 것도 나타나지 않습니다.

6. Visual Basic Editor를 엽니 다.

7. 프로젝트 탐색기에서 UserForm1을 두 번 누릅니다.

8. 명령 단추를 두 x 누르십시오.

9. 다음 코드 행을 추가하십시오.

Private Sub CommandButton1_Click()

Dim i As Integer

For i = 1 To 10
    Controls("TextBox" & i).Value = Cells(i + 1, 1).Value
Next i

End Sub

설명: 몇 줄의 코드 만 있으면 텍스트 상자에 시트의 전화 번호를 채울 수 있습니다. & 연산자를 사용하여 요소를 연결 (조인)했습니다. 이 코드 줄은 텍스트 상자 컨트롤 (TextBox1, TextBox2, TextBox3 등)의 이름을 변경하지 않았기 때문에 작동합니다. 컨트롤의 이름을 변경하려면보기, 속성 창을 클릭하고 각 컨트롤을 클릭합니다.

시트에서 명령 단추를 누르면 결과 :

컨트롤 컬렉션 결과

또한 읽으십시오 :