摘要:
案例一 Public Sub Test2(ByRef table As String) Sheets(table).Select Columns("H:H").Select End Sub '选中表 sheet1 H列 Sub cc() Test2 ("sheet1") End Sub 案例二 名字 阅读全文
摘要:
1.当前Sheet1工作表的A1单元格最后一行、最后一列 a = Worksheets("Sheet1").Range("a65535").End(xlUp).Row b = Worksheets("Sheet1").Range("a1").End(xlToRight).Column 2.当前B1单 阅读全文