摘要：Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long Private Decla 阅读全文

摘要：Private Sub btn1_Click() 't1 = Timer Dim i As Long, j As Long, sht As Worksheet 'i,j为整数变量；sht 为excel工作表对象变量，指向某一工作表, 定义为Integer类型的话，变量值超过32767时会溢出 'Di 阅读全文