EXCEL宏的使用.docVIP

目 录 EXCEL宏的使用 2 一、 选中单个单元格 2 二、 选中多个单元格 2 三、 设置活动单元格 2 四、 给活动的单元格赋值 3 五、 得到指定单元格中的值 3 六、 插入单元格 3 七、 设置字体属性 4 八、 清空选中单元格里的内容 5 九、 设置选中单元格的边线属性 5 十、 删除选中的单元格 6 十一、设置单元格背景色及图案 7 十二、返回工作表中的行数 8 十三、得到当前EXCEL的文件名 8 十四、批注的操作 8 十五、剪切、复制、粘贴 9 十六、选择性粘贴 10 十七、改变列宽 10 EXCEL宏的使用 一、 选中单个单元格 Range(“单元格地址“).Select 例：Range(C9).Select ‘选中“C9”单元格 二、 选中多个单元格 Range(“单元格地址:单元格地址[,单元格地址……]”).Select 例：Range(“A1:B2”).Select ‘选中“A1”、“A2”、“B1”、“B2”四个连续的单元格 Range(“12:12”).Select ‘选中第12行 Range(“B:B”).Select ‘选中第B列 Range(“A1:A2,B7,2:2”).Select ‘选中“A1”、“A2”、“B7”五个不连续的单元格和第二行 Cells.Select ‘选中当前SHEET中的所有单元格 Rows(行地址:行地址).Select ‘选中整行 Columns(列地址:列地址).Select ‘选中整列 例：Rows(“2:2”). Select ‘选中第2行 Rows(“2:5”). Select ‘选中2到5行 Columns(A:A).Select ‘选中A列 Columns(E:B).Select ‘选中E到B列 三、 设置活动单元格 Range(单元格地址).Activate 注：设置活动单元格与选中单元格类似，不同之处就是 后者在选中指定的单元格之前会将在此前已被选中的单元格取消掉。 前者在设置之前不会取消已选中的单元格，如果此时操作的单元格不是被选中的单元格，这时他实现的功能与选一个单元格相同。 四、 给活动的单元格赋值 ActiveCell.FormulaR1C1 = 值 例：Range(A1).Select ActiveCell.FormulaR1C1 = Name Range(B1).Select ActiveCell.FormulaR1C1 = Age Range(A2:B3).Select Range(A2).Activate ActiveCell.FormulaR1C1 = BUG Range(B2).Activate ActiveCell.FormulaR1C1 = 12 Range(A3).Activate ActiveCell.FormulaR1C1 = Archer Range(B3).Activate ActiveCell.FormulaR1C1 = 37 五、 得到指定单元格中的值 Range(单元格地址).Text 六、 插入单元格 Selection.Insert Shift:=XlDirection值 Selection.EntireRow.Insert Selection.EntireColumn.Insert 例：Selection.Insert Shift:=xlToRight ‘在当前选中单元格的位置插入单元格并将当前选中的单元格向右移动 Selection.Insert Shift:=xlDown ‘在当前选中单元格的位置插入单元格并将当前选中的单元格向下移动 Selection.EntireRow.Insert ‘在当前选中单元格的上面插入一行 Selection.EntireColumn.Insert ‘在当前选中单元格的左侧插入一列 七、 设置字体属性 1. 设置字体名称和大小 Selection.Font.Name = 字体名称 Selection.Font.Size = 字号 例：Selection.Font.Name = 隶书 Selection.Font.Size = 15 2. 设置字体样式 Selection.Font.Bold = True / False ‘加粗 Selection.Font.Italic = True / False ‘斜体 Selection.Font.Underline = XlUnderlineStyle(下划线样式) ‘下划线 XlUnderlineStyle(下划线