NUNCA MAIS PASSE RAIVA POR NÃO CONSEGUIR RESOLVER UM PROBLEMA COM O EXCEL - GARANTIDO!

UNIVERSIDADE DO VBA - Domine o VBA no Excel Criando Sistemas Completos - Passo a Passo - CLIQUE AQUI

Quer Receber Novidades e E-books Gratuitos de Excel? * Junte-se a mais de 103.000 pessoas!

Curso Grátis de Excel Avançado - Módulo 6 - Lição: O Objeto Application - Propriedades e Métodos - Parte 2

120 Lições | Gratuito Online | Autor: Júlio Battisti


Continuação do estudo das principais propriedades do objeto Application.

Propriedade DefaultFilePath:

Essa propriedade retorna ou define o caminho padrão que o Microsoft Excel usa ao abrir arquivos. String de leitura e gravação. Por padrão é a pasta Meus documentos, ou seja, quando você seleciona o comando Arquivo -> Salvar ou Arquivo -> Abrir, por padrão, é acessada a pasta Meus documentos.

Exemplo da propriedade DefaultFilePath:

Este exemplo exibe o atual caminho de arquivo padrão.

MsgBox "O caminho padrão é: " & Application.DefaultFilePath

Propriedade DefaultSaveFormat:

Essa propriedade retorna ou define o formato padrão para salvar arquivos. Para obter uma lista de constantes válidas, consulte a propriedade FileFormat. Do tipo Long de leitura e gravação. Na tabela a seguir temos uma lista de constantes válidas para essa propriedade:

Excel Avançado em 120 Lições - Júlio Battisti

Dependendo do idioma da sua versão do Excel, algumas dessas constantes podem não estar disponíveis.

Exemplo da propriedade DefaultSaveFormat:

Este exemplo define o formato padrão para salvar arquivos.

Application.DefaultSaveFormat = xlExcel4Workbook

Propriedade RecentFiles:

Essa propriedade retorna uma coleção RecentFiles representando a lista de arquivos usados recentemente.

Exemplo da propriedade RecentFiles:

Este exemplo define como 6 o número máximo de arquivos da lista de arquivos usados recentemente.

Application.RecentFiles.Maximum = 6

Principais Métodos do método Application:

Vamos iniciar o estudo dos principais métodos do objeto Application. Esse estudo seguirá na Próxima lição.

Método InputBox:

Esse método exibe uma caixa de diálogo para entrada pelo usuário e retorna as informações inseridas na caixa de diálogo.

Sintaxe:

Expressão.InputBox(Prompt, Title, Default, Left, Top, HelpFile, HelpContextId, Type)

Expressão: É obrigatória e deve ser uma expressão que retorne um objeto Application.

Prompt: String obrigatória. A mensagem a ser exibida na caixa de diálogo. Pode ser uma seqüência, um número, uma data ou um valor Boolean (o Microsoft Excel converte o valor automaticamente para uma String antes dele ser exibido).

Title: Variant opcional. O título da caixa de entrada. Se esse argumento for omitido, o título padrão será "Entrada".

Default: Variant opcional. Especifica um valor que aparecerá na caixa de texto quando a caixa de diálogo for inicialmente exibida. Se esse argumento for omitido, a caixa de texto será deixada vazia. Esse valor pode ser um objeto Range.

Left: Variant opcional. Especifica uma posição x para a caixa de diálogo em relação ao canto superior esquerdo da tela, em pontos.

Top: Variant opcional. Especifica uma posição y para a caixa de diálogo em relação ao canto superior esquerdo da tela, em pontos.

HelpFile: Variant opcional. O nome do arquivo de Ajuda para essa caixa de entrada. Se os argumentos HelpFile e HelpContextID estiverem presentes, um botão Ajuda aparecerá na caixa de diálogo.

HelpContextId: Variant opcional. O número de identificação do contexto do tópico da Ajuda em HelpFile.

Type: Variant opcional. Especifica o tipo de dados retornado. Se esse argumento for omitido, a caixa de diálogo retornará texto. Pode ser um dos valores abaixo ou a soma deles.

Valor Significado
0 Uma fórmula
1 Um número
2 Texto (uma seqüência)
4 Um valor lógico (True ou False)
8 Uma referência a células, como um objeto Range
16 Um valor de erro, como #N/D
64 Uma matriz de valores

Você pode usar a soma dos valores permitidos para Type. Por exemplo, para uma caixa de entrada que possa aceitar tanto texto como números, defina Type como 1 + 2.

Comentários:

Use InputBox para exibir uma caixa de diálogo simples para que você possa inserir informações a serem usadas em uma macro. A caixa de diálogo tem um botão OK e um botão Cancelar. Quando você escolhe o botão OK, InputBox retorna o valor inserido na caixa de diálogo. Quando você clica no botão Cancelar, InputBox retorna False.

Quando Type é 0, InputBox retorna a fórmula na forma de texto - por exemplo, "=2*PI()/360". Se houver quaisquer referências na fórmula, elas serão retornadas como referências de estilo A1. (Use ConvertFormula para fazer a conversão entre estilos de referências).

Quando Type é 8, InputBox retorna um objeto Range. Você precisa usar a instrução Set para atribuir o resultado a um objeto Range, como mostrado no exemplo seguinte.

Set myRange = Application.InputBox(prompt := "Sample", type := 8)

Se você não usar a instrução Set, a variável será definida com o valor no intervalo em vez do próprio objeto Range.

Se você usar o método InputBox para pedir uma fórmula ao usuário, você terá que usar a propriedade FormulaLocal para atribuir a fórmula a um objeto Range. A fórmula de entrada deverá estar no idioma do usuário.

Exemplo do método InputBox:

Este exemplo pede um número ao usuário.

myNum = Application.InputBox("Digite um número:")

Este exemplo pede ao usuário que selecione uma célula em Plan1. Este exemplo usa o argumento Type para assegurar que o valor retornado seja uma referência de célula válida (um objeto Range).

Worksheets("Plan1").Activate
Set myCell = Application.InputBox(prompt:="Select a cell", Type:=8)

[LIVRO]: MACROS E PROGRAMAÇÃO VBA NO EXCEL 2010 - PASSO-A-PASSO

APRENDA COM JULIO BATTISTI - 1124 PÁGINAS: CLIQUE AQUI