'IT 관련 지식/VBA 공부' 카테고리의 글 목록

등등

일본에서 이야기하는 한국뉴스!

기초부터 실전까지 VBA 엑셀 25 - UserForm

'IT 관련 지식 > VBA 공부' 카테고리의 다른 글

기초부터 실전까지 VBA 엑셀 28 - UserForm 콤보 박스 사용법 (0)	2019.12.28
기초부터 실전까지 VBA 엑셀 28 - UserForm의 텍스트 박스 활용 (11)	2019.12.11
기초부터 실전까지 VBA 엑셀 27 - UserForm의 Label, TextBox (0)	2019.12.02
기초부터 실전까지 VBA 엑셀 26 - UserForm 명령단추 (0)	2019.11.27
기초부터 실전까지 VBA 엑셀 25 - UserForm (0)	2019.11.26

기초부터 실전까지 VBA 엑셀 28 - UserForm 콤보 박스 사용법

IT 관련 지식/VBA 공부2019. 12. 28. 08:00

728x170

이번에는 콤보 박스를 사용하는 방법에 대해 말해보겠습니다.

콤보 박스는 아래와 같이 "클릭"을 하여 리스트를 선택할 수 있게 하는 상자를 말합니다.

이럼 어떻게 리스트 안에 항목을 넣을 수 있는지 알아보겠습니다.

1. 양식 만들기

시작은 간단합니다.

먼저 아래와 같이 UserForm에서 콤보 박스를 만들고 UserForm이 나올 수 있게 설정해줍니다.

혹시 UserForm을 모르시는 분은 아래의 링크를 참조하시길 바랍니다.

기초부터 실전까지 VBA 엑셀 25 - UserForm

VBA 엑셀 25 - UserForm 드디어 UserForm을 배워볼 시간입니다. UserForm의 경우 VBA에서 제일 재밌는 부분중 하나입니다. 그 이유는 그래픽을 만들 수 있기 때문입니다. 여러분들이 버튼을 만들고 선택을 하고 입..

mmol.tistory.com

UserForm1.Show를 이용하여 사용자폼을 나타낼 수 있다면 다음 단계로 넘어갑니다.

2. 콤보 박스에 아이템 추가하기 - Additem 매소드

콤보 박스 안에 A, B, C 등급을 나눌 수 있게

항목을 넣어보겠습니다.

먼저 사용자폼을 더블클릭합니다.

그럼 아래와 같은 화면이 나올거라고 생각합니다.

아래의 그럼에서 UserForm 옆부분에 Click이라는 것이 있을건데요.

이곳을 클릭하여 Initialize를 찾아서 클릭합니다.

그리고 Private Sub UserForm_Click이라고 된 부분은 전부 삭제하면 아래와 같은 그림이됩니다.

우리는 여기에 콤보박스에 대한 프로그래밍을 할 것입니다.

Initialize의 뜻은 처음 실행시 최초 1회만 실행한다는 의미입니다.

즉, 사용자폼을 사용할 때 우리가 원하는 설정을 지정하기 위한 장소입니다.

이 안에 다음과 같이 넣습니다.

Private Sub UserForm_Initialize()

    Me.ComboBox1.AddItem "A_Rank"
    Me.ComboBox1.AddItem "B_Rank"
    Me.ComboBox1.AddItem "C_Rank"

End Sub

그리고 이를 실행시켜봅니다.

보시는 바와같이 콤보 박스 안에 입력한 값이 들어간 것을 알 수 있습니다.

구문을 조금 해석해보면

Me : 현재 활성화된 사용자폼을 의미함

ComboBox1 : 콤보 박스의 오브젝트 네임을 의미

방금은 Additem 매소드를 사용했지만

300x250

행렬을 이용할 수 있는 List 매소드도 있습니다.

3. 콤보 박스에 아이템 추가하기 - List 매소드

이번에는 List 매소드를 이용해서 콤보 박스에 아이템을 추가해보겠습니다.

넣는 항목은 동일하며 다음과 같이 프로그래밍하면 됩니다.

Private Sub UserForm_Initialize()

    Dim aryComboBox(2) As String
    aryComboBox(0) = "A_Rank"
    aryComboBox(1) = "B_Rank"
    aryComboBox(2) = "C_Rank"
    Me.ComboBox1.List = aryComboBox

