Excel VBA常用代码100句

Excel VBA常用代码100句

Excel VBA常用代码涉及多个方面，以下是10个方面的常用代码示例：
1. 变量声明与错误处理 强制变量声明：Option Explicit 数组下标从1开始：Option Base 1 忽略错误继续：On Error Resume Next 错误跳转：On Error GoTo 100 恢复错误提示：On Error GoTo 0
2. 应用程序控制 控制警告框显示：Application.DisplayAlerts = [True/False] 屏幕刷新控制：Application.ScreenUpdating = [True/False]
3. 工作簿操作 创建新工作簿：Workbooks.Add 保存工作簿：ActiveWorkbook.Save 或 Workbooks.Save 关闭工作簿：ActiveWorkbook.Close 或 Workbooks.Close
4. 工作表管理 激活工作表：Worksheets.Activate 添加工作表：Worksheets.Add 重命名工作表：ActiveSheet.Name = "新工作表名" 删除工作表：Application.DisplayAlerts = False; Worksheets.Delete; Application.DisplayAlerts = True
5. 单元格操作 清除单元格内容：Range.ClearContents 设置单元格值：Range.Value = "值" 复制单元格：Range.Copy Destination:=Range 删除单元格：Range.Delete Shift:=xlUp
6. 数据处理 条件判断：If Range.Value = "条件" Then ... Else ... End If 区域操作：Range.Select 或进行其他操作 清除超链接：Range.Hyperlinks.Delete
7. 用户界面控制 选择范围：Range.Select 消息提示：MsgBox "提示信息" 用户窗体控制：UserForm1.Show
8. 工作表状态 隐藏工作表：Worksheets.Visible = xlSheetVeryHidden 或 xlSheetHidden 显示工作表：Worksheets.Visible = xlSheetVisible 保护工作表：ActiveSheet.Protect Password:="密码" 插入列：Columns.Insert Shift:=xlToRight
9. 工作簿属性 获取工作簿路径：ActiveWorkbook.Path 保存状态：通过判断ActiveWorkbook.Saved属性是否为True或False 设置可见性：控制工作簿在Excel界面中的显示状态
10. 图形插入 添加图片到工作表：Sheets.Shapes.AddPicture "图片路径", _ MsoFalse, MsoCTrue, Left, Top, Width, Height
请注意，这些代码片段是Excel VBA编程的基础，熟练掌握它们能大大提高工作效率。同时，记得根据具体需求调整和组合这些代码，以实现更复杂的功能。
2025-03-15