path relativo a la hora de abrir o guardar un fichero.

[Osasa54]

Hola, tengo la siguiente linea de código, la cual me abre un fichero .xls:
Workbooks.Open Filename:="C:\Windows\base.xls"
el fichero de excel que yo tengo lo ejecuto desde "c:\windows\", y lo que me gustaría es saber como podría poner un path relativo al directorio en el que estoy trabajando. He probado con Workbooks.Open Filename:=".\base.xls", pero evidentemente no me lo coge.
Un saludo

Oscar

 

[Greg Truby]

Hola Oscar,

Si comprendo su pregunta bien, creo que usted podría utilizar la propriedad .Path de objetos Workbook.

strSendero = Workbooks("Ventas").Path

o

strSendero = ActiveWorkbook.Path

luego puede hacer algo como

strSendero = strSendero & Application.PathSeparator
Workbooks.Open FileName:=strSendero & "Compras.xls"

Saludos,

 

[Osasa54]

Perfecto!! Muchas gracias.