End Sub

aryComboBox라는 행렬변수를 만들고 그 안에 콤보박스 항목을 넣는 형태입니다.

그리고 마지막에

Me.ComboBox1.List = aryComboBox

로 항목 지정을 합니다.

이렇게 하면 많은 항목을 한번에 지정해야할 경우 사용하기 편합니다.

그럼 이것으로 콤보 박스에 대한 설명을 마칩니다.

등등

일본에서 이야기하는 한국뉴스!

'IT 관련 지식 > VBA 공부' 카테고리의 다른 글

기초부터 실전까지 VBA 엑셀 28 - 목록 상자 (ListBox) 추가 (2)	2020.01.30
기초부터 실전까지 VBA 엑셀 28 - UserForm의 텍스트 박스 활용 (11)	2019.12.11
기초부터 실전까지 VBA 엑셀 27 - UserForm의 Label, TextBox (0)	2019.12.02
기초부터 실전까지 VBA 엑셀 26 - UserForm 명령단추 (0)	2019.11.27
기초부터 실전까지 VBA 엑셀 25 - UserForm (0)	2019.11.26

기초부터 실전까지 VBA 엑셀 28 - UserForm의 텍스트 박스 활용

IT 관련 지식/VBA 공부2019. 12. 11. 15:54

728x170

VBA 엑셀 28 - UserForm의 텍스트 박스 활용

이번에는 텍스트 박스에 메시지를 입력 후 확인버튼을 누르면

입력한 값을 셀에 넣는 프로그래밍을 해보겠습니다.

먼저 전에 했던

기초부터 실전까지 VBA 엑셀 27 - UserForm의 Label, TextBox 에서 이어서 하도록 하겠습니다.

기초부터 실전까지 VBA 엑셀 27 - UserForm의 Label, TextBox

엑셀 27 - UserForm의 Label, TextBox 이번에는 UserForm에 글자를 새길 수 있는 Label VBA의 TextBox처럼 입력을 받을 수 있는 TextBox를 사용하는 방법에 대해 알아보겠습니다. 1. UserForm에서 Label 생성 Labe..

mmol.tistory.com

라벨, 텍스트 박스, 버튼을 만들줄 모르는 분은 위의 포스팅을 참조해주세요!

1. Userform - OK 버튼 편집

먼저 아래와 같이 사용자 양식을 구성해줍니다.

그리고 OK 버튼을 두번 클릭하면 다음과 같은 화면으로 넘어갑니다.

이 부분의 의미는 "이 버튼을 클릭시 실행할 부분"이라는 의미입니다.

그렇기 때문에 OK 버튼을 누르면 이 안쪽의 프로그래밍이 실행됩니다.

우리의 목적은 텍스트 상자 안의 내용을 셀로 옮기는 것이기 때문에 다음과 같이 프로그래밍을 합니다.

Private Sub CommandButton1_Click()

Cells(1, 1) = Me.TextBox1

End Sub

굳이 설명하지 않아도 너무 쉬워서 무슨 말인지 알거라고 생각합니다 ㅎㅎ

하지만 딱, 1개 설명하자면

Me.TextBox1 이 부분인데요.

사실 여러분은 Me.까지면 쳐도 아래와 같은 화면이 나올거라고 생각합니다.

그럼 이 TextBox1은 뭐냐고 질문이 있을건데요.

이건 TextBox의 오브젝트 명입니다.

다시 사용자 양식으로 돌아가서 텍스트 박스를 클릭 후 정보를 보면 TextBox1이라는 오브젝트 명을 볼 수 있을겁니다.

(오브젝트 명은 변경가능합니다!!)

이제 이 사용자 양식을 실행시키고 "OK 버튼"을 눌러보면

300x250

시트의 "A1"에 입력했던 문장이 입력될 것입니다.

하지만, 이것은 Cells(1,1)로 지정했으니 "A1"에만 입력이 가능하겠죠?

그래서 조금 응용을 해보겠습니다.

2. Userform - OK 버튼을 이용하여 연속입력

다시 사용자 양식으로 돌아갑니다.

그리고 "OK'버튼을 더블클릭하여 다시 프로그래밍 화면으로 들어갑니다.

