Excel宏编程的常用代码整理.pdf

Excel 宏编程的常用代码整理 本文档主要介绍了 Excel 宏编程中的一些常用代码，包括变量的声明、常数的声明、选择当前单元格所在区域、返回当前单元格中数据删除前后空格后的值、单元格位移、给当前单元格赋值、给指定单元格赋值、隐藏工作表、显示工作表、打印预览、得到当前单元格的地址、得到当前日期及时间、保护工作簿、取消保护工作簿、给活动工作表改名、打开一个应用程序、增加一个工作表、删除活动工作表等。 变量的声明是 Excel 宏编程中的一种基本操作，使用 Dim 语句可以声明变量，例如 `Dim a as integer` 声明 a 为整型变量，`Dim a` 声明 a 为变体变量，`Dim a as string` 声明 a 为字符串变量等。同时，强制声明变量可以使用 Option Explicit 语句，该语句必在任何过程之前出现。 常数的声明也是 Excel 宏编程中的一种基本操作，使用 Const 语句可以声明常数，例如 `Const My = 456` 声明一个常数，`Public Const MyString = "HELP"` 声明一个公共常数。 选择当前单元格所在区域是 Excel 宏编程中的一种常用操作，使用 `Selection.CurrentRegion.Select` 语句可以选择当前单元格所在区域。 返回当前单元格中数据删除前后空格后的值是 Excel 宏编程中的一种常用操作，使用 `Trim(ActiveCell.Value)` 语句可以返回当前单元格中数据删除前后空格后的值。 单元格位移是 Excel 宏编程中的一种常用操作，使用 `ActiveCell.Offset` 语句可以实现单元格位移，例如 `ActiveCell.Offset(0, 1).Select` 向左移动一格，`ActiveCell.Offset(0, -1).Select` 向右移动一格，`ActiveCell.Offset(1, 0).Select` 向下移动一格，`ActiveCell.Offset(-1, 0).Select` 向上移动一格。 给当前单元格赋值是 Excel 宏编程中的一种常用操作，使用 `ActiveCell.Value = "你好！！！"` 语句可以给当前单元格赋值。 给指定单元格赋值是 Excel 宏编程中的一种常用操作，使用 `Range("a1").value="hello"` 语句可以给指定单元格赋值。 隐藏工作表和显示工作表是 Excel 宏编程中的一种常用操作，使用 `Sheets("sheet1").Visible=False` 语句可以隐藏工作表，使用 `Sheets("sheet1").Visible=True` 语句可以显示工作表。 打印预览是 Excel 宏编程中的一种常用操作，使用 `For Each my In Worksheets my.PrintPreview Next my` 语句可以打印预览所有的工作表。 得到当前单元格的地址是 Excel 宏编程中的一种常用操作，使用 `MsgBox ActiveCell.Address` 语句可以得到当前单元格的地址。 得到当前日期及时间是 Excel 宏编程中的一种常用操作，使用 `MsgBox Date & Chr(13) & Time` 语句可以得到当前日期及时间。 保护工作簿和取消保护工作簿是 Excel 宏编程中的一种常用操作，使用 `ActiveSheet.Protect` 语句可以保护工作簿，使用 `ActiveSheet.Unprotect` 语句可以取消保护工作簿。 给活动工作表改名是 Excel 宏编程中的一种常用操作，使用 `ActiveSheet.Name = "liu"` 语句可以给活动工作表改名。 打开一个应用程序是 Excel 宏编程中的一种常用操作，使用 `AppActivate Shell("C:\WINDOWS\CALC.EXE")` 语句可以打开一个应用程序。 增加一个工作表和删除活动工作表是 Excel 宏编程中的一种常用操作，使用 `Worksheets.Add` 语句可以增加一个工作表，使用 `ActiveSheet.Delete` 语句可以删除活动工作表。