CODE CHẠY SHEET ẨN

[LamNA]

Chào anh chị GPE
Hiện tại Sheet2 đang ẩn dạng không thể Unhide trực tiếp trên Sheet mà phải vào VBA mở
Em có tạo 1 Addin với tên "Click Sheet2 " vậy có code nào có thể mở sheet2 ra mà không cần vào VBA mở .
Em gửi file đính kèm nhờ anh chị hỗ trợ giúp em nhe
Code em đang dùng chỉ có tác dụng khi em chọn chế độ hiện Sheet2
Em cám ơn

Public Sub Test(control As IRibbonControl)
Dim Ws As Worksheet
  Set Ws = Sheet2
    Ws.Select
        Range("A1").Select
End Sub

 

[dhn46]

Chào anh chị GPE
Hiện tại Sheet2 đang ẩn dạng không thể Unhide trực tiếp trên Sheet mà phải vào VBA mở
Em có tạo 1 Addin với tên "Click Sheet2 " vậy có code nào có thể mở sheet2 ra mà không cần vào VBA mở .
Em gửi file đính kèm nhờ anh chị hỗ trợ giúp em nhe
Code em đang dùng chỉ có tác dụng khi em chọn chế độ hiện Sheet2
Em cám ơn

Public Sub Test(control As IRibbonControl)
Dim Ws As Worksheet
  Set Ws = Sheet2
    Ws.Select
        Range("A1").Select
End Sub

Để hiện sheet thì bạn dùng như thế này

Sub Test()
    Sheet2.Visible = xlSheetVisible
End Sub

 

[LamNA]

Để hiện sheet thì bạn dùng như thế này

Sub Test()
    Sheet2.Visible = xlSheetVisible
End Sub

Dạ đơn giản như vậy mà em nghĩ không ra,
em cám ơn anh đã hỗ trợ

 

[ndu96081631]

Code em đang dùng chỉ có tác dụng khi em chọn chế độ hiện Sheet2

Tôi thắc đó là loại code gì mà chỉ tác dụng khi sheet hiện ra vậy?

 

[LamNA]

Tôi thắc đó là loại code gì mà chỉ tác dụng khi sheet hiện ra vậy?

Dạ thầy em gửi file ví dụ code em gửi như bài 1 để thầy dễ hiểu hơn, nó chỉ tác dụng khi Sheet2 ở chế độ hiện sheet.
Em cám ơn

 

[befaint]

Tôi thắc đó là loại code gì mà chỉ tác dụng khi sheet hiện ra vậy?

Xuất phát từ bài này á anh.
CHUYỂN SHEET TRONG VISUAL BASIC

Tới bài #10 anh hỏi "... đúng không?" mà chủ thớt vẫn tự tin bền vững mình đã nêu rõ ràng được vấn đề.
Và bài #11 đã chốt phương án là dùng AddIns.

Triển khai phương án đó thì chủ thớt đã xem tới bài "Add-Ins Tạo Menu RibbonTiếng Việt..." nên mới có khúc code như bài #1.

Public Sub Test(control As IRibbonControl)
'...

Túm lại tới bây giờ chưa rõ chủ thớt muốn làm gì.