Lotus Notes - Exportar a excel??

Me pueden ayudar como puedo exportar información desde el internet a excel, por la atención prestada les expreso mi agradecimiento

Set excel = CreateObject("Excel.Application") 'Abre la aplicación Excel (depande de cada Cliente)
excel.Workbooks.add
excel.Caption = "Titulo"
'excel.visible=False`' para cargarlo por detras

excel.Worksheets(1).Range("A1:T1000").font.size=10 ' tamaño letra en rango

excel.Worksheets(1).Range("A1").Value= "Valor de texto"
excel.Worksheets(1).Range("A1:G1").Merge 'Une las celdas
excel.Worksheets(1).Range("A1:G1").HorizontalAlignment =3 ' alinea
excel.Worksheets(1).Range("A1:G1").Font.Bold = True ' negrita
excel.Worksheets(1).Range("A1:T1").RowHeight=20 'alto de la fila
excel.Worksheets(1).Range("A1:T1").Font.size=12 ' tamaño fuente
excel.Worksheets(1).Range("A1:T1").VerticalAlignment =2 '
excel.Worksheets(1).Range("N1:T1").HorizontalAlignment = 3

excel.visible=True ' Muestra el fichero excel creado

Ver demás propiedades del objeto Excel.
Espero haber ayudado un poco.
saludos