Blaster,

Try:

Please TEST this FIRST in a COPY of your workbook (always make a backup copy before trying new code, you never know what you might lose).

Press and hold down the 'ALT' key, and press the 'F11' key.

Insert a Module in your VBAProject, Microsoft Excel Objects

Copy the below code, and paste it into the Module1.


Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
Sub Test()
    
    'Sleep 1000  ' to make your macro "sleep" for one second ( 1000 milliseconds )
    '1 second    1000    milliseconds
    '1 minute    60000   milliseconds
    '5 minutes   300000  milliseconds

    With ActiveSheet
        With Rows("1:1")
            .Copy
            .PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
        End With

        Sleep 300000
        With Rows("2:2")
            .Copy
            .PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
        End With

        Sleep 300000
        With Rows("1000:1000")
            .Copy
            .PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
        End With
    End With

End Sub

Then run the "Test" macro.


Have a great day,
Stan