Không biết đúng ý bạn khôngHi các bạn. Mình có file excel như đính kèm. Làm sao khi mình tắt file Excel, file tự động hide Sheet "Xoai, Tao, Mit, Man" lại và save lại. Còn các Sheet khác giữ nguyên không ẩn. Mong được giúp đỡ của các bạn. Cảm ơn.
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Dim ws As Worksheet
Application.DisplayAlerts = False
For Each ws In Worksheets
If ws.Name = "XOAI" Or ws.Name = "TAO" Or ws.Name = "MIT" Or ws.Name = "MAN" Then
ws.Activate
ws.Visible = False
End If
Next
ThisWorkbook.Save
Application.DisplayAlerts = True
End Sub
Cảm ơn bạn đúng ý mình nhưng nếu mình ẩn Sheet" CAM, LE" thì khi tắt và mở lại 2 sheet này không tự mở lên. Mình mong muốn là khi mở lên thì 3 Sheet" TONG HOP, CAM, LE" đều hiện lên, còn những sheet khác mình muốn xem thì tự mở.Không biết đúng ý bạn không
Mã:Private Sub Workbook_BeforeClose(Cancel As Boolean) Dim ws As Worksheet Application.DisplayAlerts = False For Each ws In Worksheets If ws.Name = "XOAI" Or ws.Name = "TAO" Or ws.Name = "MIT" Or ws.Name = "MAN" Then ws.Activate ws.Visible = False End If Next ThisWorkbook.Save Application.DisplayAlerts = True End Sub
DIỄN ĐÀN GIẢI PHÁP EXCEL Group 1
DIỄN ĐÀN GIẢI PHÁP EXCEL Group 2