Hola amigos, espero me puedan ayudar con este problema.
Resulta que tengo que exportar datos desde mi programa hacia excel.
Esto es un archivo de excel que tiene el encabezado ya definido para que se imprima con los datos que le mande.
pienso mandar de 20 registros por impresión
pero lo que me interesa saber es como puedo hacer para mandar los datos a cierto archivo, ejemplo: archivo imprime
y como puedo cambiar el tipo de letra a "negrita" de x celda
y si me pueden ayudar también como imprimir el archivo después de que ya he pasado los datos.
No estoy pidiendo que me hagan la tarea, sino que si me pueden dar información de donde encontrar código como ese, para yo adaptarlo a mi aplicación.
De antemano gracias
hola mira yo tengo algo parecido espero que te sirva
Private Sub Command3_Click()
Dim ApExcel As Variant
Set ApExcel = CreateObject("Excel.application")'abre excel
ApExcel.Visible = True 'indica aplicacion visible
ApExcel.Workbooks.Open (App.Path & "\nombre.xls")'le das el nombre del archivo
ApExcel.cells(1, 1).formula = ""'limpias la celda
ApExcel.cells(1, 1).Font.Size = 10'tamaño de letra
ApExcel.cells(8, 6).formula = Text1.Text 'aqui es donde debes enviar los datos
ApExcel.cells(10, 2).formula = Text4.Text
ApExcel.cells(10, 6).formula = Text6.Text
ApExcel.cells(12, 2).formula = Combo1.Text
ApExcel.cells(12, 6).formula = Text5.Text
ApExcel.cells(14, 6).formula = Combo3.Text
ApExcel.cells(17, 1).formula = Text7.Text
Set ApExcel = Nothing
End Sub
los numero son la fila y columnas y las puedes trabajr con un contador
bueno espero que te sirva adios