Just started VB for some functions that I would love to realise. but
the onlyu thing that I have for the moment is

Sub Macro2()
'
' Macro2 Macro
' Macro recorded 11/07/2007 by STD03
'

'
i = 0
Do While Now() 39269
Range("B5:G7").Select
Selection.Copy
Range("B13").Select
ActiveCell.Offset(i, 0).Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
SkipBlanks _
:=False, Transpose:=False
i = i + 3
Loop
End Sub

B5:G7 is some dynamic data from other database which change
irregularly. my code makes it copy and paste in a enormous frequency.
what i want to realise is to make it copy every 5 seconds, in order to
sotck the data on a regular base.

just started VB learning and I have a very short period to make this
realised. So hope I can get some help.

Thanks a lot in advance