标签:
VBA 选择使用区域
Sub Select_UsedRange()
ActiveSheet.Range(ActiveSheet.Cells(1, 1), ActiveSheet.UsedRange).Select
End Sub
rc = .range("a1").CurrentRegion.Rows.Count
cc = .range("a1").CurrentRegion.Columns.Count
cc = .Range(.Cells(1, 1), .UsedRange).Columns.Count
rc = .Range(.Cells(1, 1), .UsedRange).Rows.Count
标签:
原文地址:http://www.cnblogs.com/lbnnbs/p/4785061.html