Ayuda, por favor!

[suncoastbreaker]

Iniciado por abrahamvj

Si, el VBA es propio de Excel, pero para controlar el Excel desde VB, las instrucciones, propoiedades, etc que usaras serand e Excel y son iguales a las del VBA.

Para dejarme entender mejor, es como programar VBA desde VB. ejemplo:

Dim ExcelApp As Object

'creamos/abrimos el Excel
Set ExcelApp = CreateObject("excel.Application")

'with para trabajar con dicho "objeto" Excel
With ExcelApp
'agregamos una hoja nueva
.Workbooks.Add
' en la primera hoja en ciertas celdas, agregamos texto
.Activeworkbook.Sheets(1).Cells(1, 1) = "ID"
.Activeworkbook.Sheets(1).Cells(1, 2) = "Monto unico"
.Activeworkbook.Sheets(1).Cells(1, 3) = "Pension"
.Activeworkbook.Sheets(1).Cells(1, 4) = "Similar"
.Activeworkbook.Sheets(1).Cells(1, 5) = "Diferente"
.Activeworkbook.Sheets(1).Cells(1, 6) = "Prioridad"
.Activeworkbook.Sheets(1).Cells(1, 7) = "Monto"
.Activeworkbook.Sheets(1).Cells(1, 8) = "Por que"
.Activeworkbook.Sheets(1).Cells(1, 9) = "Dinero"
.Activeworkbook.Sheets(1).Cells(1, 10) = "Especies"
.Activeworkbook.Sheets(1).Cells(1, 11) = "Nombre"
.Activeworkbook.Sheets(1).Cells(1, 12) = "Region"
.Activeworkbook.Sheets(1).Cells(1, 13) = "Provincia"
.Activeworkbook.Sheets(1).Cells(1, 14) = "Distrito"
.Activeworkbook.Sheets(1).Cells(1, 15) = "CCPP"
.Activeworkbook.Sheets(1).Cells(1, 16) = "Fecha"
.Visible = True
End With

Set ExcelApp = Nothing

Como se lo de Sheets, Range, etc... Por el VBA :)

Abraham

He probado varios códigos creado por mi y me van de maravilla!
Os pego un enlace que me ha sido utilísimo:
http://hojadecalculo.umh.es/vba/Apuntes.Amp.htm
Espero que os sirva tanto como a mi.