No abrir archivo Excel si este no está en una ruta especifica del pc
Quisiera saber si se puede incluir una instrucción a un libro excel, que impida que este se abra si no está en determinada ruta del pc, por ejemplo, si la instrucción dice que la ruta debe ser C:/Archivo, y si copio el archivo al escritorio, y lo intento abrir desde ahí, se impida la apertura del mismo.
1 respuesta
Respuesta de Dante Amor
2
Te anexo una macro para que la pongas en los eventos de thisworkbook
Private Sub Workbook_Open() 'Por.Dante Amor ruta = ThisWorkbook.Path If ruta <> "C:\Archivo" Then MsgBox "El archivo no está en la ruta, se cerrará la aplicación" Application.DisplayAlerts = False Application.Quit End If End Sub
Instrucciones para poner la macro en los eventos ThisWorkbook
- Abre tu libro de excel
- Para abrir Vba-macros y poder pegar la macro, Presiona Alt + F11
- Del lado izquierdo dice: VBAProject, abajo dale doble click a ThisWorkbook
- Del lado derecho copia la macro
Nota: Para que funcione, las macro deberán habilitarse.
S a l u d o s . D a n t e A m o r
Recuerda valorar la respuesta.
