Lição 15: O Objeto Workbook - Propriedades e Métodos - Parte II
Nesse lição veremos algumas das principais propriedades do objeto Workbook.
Propriedade Application:
Quando usada sem um qualificador de objeto, essa propriedade retorna um objeto Application representando o aplicativo Microsoft Excel. Quando usada com um qualificador de objeto, essa propriedade retorna um objeto Application representando o criador do objeto especificado (você pode usar essa propriedade com um objeto de Automação OLE para retornar o aplicativo desse objeto). Somente leitura.
Exemplo da propriedade Application:
Este exemplo exibe uma mensagem sobre o aplicativo que criou a variável myObject.
Set myObject = ActiveWorkbook
If myObject.Application.Value = "Microsoft Excel" Then
MsgBox "É um objeto do Microsoft Excel!!!"
Else
MsgBox "Não é um objeto do Microsoft Excel!!!"
End If
Propriedade Count:
Retorna o número de objetos da coleção. Long somente leitura.
Comentários: Para fontes de dados OLAP, somente os campos visíveis em um relatório de tabela dinâmica são contados.
Exemplo da propriedade Count:
Este exemplo exibe o número de colunas na faixa selecionada na planilhaSheet1. O código também testa se a seleção é de área múltipla; se for o caso, o código fará um loop pelas áreas da seleção de múltiplas áreas.
Worksheets("Sheet1").Activate
areaCount = Selection.Areas.Count
If areaCount <= 1 Then
MsgBox "A seleção contém " & Selection.Columns.Count & " colunas."
Else
For i = 1 To areaCount
MsgBox "Area " & i & " da selção contém " & _
Selection.Areas(i).Columns.Count & " colunas."
Next i
End If
Este exemplo faz do último caractere da célula A1 um caractere sobrescrito.
n = Worksheets("Sheet1").Range("A1").Characters. Count
Worksheets("Sheet1").Range("A1").Characters(n, 1).Font.Superscript = True
Propriedade Item (coleção Workbooks):
Retorna um único objeto Workbook de uma coleção Workbooks.
Sintaxe:
expressão.Item(Index)
expressão: Obrigatória. Uma expressão que retorne um objeto Workbooks.
Index : Variant obrigatória. O nome ou número de índice da pasta de trabalho.
Exemplo da propriedade Item (coleção Workbooks):
Este exemplo define a variável pt com a pasta de trabalho de myaddin.xla.
Set wb = Workbooks.Item("myaddin.xla")
Propriedade Parent:
Retorna o objeto pai do objeto especificado. Somente leitura.
Exemplo da propriedade Parent:
Este exemplo exibe o nome do gráfico que contém myAxis.
Set myAxis = Charts(1).Axes(xlValue)
MsgBox myAxis.Parent.Name
Voltar ao início
| PRODUTOS RELACIONADOS - EXCEL |
| LIVROS |
VÍDEO-AULAS |
E-BOOKS |
|
|
|
|
|
|
|
Uma verdadeira especialização em Office, com 6208 páginas de conteúdo que vai do básico ao avançado, detalhadamente explicado e exemplificado. Desde os recursos básicos, passando pelos recursos avançados, pela criação de macros e pela automação de tarefas usando programação VBA.
Apenas: R$ 195,00 (valor do frete já incluído)
CLIQUE AQUI PARA SABER COMO COMPRAR ESTE CD |
|
CD-01
