由于Workbooks.Open没有直接隐藏打开工作簿的参数,我们可以使用Visible属性来设置工作簿的可见性。Visible属性是一个布尔值,可以设置为True(可见)或False(不可见)。 编写VBA代码: 在打开工作簿后,立即将其Visible属性设置为False,以实现隐藏打开的效果。 vba Sub OpenWorkbookHidden() Dim wb As Workbook ' 使用Workbo...
Private Sub Workbook_Open() Dim mySht As Worksheet For Each mySht In ThisWorkbook.Worksheets If mySht.Visible = xlSheetHidden Then mySht.Visible = xlSheetVisible End If NextEnd Sub 此外，我们还可以利用Workbook_BeforeClose事件来确保在用户关闭工作簿时，除了“封面”之外的所有工作...
If ws.Name <> ThisWorkbook.ActiveSheet.Name Then ws.Visible = xlSheetHidden End If Next ws End Sub 现在,假设您要隐藏工作簿中除活动工作表之外的所有工作表。此宏代码将为您执行此操作. Now, let's say if you want to hide all the worksheets in your workbook other than the active worksheet. ...
方式一:利用索引号引用工作簿,Workbook.Item(3),这里的Item可以省略,即Workbook(3) 方式二:利用工作簿名称引用 ,Workbook("Book1")或Workbook("Book1.xls"),如果本地文件显示拓展名(且文件已经保存),则文件名必须带拓展名,否则会报错。 2、Workbook名片信息 Sub wbMsg() Range("B2") = ThisWorkbook.Name '...
Workbooks.OpenDatabase FileName:="C:\northwind.mdb" End Sub 4、保存文件 文件的保存使用Workbook对象的Save或SaveAs方法。 Save方法使用简单,语法为 expression.Save,expression是某个Workbook对象。 如:ActiveWorkbook.Save 即保存当前活动工作簿。 如果是第一次保存工作簿或要另存为,请使用 SaveAs 方法为该文件...
Workbooks.Open 'C:\example.xlsx' 2. 关闭工作簿: Workbook.Close SaveChanges:=False 3. 保存工作簿: Workbook.Save 4. 另存为工作簿: Workbook.SaveAs 'C:\new_example.xlsx' 5. 设置工作簿密码: Workbook.Password = 'your_password' 6. 解除工作簿密码: ...
按Alt+F11打开VBA编辑器，在左侧的导航窗格中选择ThisWorkbook，复制代码如下：Private Sub Workbook_Open() Sheet2.Visible = xlSheetVeryHidden End Sub，并将其粘贴到右侧的代码编辑窗口中。保存工作薄后，每次打开时都会自动隐藏Sheet2。这种方法通过宏代码实现，更加灵活且不易被察觉。需要注意的是，...
25 从已关闭的工作簿中清除工作表Clear a Sheet from a Workbook that is Closed Sub mynzvba_clear_sheet() Dim wb As Workbook Application.ScreenUpdating = False Set wb = Workbooks.Open(ThisWorkbook.Path & "\myfile.xlsx") wb.Sheets("Sheet1").Activate ...
工作簿的事件在进入VBE之后,如下图所示,代码窗口左上方下拉菜单中选中Workbook,右边下拉菜单中有多个事件可以选择。 工作簿集合: Workbooks对象集是当前己打开的所有工作簿的组成的工作簿对象的集合。工作簿集合的属性不多,最重要的一个就是Countn属性,用于返回工作簿集合中己打开的工作簿对象的数量。 工作簿集合的方...
方式一:利用索引号引用工作簿,Workbook.Item(3),这里的Item可以省略,即Workbook(3) 方式二:利用工作簿名称引用 ,Workbook("Book1")或Workbook("Book1.xls"),如果本地文件显示拓展名(且文件已经保存),则文件名必须带拓展名,否则会报错。 2、Workbook名片信息 ...