รบกวนแนะนำแก่ไข Macro ด้วยครับ

[voravutzip]

โค๊ดที่ผมทำไว้ เมื่อคลิกปุ่มแล้วจะเปิด sheet2 ที่กำหนดไว้ขึ้นมาแล้วแท็บ sheet2 จะโชว์ขึ้น (แต่ก่อนหน้าคลิกนั้นแท็บ sheet2 จะซ่อนอยู่) ผมอยากให้เมื่อเราคลิดที่ปุ่มแล้ว sheet2 ที่กำหนดไว้จะโชว์ขึ้นมาแล้วแท็บ sheet2 ซ่อนไว้ครับ
ไฟล์ที่ผมทำไว้ จะใช้ sheet1 เป็นเหมือนเมนู

Code: Select all

Sub Sheet1()
'
' Sheet1 Macro
'

'
 
    Sheet2.Visible = True
        Sheets("Sheet2").Select
    Range("A1").Select
End Sub

[voravutzip]

มีท่านไหนทราบช่วยแนะนำผมที่ครับ

[snasui]

แนบไฟล์ตัวอย่างพร้อมอธิบายมาใหม่ครับ หากคลิกแล้วแสดงแล้วซ่อนทันที ไม่น่าจะมีประโยชน์อะไร ผมอ่านจากอธิบายมายังไม่เข้าใจว่าต้องการจะซ่อนและแสดงเมื่อใดครับ

หากต้องการจะทราบว่า Code สำหรับการยกเลิกการซ่อนเป็นแบบไหน ให้ลองบันทึก Macro ยกเลิกการซ่อนชีตก็จะทราบครับ