Captura de pantalla de una página web y grabación

Hola a todos,

Quiero realizar una macro que me parece bastante complicada (soy principiante en VBA) así que estoy batallando un poco, o bastante.

Quiero que mi macro abra una página en IE, haga una captura de pantalla de la misma, la guarde en una carpeta con el nombre correspondiente a la hora de la captura y que vuelva a repetir la operación cada 5 minutos durante 1 hora, actualizando la página de Internet cada vez.

Por ahora, sé abrir una página en IE:

Dim IE As InternetExplorer
Dim nb As Integer
Dim DataType 
 
Set IE = CreateObject("internetExplorer.Application")
IE.Visible = True
IE.navigate "https://www.google.com/"

He encontrado un código que guarda una captura de pantalla en la carpeta del libro (gracias a cs_Le Pivert por la pista) pero para guardar el nombre según la hora no sé muy bien cómo hacerlo, tal vez cambiar el "/monimage" por Now pero que funcione:

Option Explicit
Private Declare Sub keybd_event Lib "user32" ( _
 ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, _
 ByVal dwExtraInfo As Long)
Private Sub CommandButton1_Click()
Dim monImage As String
Dim Sh As Shape
'Definir el nombre y la ubicación de almacenamiento de la imagen
 monImage = ActiveWorkbook.Path & "\monimage" & ".jpg"
 keybd_event vbKeySnapshot, 1, 0&, 0&
 DoEvents
 Range("A1").Select
 ActiveSheet.Paste
 'Obtiene la última forma de la hoja
 Set Sh = ActiveSheet.Shapes(ActiveSheet.Shapes.Count)
 'Pega la imagen en un gráfico
 With ActiveSheet.ChartObjects.Add(0, 0, Sh.Width, Sh.Height).Chart
 .Paste
 'Guarda la imagen del gráfico en formato jpg
 .Export monImage, "JPG"
 End With
 'Elimina el gráfico y la forma.
 With ActiveSheet
 .ChartObjects(ActiveSheet.ChartObjects.Count).Delete
 .Shapes(ActiveSheet.Shapes.Count).Delete
 End With
 Application.ScreenUpdating = True
 MsgBox "La imagen se ha guardado en la carpeta del libro."
End Sub

¿Alguien podría ayudarme, por favor?

Bye y gracias de antemano,

Ju

Configuración: Windows 7 / Internet Explorer 8.0