Điều khiển MultiPage trong Form để hiện ra Page mình muốn active bằng thủ tục nào? (2 người xem)

[Hoàng Trọng Nghĩa]

Tôi có 1 form với control MultiPage, với control này, tôi muốn dùng nút lệnh khi hiện form đồng thời hiện Page mình muốn active khi form được show thì phải làm thủ tục gì?

Private Sub CommandButton1_Click()
    With UserForm1
        .Show
        [COLOR=#006400][B]'.MultiPage1.Pages("Page1")[/B][/COLOR] 
    End With
End Sub

'======================================

Private Sub CommandButton2_Click()
    With UserForm1
        .Show
       [B][COLOR=#006400] '.MultiPage1.Pages("Page2")[/COLOR][/B]
    End With
End Sub

Xin được hướng dẫn. Cảm ơn.

 

[ndu96081631]

Tôi có 1 form với control MultiPage, với control này, tôi muốn dùng nút lệnh khi hiện form đồng thời hiện Page mình muốn active khi form được show thì phải làm thủ tục gì?

Private Sub CommandButton1_Click()
    With UserForm1
        .Show
        [COLOR=#006400][B]'.MultiPage1.Pages("Page1")[/B][/COLOR] 
    End With
End Sub

'======================================

Private Sub CommandButton2_Click()
    With UserForm1
        .Show
       [B][COLOR=#006400] '.MultiPage1.Pages("Page2")[/COLOR][/B]
    End With
End Sub

Xin được hướng dẫn. Cảm ơn.

Dùng thuộc tính Value của MultiPage nhé (Page 1 = 0, Page2 = 1....)

 

[Hoàng Trọng Nghĩa]

Dùng thuộc tính Value của MultiPage nhé (Page 1 = 0, Page2 = 1....)

Sao em làm như thế này vẫn bị lỗi:

Private Sub CommandButton1_Click()
    With UserForm1
        .Show
        [COLOR=#0000cd][B].MultiPage1.Page1.Value = 0[/B][/COLOR]
        [COLOR=#006400]'Hoặc:
        [B]'.MultiPage1.Pages(Page1.Value) = 0[/B][/COLOR]
    End With
End Sub

 

[Hoàng Trọng Nghĩa]

Ah, em hiểu rồi:

Private Sub CommandButton1_Click()
    With UserForm1
        .MultiPage1.Value = 0
        .Show
    End With
End Sub

Cám ơn Thầy nhiều.