Ver Mensaje Individual
  #2 (permalink)  
Antiguo 08/10/2008, 04:40
Avatar de 3pies
3pies
Colaborador
 
Fecha de Ingreso: diciembre-2003
Ubicación: Desde una destilería
Mensajes: 2.584
Antigüedad: 21 años, 3 meses
Puntos: 144
Respuesta: extraer directorio de trabajo

Aquí no hay aguja que buscar, tan solo el path:
Código:
Sub directorio()
respuesta = MsgBox("Este fichero se guarda en " & ActiveWorkbook.Path)
End Sub
Para que funcione, el fichero debe estar guardado en algún sitio. Haciéndolo "al vuelo" (sobre un libro no guardado previamente), no te saldrá nada.

Salu2