VBA代码 Sleep延时休眠#If Win64 Then
Private Declare PtrSafe Sub sleep Lib "kernel32.dll" Alias "Sleep" (ByVal dwMilliseconds As LongPtr)
#Else
Private Declare Sub sleep Lib "kernel32.dll" Alias "Sleep" (ByVal dwMilliseconds As Long)
#End If