Code vba làm ẩn thanh Caption (1 người xem)

[nguyenkhoadng]

Chào các anh!
Em không biết thanh đó có tên là gì, em tạm gọi là Caption.
Nhờ các anh giúp em đoạn code vba giúp ẩn thanh này. không phải ẩn bằng cách click vào nút phòng to để ko thấy thanh, mà ẩn luôn trong cửa sổ, không còn thấy thanh cũng như tiêu đề Book1 như trong hình đính kèm nữa.
Em cảm ơn!

 

[leonguyenz]

Không biết có phải đoạn code này không:

Application.WindowState = xlMaximized

 

[nguyenkhoadng]

không thấy tác dụng gì anh ah.

 

[Kiều Mạnh]

không thấy tác dụng gì anh ah.

Thử một mớ code sau xem Copy Paste vào ThisWorkbook
Nếu cái nào không thích thì xóa nó đi

Private Sub Workbook_SheetDeactivate(ByVal Sh As Object)
    Application.DisplayFullScreen = True
    Application.WindowState = xlMaximized
    With ActiveWindow
        .DisplayHorizontalScrollBar = False
        .DisplayVerticalScrollBar = False
        .DisplayWorkbookTabs = False
    End With
End Sub

 

[Kiều Mạnh]

Thử một mớ code sau xem thế nào
Copy Paste vào ThisWorkbook
Nếu cái nào không thích thì xóa nó đi
Code 2

Private Sub Workbook_SheetDeactivate(ByVal Sh As Object)
    Application.DisplayFullScreen = True
    Application.WindowState = xlMaximized
    Application.DisplayFormulaBar = False
    With ActiveWindow
        .DisplayHorizontalScrollBar = False
        .DisplayVerticalScrollBar = False
        .DisplayWorkbookTabs = False
        .DisplayHeadings = False
        .DisplayGridlines = False
    End With
End Sub