Access - Abrir excel 2010 o 2016

 
Vista:
sin imagen de perfil

Abrir excel 2010 o 2016

Publicado por Marceloit (16 intervenciones) el 03/06/2016 22:18:46
Hola , tengo un boton que abre un excel funciona bien pero tengo algunas maquinas con excel 2016 y no encuentra la ruta , hay algun codigo para decirle que busque en una ruta o otra para abrir el archivo , les dejo como lo tengo . Saludos

En Excel 2010 lo tengo asi :
1
2
3
4
Private Sub Comando0_Click()
Dim abrir As Long
abrir = Shell("excel.exe M:\Maintenance_Database\formatos\tiempoextra.xls", vbMaximizedFocus)
End Sub



En Excel 2016 lo tengo asi:
1
2
3
4
Private Sub Comando11_Click()
Dim abrir As Long
abrir = Shell("C:\Program Files\Microsoft Office\Office16\excel.exe M:\Maintenance_Database\formatos\Formato_mantto.xlsx", vbMaximizedFocus)
End Sub
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