EXCEL表格的基本操作（excel表格教程）汇集帖，欢迎大家跟帖！

后勤部长 · 发表于 2011-3-30 08:56

ActiveSheet.Protect Password:=641112 ' 保护工作表并设置密码
ActiveSheet.Unprotect Password:=641112 '撤消工作表保护并取消密码

后勤部长 · 发表于 2011-3-30 08:56

For Each w In Workbooks
If w.Name <> ThisWorkbook.Name Then
w.Close SaveChanges:=True
End If
Next w

后勤部长 · 发表于 2011-3-30 09:01

Application.WindowState = xlMaximized

后勤部长 · 发表于 2011-3-30 09:01

MsgBox "The name of the active sheet is " & ActiveSheet.Name

后勤部长 · 发表于 2011-3-30 09:02

ActiveWorkbook.SaveCopyAs "C:\TEMP\XXXX.XLS"

后勤部长 · 发表于 2011-3-30 09:02

Sheets(4).Activate

后勤部长 · 发表于 2011-3-30 09:02

Worksheets(1).Activate

后勤部长 · 发表于 2011-3-30 09:03

10、本示例通过将 Saved 属性设为 True 来关闭包含本段代码的工作簿，并放弃对该工作簿的任何更改
ThisWorkbook.Saved = True
ThisWorkbook.Close

后勤部长 · 发表于 2011-3-30 09:03

11、本示例对自动重新计算功能进行设置，使 Microsoft Excel 不对第一张工作表自动进行重新计算
Worksheets(1).EnableCalculation = False

后勤部长 · 发表于 2011-3-30 09:04

Workbooks.Open ("C:\MyFolder\MyBook.xls")

[EXCEL] EXCEL表格的基本操作（excel表格教程）汇集帖，欢迎大家跟帖！