Cita:
Iniciado por Avellaneda 
Buenas,
Código:
Dim oExcel As Excel.Application
Dim oWBook As Excel.Workbook
Dim oSheet As Excel.Worksheet
Set oExcel = New Excel.Application ' abrimos un Objeto Excel
Set oWBook = oExcel.Workbooks.Add ' le añadimos un libro
Set oSheet = oWBook.Worksheets(1) ' seleccionamos la Hoja1
With oSheet.Cells(1, 1) ' seleccionamos la 1ª celda
.Interior.ColorIndex = 41 ' Color fondo = azul
.Font.Size = 14 ' tamaño de letra
.Font.Bold = True ' Fuente en negrita
.Font.ColorIndex = 2 ' Color fuente = blanco
End With
Te aconsejo que abras una hoja Excel y generes una macro con lo que quieres hacer y después copies el código a VB (excepto en escasas ocasiones, es igual).
Un saludo
muchas gracias amigo, se te agradece