Ver Mensaje Individual
  #2 (permalink)  
Antiguo 09/06/2005, 08:26
Avatar de Skalitiko
Skalitiko
 
Fecha de Ingreso: febrero-2005
Mensajes: 81
Antigüedad: 20 años, 2 meses
Puntos: 0
Tienes que agregar la referencia Microsoft Excel x.x object library desde el menú project references
una vez agregada la referencia declarar una variable del tipo Excel, por ejemplo:

Private Sub Command1_Click()
Dim ex As New Excel.Application
Dim I, J As Long
With ex
.Visible = True 'deja visible u oculto excel
.DisplayAlerts = False ' para que no despliegue los mensajes propios de excel
.SheetsInNewWorkbook = 1 ' cantidad de hojas para el nuevo workbooks
.Workbooks.Add ' agrega el nuevo workbooks
.Sheets(1).Select ' selecciono la hoja en la que voy a trabajar
For I = 1 To 50
For J = 1 To 50
.ActiveSheet.Cells(I, J).Value = "Fila " & I & ", Columna " & J
Next J
Next I
.Workbooks(1).SaveAs "c:\PrubaExcel.xls" ' guarda el workbook
.Workbooks(1).Close ' cirro el workbook
.Quit ' cierra excel
End With

End Sub

te recomiendo graves macros desde excel y los pasases a VB para que puedas hacer cosas más interesantes.