Excel VBA 사용자 정의 컨트롤

Question

안녕하세요, 모두

Excel UserForm에 ComboBox와 MultiPage가 있습니다. 내가 만들고 싶은 Sub는 기본적으로 이름이 ComboBox 선택 항목과 같지 않은 모든 MultiPage 페이지에 대해 Visibility를 0으로 설정하지만 Subsend가 발생합니다. 누군가가 내가 대단히 감사하겠습니다 올바른 방향으로 날 지점 수 있다면

Sub changeMultiPageVisibility() 
If userForm.templateComboBox = "Criteria1" Then While 
multiPage.Names <> userForm.templateComboBox Set multiPage.Pages.Visible = 0 

나는 여전히 VBA 및 사용자 정의 폼 작업에 새로운 해요. 감사!

Answer 1

나는 콤보 상자 변경 이벤트이 코드를 사용합니다 :

Private Sub templateComboBox_Change() 
    Dim p As MSForms.Page 

    For Each p In MultiPage.Pages 
     p.Visible = (p.Name = templateComboBox.Value) 
    Next 
End Sub