excel宏实现导出超时的人员名单，用宏实现 Sub 按钮3_Click() Dim strReceiveUser As String strReceiveUser = "" Dim i As Integer, sht As Worksheet j = Sheet1.Cells.SpecialCells(xlCellTypeLastCell).Row k = Sheet1.Cells.SpecialCells(xlCellTypeLastCell).Column Close #1 Close #2