Чтобы сделать книгу Excel видимой или скрытой с помощью VBA, вы можете использовать следующие методы:

Метод 1: использование свойства Application.Visible

Sub MakeWorkbookVisible()
    Application.Visible = True ' Set to True to make the workbook visible
End Sub
Sub MakeWorkbookHidden()
    Application.Visible = False ' Set to False to hide the workbook
End Sub

Метод 2: использование свойства Workbook.Windows

Sub MakeWorkbookVisible()
    ThisWorkbook.Windows(1).Visible = True ' Set to True to make the workbook visible
End Sub
Sub MakeWorkbookHidden()
    ThisWorkbook.Windows(1).Visible = False ' Set to False to hide the workbook
End Sub

Метод 3: использование свойства Application.ScreenUpdating

Sub MakeWorkbookVisible()
    Application.ScreenUpdating = True ' Set to True to make the workbook visible
End Sub
Sub MakeWorkbookHidden()
    Application.ScreenUpdating = False ' Set to False to hide the workbook
End Sub

Метод 4: использование свойства WindowState

Sub MakeWorkbookVisible()
    ThisWorkbook.Application.WindowState = xlNormal ' Set to xlNormal to make the workbook visible
End Sub
Sub MakeWorkbookHidden()
    ThisWorkbook.Application.WindowState = xlMinimized ' Set to xlMinimized to hide the workbook
End Sub

Метод 5: использование метода Workbook.Activate

Sub MakeWorkbookVisible()
    ThisWorkbook.Activate ' Activate the workbook to make it visible
End Sub
Sub MakeWorkbookHidden()
    ' Activate another workbook or application window to hide the workbook
    ' For example:
    Workbooks("AnotherWorkbook.xlsx").Activate
End Sub