如何用Excel和VB使2个工作表定时更换?
发布网友
发布时间：2022-04-23 05:53
共1个回答
热心网友
时间：2023-10-17 13:50
Sub alter()
Dim i As Integer
For i = 1 To 100 Step 1
If Application.Wait(Now + TimeValue("0:05:00")) Then
Sheet2.Select
End If
If Application.Wait(Now + TimeValue("0:05:00")) Then
Sheet1.Select
End If
Next
End Sub
