Ver Mensaje Individual
  #2 (permalink)  
Antiguo 07/05/2007, 13:52
Avatar de emilio21
emilio21
 
Fecha de Ingreso: enero-2005
Ubicación: Venezuela
Mensajes: 320
Antigüedad: 20 años, 3 meses
Puntos: 1
Re: exportar desde visual a excel

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
__________________
¡Estamos para Enseñar y Aprender!