Tương tác với Page của Multipage VB (1 người xem)

[komani]

Mình đang có 2 form
Form 1 (name = userform1) gồm multipage (name=Multipage1) có page1 (name=Thongtin, caption="Thông tin")
Form 2 (name = userform2) gồm button (name=cmdNhap), checkbox (name=cbthongtin)
Code nhu sau
Form 2:

 Private Sub cmdNhap_Click()
      If cbthongtin.value = true then
         Userform1.Multipage1.Pages("Thongtin").Visible = True
      Else
         Userform1.Multipage1.Pages("Thongtin").Visible = False
      End If
 End Sub

Tuy nhiên khi bấm đến Userform1.Multipage1.Pages("Thongtin"). thì không hiện lên lệnh gợi ý tiếp theo. Và khi run lệnh ấy thì không có hiệu quả. Mặc dù mình lên mạng đọc có ví dụ như sau: MultiPage1.Pages(0).Caption = "Australia" và cũng áp dụng nhưng cũng không được. Mọi người giải đáp giúp mình. Cám ơn!

 

[komani]

Đây là file mình đã làm thử mong mọi người giúp đỡ. Mình muốn page1 ẩn khi nhấn button

 

[be_09]

Đây là file mình đã làm thử mong mọi người giúp đỡ. Mình muốn page1 ẩn khi nhấn button

Bạn muốn dùng nó vào việc gì thì phải có 1 sheet với tiêu đề đầy đủ và nêu rỏ cần nhập liệu như thế nào chứ đưa cái File trống trơn thì chẳng ai hiểu để mà giúp.

 

[komani]

Ý của mình là với control Multipage có nhiều page, mỗi page là một trường dữ liệu mình cần chuyển vào sheet. Ở file trên là Page1 và Page 2. Minh muốn tùy chọn ẩn page1 hoặc page2 để tránh người dùng nhập dữ liệu dư thừa nên mới muốn hỏi cách tương tác đến page của multipage

 

[giaiphap]

Ý của mình là với control Multipage có nhiều page, mỗi page là một trường dữ liệu mình cần chuyển vào sheet. Ở file trên là Page1 và Page 2. Minh muốn tùy chọn ẩn page1 hoặc page2 để tránh người dùng nhập dữ liệu dư thừa nên mới muốn hỏi cách tương tác đến page của multipage

Bạn sửa chổ màu đỏ này

Private Sub CommandButton1_Click()
MultiPage1.Pages([COLOR=#ff0000][B]1[/B][/COLOR]).Visible = False
End Sub

 

[ndu96081631]

Đây là file mình đã làm thử mong mọi người giúp đỡ. Mình muốn page1 ẩn khi nhấn button

Nó vẫn hoạt động bình thường như ý bạn mà, có vấn đề gì chứ?
Ngoài ra: Hình như câu hỏi bài 2 không giống bài 1 thì phải

 

[komani]

Bạn sửa chổ màu đỏ này

Private Sub CommandButton1_Click()
MultiPage1.Pages([COLOR=#ff0000][B]1[/B][/COLOR]).Visible = False
End Sub

Cám ơn bạn mình đã làm được rồi.

 

[be_09]

Ý của mình là với control Multipage có nhiều page, mỗi page là một trường dữ liệu mình cần chuyển vào sheet. Ở file trên là Page1 và Page 2. Minh muốn tùy chọn ẩn page1 hoặc page2 để tránh người dùng nhập dữ liệu dư thừa nên mới muốn hỏi cách tương tác đến page của multipage

Chẳng hiểu ý bạn muốn làm cái gì, làm đại hên thì trúng.

Click vào Combo, muốn hiện Page1 nào thì chọn Page1, muốn hiện Page2 nào thì chọn Page2.