VBA TextBox | VBA Userform에서 TextBox를 삽입하고 사용하는 방법은 무엇입니까?

Excel VBA 텍스트 상자

텍스트 상자 는 사용자로부터 입력을받는 데 사용되는 상자와 같습니다. 텍스트 상자는 사용자 양식의 일부이며 모든 Excel 워크 시트의 개발자 탭에서 사용자 양식으로 텍스트 상자를 만들려면 텍스트 상자 옵션을 선택할 수 있습니다. VBA 또는 워크 시트의 사용자 양식 컨트롤에서 디자인 탭에서 선택할 수 있습니다.

VBA TextBox는 사용자 양식의 여러 컨트롤 중 하나입니다. 사용자 양식에 텍스트 상자를 표시하여 텍스트 상자에 데이터를 입력하도록 요청할 수 있으며 사용자가 입력 한 데이터는 간단한 코드로 워크 시트에 저장할 수 있습니다.

사용자 양식은 VBA 코딩에서 매우 매력적입니다. 특히 사용자로부터 입력을 받아야 할 때 매우 유용합니다. 사용자 양식에는 많은 컨트롤이 있으며 사용자로부터 입력 값을 얻기 위해 "텍스트 상자"는 사용자 양식에서 이상적인 옵션입니다. 사용자 양식에 텍스트 상자를 배치함으로써 실제로 사용자에게 표시중인 텍스트 상자에 필요한 값을 입력하도록 지시 할 수 있습니다. VBA 텍스트 상자에 대해 잘 모르는 경우이 기사에서는 VBA 텍스트 상자를 둘러 봅니다.

VBA UserForm에 TextBox를 삽입하는 방법은 무엇입니까?

이 VBA 텍스트 상자 템플릿은 여기에서 다운로드 할 수 있습니다 – VBA 텍스트 상자 템플릿

먼저 텍스트 상자를 삽입하려면 사용자 양식을 삽입해야합니다. 사용자 양식을 삽입하려면 삽입> 사용자 양식으로 이동하십시오.

사용자 양식을 클릭하면 다른 모듈과 마찬가지로 사용자 양식이 작성됩니다.

사용자 양식을 클릭하면 사용자 양식의 컨트롤을 볼 수 있습니다.

이 컨트롤 도구 상자에서 "TextBox"를 선택하고 사용자 양식으로 끕니다.

이를 통해이 텍스트 상자와 관련된 많은 속성을 볼 수 있습니다.

TextBox 속성

텍스트 상자의 속성을 보려면 F4 키를 누릅니다.

보시다시피 텍스트 상자에는 이처럼 이름, 색상, 테두리가 있습니다. 이제 코딩하는 동안이 텍스트 상자를 쉽게 참조 할 수 있도록 적절한 이름을 지정하십시오.

Userform에서 TextBox를 사용하는 예

VBA 텍스트로 프로젝트 중 하나를 수행 할 것입니다. 직원의 세부 정보를 저장할 데이터 입력 사용자 양식을 만들 것입니다.

1 단계 : 사용자 양식에서 레이블을 그립니다.

2 단계 : 레이블의 기본 텍스트를 "Employee Name"으로 변경합니다.

3 단계 : 라벨 앞에 텍스트 상자를 그립니다.

4 단계 : 텍스트 상자에 "EmpNameTextBox"로 적절한 이름을 지정합니다.

5 단계 : 이제 첫 번째 레이블 아래에 레이블을 하나 더 그리고 텍스트를 "Employee ID"로 입력합니다.

6 단계 : 두 번째 레이블 앞에 하나 이상의 텍스트 상자를 그리고 이름을 "EmpIDTextBox"로 지정합니다.

7 단계 : 레이블을 하나 더 그리고 텍스트를“Salary”로 입력합니다.

8 단계 : "Salary"레이블 앞에 텍스트 상자를 하나 더 그리고 이름을 "SalaryTextBox"로 지정합니다.

9 단계 : 이제 도구 상자에서 "명령 단추"를 삽입합니다.

10 단계 : 명령 단추의 텍스트를 "제출"로 변경합니다.

이제 사용자 양식 디자인 부분이 끝났습니다. 이제이 사용자 양식에 입력 된 데이터를 저장하는 코드를 작성해야합니다. 이제 F5 키를 눌러 사용자 양식을 실행하면 이와 같은 사용자 양식이 표시됩니다.

Step 11: Change the Caption of the User Form in the Properties window.

Step 12: Now double click on the Submit Command Button.As soon as you double click you will see this auto sub procedure like the below.

This is when you click on the Submit button what should happen. We need to mention the tasks in the VBA code. In this project, our aim is to store the data entered in the text box as soon as we click on the Submit Button.

For this first create a Template like this in the worksheet named “Employees Sheet”.

Step 13: Now come back to the visual basic editor. Inside the button click subroutine in VBA first determine the last used row by using the below code.

Code:

 Private Sub CommandButton1_Click() Dim LR As Long LR = Worksheets("Employee Sheet").cell(Rows.Count, 1).End(xlUp).Row + 1 End Sub 

Step 14: First thing is in the first column we will store Employee Name. So for this, we need to access the text box named as “EmpNameTextBox”.

Code:

 Private Sub CommandButton1_Click() Dim LR As Long LR = Worksheets("Employee Sheet").cell(Rows.Count, 1).End(xlUp).Row + 1 Ramge("A" & LR).Value = EmpNameTextBox.Value End Sub 

Step 15: In the second column we need to store Employee ID. So this will be obtained by accessing the text box named “EmpIDTextBox”.

Code:

 Private Sub CommandButton1_Click() Dim LR As Long LR = Worksheets("Employee Sheet").cell(Rows.Count, 1).End(xlUp).Row + 1 Ramge("A" & LR).Value = EmpNameTextBox.Value Ramge("B" & LR).Value = EmpIDTextBox.Value End Sub 

Step 16: At last we need to store the salary part, for this, we need to access to text box named “SalaryTextBox”.

Code:

 Private Sub CommandButton1_Click() Dim LR As Long LR = Worksheets("Employee Sheet").cell(Rows.Count, 1).End(xlUp).Row + 1 Ramge("A" & LR).Value = EmpNameTextBox.Value Ramge("B" & LR).Value = EmpIDTextBox.Value Range("C" & LR).Value = SalaryTextBox.Value End Sub 

Ok, we are done with the coding part as well. Now run the code using the F5 key we should see a User Form like the below.

As of now, all the boxes are empty.

Fill the details first.

Now click on the “Submit” button, it will store the data to the worksheet.

Like this, you can keep entering the data and hit and submit button. This is the simple data entry user form with a text box.