Visual Basic para Aplicaciones - Macros de Excell desde Visual

Life is soft - evento anual de software empresarial
 
Vista:

Macros de Excell desde Visual

Publicado por Yina (3 intervenciones) el 24/10/2001 19:39:01
Alguien podria decirme donde conseguir informacion o manuales de como manejar macros de excell desde visual ????

Se los agradecere muchisimo
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Macros de Excell desde Visual

Publicado por Mauricio Baeza (262 intervenciones) el 26/10/2001 08:46:30
Como que quieres saber??, tengo algo de experiencia en el uso de Excel desde VB, aqui te pongo un ejemplo de como ejecutar una macro de Excel desde VB, debes de tener un archivo llamado Temporal.xls en el mismo directorio de tu proyecto, y , este archivo, a su vez, debe de tener una macro que se llame Prueba...

Private Sub cmdEjecutarMacro_Click()
Dim objArchivoXls As Object
Dim co1 As Integer
Dim intUltimo As Long

'Verifico que exista el archivo
If Len(Dir(App.Path & "\Temporal.xls")) > 0 Then
'Creo una instancia del archivo de Excel
Set objArchivoXls = GetObject(App.Path & "\Temporal.xls")
'objArchivoXls.Visible = True
With objArchivoXls.ActiveSheet
'Muestro el libro, por si esta oculta
.Parent.Windows(1).Visible = True

'Ejecutamos la macro prueba en ese libro
.Parent.Application.Run "Prueba"
End With
'Guardamos el archivo
objArchivoXls.Save 'App.Path & "\Temporal.xls"

'Liberamos la memoria
Set objArchivoXls = Nothing

MsgBox "Proceso terminado"
Else
MsgBox "Archivo no existe"
End If

End Sub
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar