Cuadro de dialogo de Abrir archivo

01/07/2004 - 18:19 por Luis Herrero | Informe spam
Hola, tengo un problemilla,

estoy haciendo una macro grandecita, que toma datos de
otra hoja Excel. Lo primero que hace la macro es
preguntar al usuario por este fichero de entrada. Yo lo
habia hecho mediante un InputBox pero ahora mi cliente
dice que no le gusta y que quiere un "Browser" para
escoger el fichero.
Mi peticion es si alguien tiene el codigo VBA para llamar
a la API de Windows y llamar al cuadro de dialogo
estandar para abrir archivos.

Agradeceria una solucion urgente, por favor, que mi
cliente como me retrase mas mi cliente me "muele a palos".

Gracias,

Luis

Preguntas similare

Leer las respuestas

#1 JoseLuisArg
01/07/2004 - 19:26 | Informe spam
qué violento tu cliente!!! que se tranquilize no hace falta API's:

Sub OpenDialog()
With Application.FileDialog(msoFileDialogOpen)
.AllowMultiSelect = True
.Filters.Clear
.Filters.Add "Microsoft Excel", "*.xls"
.Filters.Add "Todos los archivos", "*.*"
.Title = "Abrir..."
.Show
For I = 1 To .SelectedItems.Count
MsgBox .SelectedItems(I)
Next I
End With
End Sub

José Luis
Guns And Roses



"Luis Herrero" escribió en el mensaje
news:2415e01c45f87$3a5a0be0$
Hola, tengo un problemilla,

estoy haciendo una macro grandecita, que toma datos de
otra hoja Excel. Lo primero que hace la macro es
preguntar al usuario por este fichero de entrada. Yo lo
habia hecho mediante un InputBox pero ahora mi cliente
dice que no le gusta y que quiere un "Browser" para
escoger el fichero.
Mi peticion es si alguien tiene el codigo VBA para llamar
a la API de Windows y llamar al cuadro de dialogo
estandar para abrir archivos.

Agradeceria una solucion urgente, por favor, que mi
cliente como me retrase mas mi cliente me "muele a palos".

Gracias,

Luis
Respuesta Responder a este mensaje
#2 Fernando Gomez
01/07/2004 - 19:27 | Informe spam
Inserta este codigo donde quieres que abra el browser


Myfile = Application.GetOpenFilename("text Files,*.*")
Workbooks.OpenText FileName:=Myfile, Origin:=xlWindows _


"Luis Herrero" wrote in message
news:2415e01c45f87$3a5a0be0$
Hola, tengo un problemilla,

estoy haciendo una macro grandecita, que toma datos de
otra hoja Excel. Lo primero que hace la macro es
preguntar al usuario por este fichero de entrada. Yo lo
habia hecho mediante un InputBox pero ahora mi cliente
dice que no le gusta y que quiere un "Browser" para
escoger el fichero.
Mi peticion es si alguien tiene el codigo VBA para llamar
a la API de Windows y llamar al cuadro de dialogo
estandar para abrir archivos.

Agradeceria una solucion urgente, por favor, que mi
cliente como me retrase mas mi cliente me "muele a palos".

Gracias,

Luis
email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida