Application.GetOpenFilename (Excel)
Muestra el cuadro de diálogo Abrir estándar y obtiene un nombre de archivo del usuario sin abrir los archivos.
Esta cadena pasada en el argumento FileFilter consta de pares de cadenas de filtros de archivo seguidas de la especificación de filtro de archivo comodín de MS-DOS, con cada elemento y cada par separados por comas. "Text Files (*.txt),*.txt,Add-In Files (*.xla),*.xla" Para usar varias expresiones comodín de MS-DOS para un único tipo de filtro de archivo, separe las expresiones comodín con puntos y coma, por ejemplo: "Visual Basic Files (*.bas; *.txt),*.bas;*.txt". Si FileFilter se omite, el valor predeterminado de este argumento es "All Files (*.*),*.*". Este método devuelve el nombre de archivo seleccionado o el nombre que ha especificado el usuario. Este método puede cambiar la unidad o la carpeta actual.
GetOpenFilename (FileFilter, FilterIndex, Title, ButtonText, MultiSelect)
fileToOpen = Application _
.GetOpenFilename("Text Files (*.txt), *.txt")
If fileToOpen <> False Then
MsgBox "Open " & fileToOpen
End If
Arguments
Optional arguments
Los siguientes argumentos son opcionales
FileFilter (String) - Una cadena que especifica los criterios de filtrado de archivo.
FilterIndex (Long) - Especifica los números de índice de los criterios de filtrado de archivos predeterminados, desde 1 hasta el número de filtros especificado en FileFilter.
Title (String) - Especifica el título del cuadro de diálogo.
ButtonText (String) - Solo Macintosh.
MultiSelect (Boolean) - True para permitir la selección de varios nombres de archivo.