vbahelp
excel-vbahelp(编辑修改稿)
e(B1).Select = Address Range(A1:B1).Select = True End Sub 下例完成同样的功能，但不用激活或选定工作表或单元格。 Sub Labels() With Worksheets(Sheet1) .Range(A1) = Name .Range(B1) = Address .Range(A1:B1). = True End With End Sub