Visual basic , ApExcel

Tengo este código en VISUAL BASIC
Private Sub Command1_Click()
Dim ApExcel As Variant
Set ApExcel = CreateObject("Excel.application")
' Hace que Excel se vea
'ApExcel.Visible = True
'Agrega un nuevo Libro
ApExcel.workbooks.Add
'hace que no se vea el archivo excel
ApExcel.Visible = falce
'hace que grave el el archivo excel en mis documentos
ApExcel.save
'Poner Titulos
ApExcel.cells(1, 1).Formula = "Titulo de la Aplicacion"
ApExcel.cells(1, 1).Font.Size = 18
ApExcel.cells(2, 2).Formula = "Debe"
ApExcel.cells(2, 3).Formula = "Haber"
ApExcel.cells(2, 4).Formula = "Saldo"
ApExcel.cells(3, 2).Formula = 200
ApExcel.cells(3, 3).Formula = 100
' Aplica Formula
ApExcel.cells(3, 4).Formula = "=B3-C3"
' Hace una Seleccion de celdas y pone bordes de Color
ApExcel.RANGE("B3:D3").BORDERS.Color = RGB(255, 0, 0)
Set ApExcel = Nothing
End Sub
Deseo sabes como puedo hacer avanzar las celdas para ir llenando con como un una base de datos osea ir poniendo más registros por que el código que tengo solo pone seldas especificas y si cambio los datos sobre escribe las celdas pero yo quiero que vaya abajo mis nuevos datos con en una base de dato
bueno también quiero saber como puedo gradar ese archivo exel con un nombre especifico.
Y si alguien me puede dar todos las propiedades del ApExcel
ejemplo
ApExcel. Workbooks. Add
Todas esas propuiedades y sus formatos y también para que sirven

1 respuesta

Respuesta
1
Borisencinas,
Para reccorrer las celdas podes utilizar un for, por ejemplo:
'10 filas
For i = 1 To 10
'20 columnas
For j = 1 To 20
'Cambia el tamaño de la letra
ApExcel.Cells(i, j).Font.Size = 18
Next j
Next i
Tambien podes selecciona un rango de celdas:
'Seleccionamos la primera fila
xlApp.ActiveSheet.Range( _
xlApp.ActiveSheet.Cells(1, 1), _
xlApp.ActiveSheet.Cells(1, max_col)).Select
'Ponemos color de fondo a la primera fila
xlApp.Selection.Interior.ColorIndex = 43
xlApp.Selection.Interior.Pattern = xlSolid
Con respecto a las propiedades, funciones y métodos del objeto de excel, si lo agregas como referencia podes ver su información con el examinador de objetos.
Cualquier cosa, no dudes en avisarme.
Saludos.
Pablo.
PD: No te olvides de ponerle puntaje a la respuesta.

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas