Método Application.GetOpenFilename (Excel)

Exibe a caixa de diálogo Abrir padrão e obtém um nome de arquivo do usuário sem abrir nenhum arquivo.

Sintaxe

expressão.GetOpenFilename (FileFilter, FilterIndex, Título, ButtonText, MultiSelect)

expressão Uma variável que representa um Aplicativo objeto.

Parâmetros

Nome	Obrigatório/Opcional	Tipo de dados	Descrição
FileFilter	Opcional	Variantes	Uma sequência de caracteres que especifica os critérios de filtragem de arquivos.
FilterIndex	Opcional	Variant	Especifica os números de índice dos critérios de filtragem de arquivos padrão, de 1 até o número de filtros especificados em FileFilter. Se esse argumento for omitido ou for maior que o número de filtros presente, será usado o primeiro filtro de arquivos.
Title	Opcional	Variant	Especifica o título da caixa de diálogo. Se este argumento for omitido, o título será "Abrir".
ButtonText	Opcional	Variantes	Apenas para Macintosh.
MultiSelect	Opcional	Variant	True para permitir que vários nomes de arquivo sejam selecionados. False para permitir que somente um nome de arquivo seja selecionado. O valor padrão é False.

Valor de retorno

Variant

Comentários

Esta cadeia de caracteres passada no argumento FileFilter consiste em pares de cadeias de caracteres de filtros de arquivo seguidas da especificação de filtros de arquivo curinga do MS-DOS, com cada parte e cada par separados por vírgulas. Cada par separado está listado na caixa da lista suspensa Arquivos do tipo. Por exemplo, a cadeia de caracteres a seguir especifica dois filtros de arquivo: texto e suplemento:

"Text Files (*.txt), *.txt,Add-In Files (*.xla), *.xla"

Para usar múltiplas expressões curinga do MS-DOS para um tipo de filtro de arquivo simples, separe as expressões curinga com ponto-e-vírgula; por exemplo: "Visual Basic Files (*.bas; *.txt), *.bas;*.txt".

Se FileFilter for omitido, o argumento apresentará o valor padrão para"All Files (*.*), *.*".

Esse método retorna o nome de arquivo selecionado ou o nome inserido pelo usuário. O nome retornado pode incluir uma especificação do caminho. Se MultiSelect for Verdadeiro, o valor retornado será uma matriz dos nomes do arquivo selecionado (mesmo que somente um nome de arquivo esteja selecionado). Retorna False se o usuário cancelar a caixa de diálogo.

Este método pode alterar a unidade ou a pasta atual.

Exemplo

Este exemplo exibe a caixa de diálogo Abrir, com o filtro de arquivo definido como arquivos de texto. Se o usuário escolhe um nome de arquivo, o código exibe esse nome de arquivo em uma caixa de mensagem.

fileToOpen = Application _ 
 .GetOpenFilename("Text Files (*.txt), *.txt") 
If fileToOpen <> False Then 
 MsgBox "Open " & fileToOpen 
End If

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.