chiello said:Run the following code to start to save from column G, then J, and so on.
Code:
Public SaveColumn As Long
Public Sub SaveRefreshedData()
If SaveColumn = 0 Then
...
ElseIf SaveColumn >= 256 Then
Exit Sub 'Stop save
SaveColumn = 7 'Overwrite
End If
...
'Application.OnTime Now + TimeValue("01:00:00"), "SaveRefreshedData"
...
End Sub