exportar desde visual a excel

[elbano66]

buenas tardes como estan , fijencen muchachones y muchachonas si yo tengo un formulario en en basic y lleno unos datos hay como hago para enviarlos a excel exportarlo, la hoja de excel va tener una formula la cual es sumar unas notas, se puede hacer eso??

[emilio21]

yo mejor haria esto,

diseño la hoja en excel(sin formulas), luego en vb programo la cuestion y hago toas las operaciones matematicas, de solo pasarlas nada mas a excel.

para pasar datos desde vbasic a excel, aqui te pongo un ejemplo:

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
'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

espero te sirva

[elbano66]

Gracias hermano lo voy a intentar una vez que lo pruebe te digo si me funciono pero igual muchas gracias.

[elbano66]

volvi fijeate hice lo que dijistes y si funciona pero hay detallito que es lo importante que yo quiero es que esa hoja que se abre no la vea ni la modifique la persona que valla a usar esa aplicacion como puedo hacer para que por ejemplo tenga unos check box y cada check tiene su valor una vez que le de explortar me mande esos valores a excel como una base de dato o que por lo menos una ves que dspliege la hoja de excel pues no permita modificar datos de esa hoja al menos que sea el adminitrador es decir una contraseña

[emilio21]

ok, entonces quita esto:

ApExcel.Visible = True

y no se mostrara, hará las operaciones pero no se mostrara...

[elbano66]

ok pero a donde envia la hoja o el libro de excel?? como puedo hacer para llenar información en un formulario y luego envarlo a excel?

[tonoman]

disculpa, tengo una duda vi tu codigo y es muy bueno mejor que otros que vi en internet pero como puedo hacer para que no habra una hoja de calculo nueva si no que abra un archivo de excel por ejemplo factura.xls y que pase los datos a esta factura para poder imprimirlos. Saludos

[tonoman]

Iniciado por emilio21

ok, entonces quita esto:

ApExcel.Visible = True

y no se mostrara, hará las operaciones pero no se mostrara...

disculpa, tengo una duda vi tu codigo y es muy bueno mejor que otros que vi en internet pero como puedo hacer para que no habra una hoja de calculo nueva si no que abra un archivo de excel por ejemplo factura.xls y que pase los datos a esta factura para poder imprimirlos. Saludos

[David]

Iniciado por tonoman

disculpa, tengo una duda vi tu codigo y es muy bueno mejor que otros que vi en internet pero como puedo hacer para que no habra una hoja de calculo nueva si no que abra un archivo de excel por ejemplo factura.xls y que pase los datos a esta factura para poder imprimirlos. Saludos

Para ello debes reemplazar esta línea:

Código:

 
ApExcel.Workbooks.Add

Por esto:

Código:

 
ApExcel.Workbooks.Open "C:\factura.xls"