그리고 다음과 같이 프로그래밍합니다.

Private Sub CommandButton1_Click()

    Dim lastRow As Long

        lastRow = Cells(Rows.Count, 1).End(xlUp).Row + 1

        Cells(lastRow, 1) = Me.TextBox1

End Sub

잠깐 lasRow부분을 설명하자면

1. A열 제일 위에 시트에서 한개씩 내려가면서 기록
2. 이것을 이용하면 For을 쓰지 않고 내려가면서 기록가능
3. 처음에 lastRow를 숫자(As long)으로 지정했기에 가능

이렇게 하면 "OK"버튼을 누를 때마다 자동으로 마지막 행을 찾아서 그곳에 기록합니다.

기록의 경우 Cells(lastRow, 1)이기때문에 A열에 기록합니다.

오늘은 여기까지입니다~

등등

일본에서 이야기하는 한국뉴스!

'IT 관련 지식 > VBA 공부' 카테고리의 다른 글

기초부터 실전까지 VBA 엑셀 28 - 목록 상자 (ListBox) 추가 (2)	2020.01.30
기초부터 실전까지 VBA 엑셀 28 - UserForm 콤보 박스 사용법 (0)	2019.12.28
기초부터 실전까지 VBA 엑셀 27 - UserForm의 Label, TextBox (0)	2019.12.02
기초부터 실전까지 VBA 엑셀 26 - UserForm 명령단추 (0)	2019.11.27
기초부터 실전까지 VBA 엑셀 25 - UserForm (0)	2019.11.26

기초부터 실전까지 VBA 엑셀 27 - UserForm의 Label, TextBox

IT 관련 지식/VBA 공부2019. 12. 2. 16:31

728x170

엑셀 27 - UserForm의 Label, TextBox

이번에는 UserForm에 글자를 새길 수 있는 Label

VBA의 TextBox처럼 입력을 받을 수 있는 TextBox를 사용하는 방법에 대해 알아보겠습니다.

1. UserForm에서 Label 생성

Label의 아이콘은 아래와 같습니다.

Label의 글자를 바꾸는 방법은 "속성"에서

Caption 영역을 바꾸는 것입니다.

"Caption" 부분을 다음과 같이 바꿔보겠습니다.

이렇게 Label부분의 Caption을 바꾸어서 내용을 바꿀 수 있습니다.

300x250

2. UserForm에 TextBox 넣기

아래와 같은 아이콘을 클릭하여 텍스트 상자를 생성합니다.

그리고 이 텍스트 상자의 특성을 보면 Caption이 없습니다.

그 이유는 텍스트 상자에는 겉으로 보이는 이름이 없습니다.

그 대신 우리는 나중에 오브젝트 명을 사용할 것입니다.

(이 부분은 나중에 설명하겠습니다.)

또한 TextBox의 속성에서 다음과 같은 속성을 볼 수 있습니다.

Height : 높이
Width : 폭
MaxLength : 입력 할 수있는 최대 문자 수를 설정
TabIndex : 탭 순서에서 개체의 위치를 설정
IMEMode : 컨트롤이 포커스를 취득했을 때의 시스템 (IME)의 기본 실행시 모드를 설정

이 중에서 IMEMode에 대해 잠깐 설명하자면

텍스트 상자를 클릭할 시 최초로 사용할 키보드를 의미합니다.

예를 들어 클릭시 자동으로 영문을 입력할 수 있게 키보드 셋팅을 할 수 있습니다.

fmIMEModeNoControl	IME 모드를 변경하지 않습니다 (기본값).
fmIMEModeOn	IME를 선택합니다.
fmIMEModeOff	IME를 해제하여 영어 모드로합니다.
fmIMEModeDisable	IME를 해제합니다. 이 모드로하면 사용자는 키 조작으로도 IME를 선택 할 수 없습니다.
fmIMEModeAlpha	영숫자 모드에서 IME를 선택합니다.

아래와 같이 UserForm을 만드신 후 실행해보시길 바랍니다.

오늘은 여기까지 하겠습니다.

다음에는 텍스트 박스테 입력한 값을 셀에 넣는 방법에 대해 설명해보겠습니다.

등등

일본에서 이야기하는 한국뉴스!