EXCEL宏教程

一、单元格
1、选中单元格
Cells(2,3).Select
Range(“C2:D3”).Select

二、行与列
1、选中行:
Rows(2).Select
Rows(“2:3”).Select

2、选中列：
Columns(“D:D”).Select

3、上方插入行
Rows(“2:2”).Select
Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove

4、左侧插入列
Columns(“C:C”).Select
Selection.Insert Shift:=xlToRight, CopyOrigin:=xlFormatFromLeftOrAbove

5、删除行且下方上移
Rows(“2:2”).Select
Selection.Delete Shift:=xlUp

6、删除列且右侧左移
Columns(“C:C”).Select
Selection.Delete Shift:=xlToLeft

7、最大行
EndRow = ActiveSheet.UsedRange.Rows.Count

EndRow= ActiveSheet.Range("A200000").End(xlUp).Row
（得到A列最后一个单元格行号）

8、最大列

EndCol= ActiveSheet.UsedRange.Columns.Count    

EndCol = ActiveSheet.Range("XFD1").End(xlToLeft).Column

EndCol2 = VBA.Mid(Cells(2, EndCol).Address, 2, Application.WorksheetFunction.Find("$", Cells(2, EndCol).Address, 2) - 2)

三、工作表