Estimados:
Tengo el siguiente problema. Desde un Cuadro Combinado, al elegir una opción, necesito abrir un determinado archivo .xls. Lo cierto es que, si bien el archivo se abre, no puedo acceder a él hasta no cerrar el formulario del archivo origen. Probé con poner el modificador False en el modal del formulario pero tampoco funciona.
Una opción es descargar el formulario y volver a cargarlo cuando se cierre el archivo, pero ello me demandaría guardar todas las opciones elegidas (son cuatro combobox que van apareciendo según las opciones de los anteriores) en sendas variables.
Si alguien puede ayudarme, se los agradeceré infinitamente.
Lun, 31/07/2017 - 16:24
#1
Abrir .xls desde formulario
Estimados:
Pude solucionar el tema sobre el que preguntaba ayer y aquí os dejo la solución. Había que crear una nueva instancia de Excel y abrir en ella el archivo en cuestión
Private Sub Apto_Change()
Dim Archivo As String
Dim xlApp As Object
Archivo = "Informe_AptoFísico" & Ciclolectivo & codturno & ".xls"
Select Case Apto
Case Is = "Abrir"
Set xlApp = CreateObject("Excel.Application")
xlApp.Application.Visible = True
xlApp.Workbooks.Open ThisWorkbook.Path & "\" & Archivo
Case Is = "Importar"
Case Is = "Exportar"
End Select
End Sub