Abrir Excel en primer plano
Publicado por Jose (8 intervenciones) el 28/07/2020 18:23:24
Buenas tardes,
Gracias de antemano a toda esta gran comunidad.
Estoy atascado en algo que creo que es muy básico. En un Access desde un botón llamo a un archivo Excel donde tengo almacenado todos los turnos de mis empleados. El Access se visualiza a pantalla completa y lo que necesito es que el Excel se vea en primer plano, es decir, no se quede por detrás del Access. Pongo el código del botón que levanta el archivo Excel.
Gracias.
Gracias de antemano a toda esta gran comunidad.
Estoy atascado en algo que creo que es muy básico. En un Access desde un botón llamo a un archivo Excel donde tengo almacenado todos los turnos de mis empleados. El Access se visualiza a pantalla completa y lo que necesito es que el Excel se vea en primer plano, es decir, no se quede por detrás del Access. Pongo el código del botón que levanta el archivo Excel.
1
2
3
4
5
6
7
Private Sub btnExcel_Click()
Dim Abrir_Excel As Object
Set Abrir_Excel = CreateObject("Excel.Application")
Abrir_Excel.Visible = True
Abrir_Excel.Workbooks.Open ("C:\Users\Jose\Desktop\Turnos.xlsx")
Abrir_Excel.Windows("Turnos.xlsx").Activate
End Sub.Gracias.
Valora esta pregunta
0
