desplegar el formulario abrir

hola, Fredy !

... en una macro ... como hago para desplegar el formulario de abrir ... para seleccionar un archivo [...]

a) si [solo] quieres 'saber' el nombre [y ubicacion] del libro 'solicitado' =>SIN 'abrirlo'<= ...
Sub Pedir_OtroLibro()
Dim NuevoLibro As String
NuevoLibro = Application.GetOpenFilename
MsgBox NuevoLibro
End Sub

b) si [definitivamente] el usuario 'podra' abrir otro libro [o 'cancelar' la accion de apertura]...
=> toma nota de que seria necesario 'revisar' si el libro 'solicitado' ya esta abierto [y... 'evitarlo' ???] <=> IMPORTANTE: si el libro que 'se abra' [con el siguiente metodo] 'tiene macros'... Excel NO 'pregunta' si... <= OJO
Sub Abrir_OtroLibro()
Application.Dialogs(xlDialogOpen).Show
End Sub

saludos,
hector.

hola hector, si me funciona perfecto... y en caso que
quiera seleccionar una carpeta para que desde excel me
exporte un archivo dbf a esa carpeta que debo hacer?

saludos

hola, Fredy !

... en una macro ... como hago para desplegar el

formulario de abrir ... para seleccionar un archivo [...]

a) si [solo] quieres 'saber' el nombre [y ubicacion] del

libro 'solicitado' =>SIN 'abrirlo'<= ...

Sub Pedir_OtroLibro()
Dim NuevoLibro As String
NuevoLibro = Application.GetOpenFilename
MsgBox NuevoLibro
End Sub

b) si [definitivamente] el usuario 'podra' abrir otro

libro [o 'cancelar' la accion de apertura]...

=> toma nota de que seria necesario 'revisar' si el

libro 'solicitado' ya esta abierto [y... 'evitarlo' ???]
<>=> IMPORTANTE: si el libro que 'se abra' [con el
siguiente metodo] 'tiene macros'... Excel NO 'pregunta'
si... <= OJO

Sub Abrir_OtroLibro()
Application.Dialogs(xlDialogOpen).Show
End Sub

saludos,
hector.
.