0105-Objeto Range – Propriedades de R a X

Concluiremos a nossa série de posts sobre propriedades do objeto Range, partindo da propriedade Range e chegando à propriedade XPath.

Sub Propriedades_Range_Resize()
'Redimensiona um intervalo especificado

'Retorna um intervalo com 10 e 5 colunas com origem em A1
MsgBox Range("A1").Resize(10, 5).Address
End Sub
Sub Propriedades_Range_Row()
'Retorna o número da primeira linha de um intervalo

'No exemplo a seguir, retorna o valor 5
MsgBox Range("A5:A10").Row
End Sub
Sub Propriedades_Range_RowHeight()
'Retorna ou define a altura em pontos das linhas correspondentes

'Neste exemplo, é duplicada a altura da linha 1
Range("A1").RowHeight = Range("A1").RowHeight * 2
End Sub
Sub Propriedades_Range_Rows()
'Retorna um intervalo que contém as linhas do intervalo informado

'Neste exemplo, serão selecionadas as linhas de 1 a 10
Range("A1:A10").Rows.Select

End Sub
Sub Propriedades_Range_ShowDetail()
'True se a estrutura de tópicos for expandida para o intervalo
'especificado (de modo que o detalhe da coluna ou linha esteja
'visível). O intervalo especificado precisa ser uma única linha
'ou coluna de resumo na estrutura de tópicos

'Neste exemplo, será exibido o nível máximo de detalhes para a
'a linha 10 da planilha

Range("A10").EntireRow.ShowDetail
End Sub
Sub Propriedades_Range_ShrinkToFit()
'Retorna/define se o tamanho da fonte deve ajustar-se à largura
'da coluna

'Neste exemplo o texto da célula A1 terá sua fonte ajustada
'para que caiba na célula
Range("A1").ShrinkToFit = True
End Sub
Sub Propriedades_Range_Style()
'Retorna ou define um valor Variant, contendo um objeto Style,
'que representa o estilo do intervalo especificado.

'Neste exemplo, o estilo de A1 e definido como Percentagem.
Range("A1").Style.Name = "Percent"

End Sub
Sub Propriedades_Range_Summary()
'True se o intervalo for uma linha ou coluna de resumo de tópicos.
' O intervalo deve ser uma linha ou uma coluna.

'Será exibida uma mensagem se a coluna A for uma coluna de resumo
If Range("A1").EntireColumn.Summary = True Then MsgBox "A coluna A é uma coluna de resumo"
End Sub
Sub Propriedades_Range_Text()
'Retorna o valor da célula na forma de um string que reflete
'a formatação numérica

'Neste exemplo, um valor é inserido em A1, sendo formatado
'em seguida. São exibidas as propriedades Value e Text para
'evidenciar sua diferença
Range("A1").Value = 1250.26
Range("A1").NumberFormat = "$#,##0_);($#,##0)"
MsgBox "Value: " & Range("A1").Value & vbLf & vbLf & "Text: " & Range("A1").Text
End Sub
Sub Propriedades_Range_Top()
'Retorna a distância em pontos entre o limite superior do
'intervalo e o limite superior da linha 1

'Será retornada a distância entre as linhas 1 e 11
MsgBox Range("A11").Top
End Sub
Sub Propriedades_Range_UseStandardHeight()
'Retorna/define que as linhas do intervalo possuem
'a altura padrão de linha.

'Define as linhas de 1 a 10 com altura padrão
Range("A1:A10").UseStandardHeight = True
End Sub
Sub Propriedades_Range_UseStandardWidth()
'Retorna/define que as linhas do intervalo possuem
'a largura padrão de coluna.

'Define as colunas de A a J com largura padrão

Range("A1:J1").UseStandardWidth = True
End Sub
Sub Propriedades_Range_Validation()

'Representa a validação de dados para um intervalo de planilha,
'expressa pelo objeto Validation


'Membros do objeto Validation



'Métodos
'-------------------------------------------------------------------------------------
' Nome          | Descrição
'-------------------------------------------------------------------------------------
' Add           | Adiciona validação de dados ao intervalo especificado.
'-------------------------------------------------------------------------------------
' Delete        | Exclui o objeto.
'-------------------------------------------------------------------------------------
' Modify        | Modifica a validação de dados para um intervalo.
'-------------------------------------------------------------------------------------
'
'Propriedades
'
'---------------------------------------------------------------------------------------------
' Nome              | Descrição
'---------------------------------------------------------------------------------------------
' AlertStyle        | Retorna o estilo de alerta de validação. XlDVAlertStyle somente leitura.
'---------------------------------------------------------------------------------------------
' Application       | Ao ser usada sem um qualificador de objeto, essa propriedade retorna um
'                   | objeto Application que representa o aplicativo Microsoft Excel. Ao ser
'                   | usada com um qualificador de objeto, essa propriedade retorna um objeto
'                   | Application que representa o criador do objeto do especificado
'                   | (é possível usar essa propriedade com um objeto de automação OLE para
'                   | retornar o aplicativo desse objeto). Somente leitura.
'---------------------------------------------------------------------------------------------
' ErrorMessage      | Retorna ou define a mensagem de erro de validação de dados. String de
'                   | leitura/gravação
'---------------------------------------------------------------------------------------------
' ErrorTitle        | Retorna ou define o título da caixa de diálogo de erro na validação de
'                   | dados. String de leitura/gravação
'---------------------------------------------------------------------------------------------
' Formula1          | Retorna a expressão ou o valor associado ao formato condicional ou à
'                   | validação de dados. Pode ser um valor de constante, um valor de
'                   | seqüência de caracteres, uma referência de célula ou uma fórmula.
'                   | String somente leitura.
'---------------------------------------------------------------------------------------------
' Formula2          | Retorna a expressão ou o valor associado à segunda parte de um formato
'                   | condicional ou uma validação de dados. Usada somente quando a
'                   | propriedade Operator do formato condicional da validação de dados for
'                   | xlBetween ou xlNotBetween. Pode ser um valor de constante, um valor de
'                   | seqüência de caracteres, uma referência de célula ou uma fórmula. String
'                   |de leitura/gravação.
'---------------------------------------------------------------------------------------------
' IgnoreBlank       | True se valores em branco forem permitidos pela validação de dados do
'                   | intervalo. Boolean de leitura/gravação.
'---------------------------------------------------------------------------------------------
' InCellDropdown    | True se a validação de dados exibir uma lista suspensa que contém
'                   | valores aceitáveis. Boolean de leitura/gravação
'---------------------------------------------------------------------------------------------
' InputMessage      | Retorna ou define a mensagem de entrada da validação de dados.
'                   | String de leitura/gravação
'---------------------------------------------------------------------------------------------
' InputTitle        | Retorna ou define o título da caixa de diálogo de entrada na validação
'                   | de dados. String de leitura/gravação
'---------------------------------------------------------------------------------------------
' Operator          | Retorna um valor Long que representa o operador da validação de dados.
'---------------------------------------------------------------------------------------------
' Parent            | Retorna o objeto pai do objeto especificado. Somente leitura.
'---------------------------------------------------------------------------------------------
' ShowError         | True se a mensagem de erro de validação de dados for exibida sempre que
'                   | o usuário inserir dados inválidos. Boolean de leitura/gravação.
'---------------------------------------------------------------------------------------------
' ShowInput         | True se a mensagem de entrada de validação de dados for exibida sempre
'                   | que o usuário selecionar uma célula no intervalo de validação de dados.
'                   | Boolean de leitura/gravação.
'---------------------------------------------------------------------------------------------
' Type              | Retorna um valor Long, contendo uma constante XlDVType, que representa
'                   | a validação do tipo de dados de um intervalo.
'---------------------------------------------------------------------------------------------
' Value             | Retorna um valor Boolean que indica se todos os critérios de validação
'                   | foram atendidos (ou seja, se o intervalo contém dados válidos).
'---------------------------------------------------------------------------------------------


'Valores das constantes xlDVType

'-------------------------------------------------------------------------------
'Nome                   | Descrição
'-------------------------------------------------------------------------------
'xlValidateCustom       | Os dados são validados usando uma fórmula arbitrária.
'-------------------------------------------------------------------------------
'xlValidateDate         | Valores de data.
'-------------------------------------------------------------------------------
'xlValidateDecimal      | Valores numéricos.
'-------------------------------------------------------------------------------
'xlValidateInputOnly    | Valida somente quando o usuário altera o valor.
'-------------------------------------------------------------------------------
'xlValidateList         | O valor deve estar presente em uma lista especificada.
'-------------------------------------------------------------------------------
'xlValidateTextLength   | Tamanho do texto.
'-------------------------------------------------------------------------------
'xlValidateTime         | Valores de hora.
'-------------------------------------------------------------------------------
'xlValidateWholeNumber  | Valores numéricos inteiros.
'-------------------------------------------------------------------------------

'Neste exemplo, é permitido que a célula A1 fique sem valores

Range("A1").Validation.IgnoreBlank = True
End Sub
Sub Propriedades_Range_Value()
'Retorna/define o conteúdo da intervalo

'Neste exemplo, o valor 1 (um) é inserido em todas as células de A1:A10
Range("A1:A10").Value = 1
End Sub
Sub Propriedades_Range_Value2()
'A única diferença entre essa propriedade e a propriedade Value é que a
'propriedade Value2 não usa os tipos de dados Currency e Date.
'Você pode retornar valores formatados com esses tipos de dados como
'números de ponto flutuante usando o tipo de dados Double.

'Neste caso é exibido o conteúdo de A1
MsgBox Range("A1").Value2
End Sub
Sub Propriedades_Range_VerticalAlignment()
'Retorna/define a forma que será realizada o alinhamento
'vertical do texto na célula

'xlBottom           Tipo: Alinhamento na parte inferior da célula
'xlCenter           Tipo: Alinhamento no centro da célula
'xlDistributed      Tipo: Alinhamento distribuído
'xlJustify          Tipo: Alinhamento justificado
'xlTop              Tipo: Alinhamento na parte superior da célula

'O texto em A1 é alinhado pela parte superior da célula
Range("A1").VerticalAlignment = xlTop
End Sub
Sub Propriedades_Range_Width()
'Retorna a largura do intervalo, expressa em pontos

'Neste exemplo, é exibida a largura de A1:J10
MsgBox Range("A1:J10").Width
End Sub
Sub Propriedades_Range_Worksheet()
'Retorna o objeto planilha que contém o intervalo

'Neste exemplo, é exibido o nome da planilha ativa
MsgBox Range("A1").Worksheet.Name

End Sub
Sub Propriedades_Range_WrapText()
'Retorna/define que o texto se ajusta ao tamanho da célula
'na qual está inserido (retorno automático)

'Neste exemplo, o alinhamento de texto em A1 é definido
'com retorno automático

Range("A1").WrapText = True
End Sub
Sub Propriedades_Range_XPath()
'Retorna um objeto XPath que representa o Xpath do elemento mapeado
'para o objeto Range especificado. O contexto do intervalo determina
'se a ação terá êxito ou retornará um objeto vazio. Somente leitura.
'
'Sintaxe
'
'expressão.XPath
'
'expressão   Uma variável que representa um objeto Range.
'
'Comentários
'
'
'A propriedade XPath é válida quando o intervalo que ela contém atende
'às seguintes condições:
'
'O intervalo é uma única célula.
'Se o intervalo consistir em duas ou mais células, um destas opções
'deve ser verdadeira:
'Se as células contiverem informações XPath, todas as células no
'intervalo deverão conter informações XPath (ou seja, cada célula será
'associada a um ou mais mapas de dados) e terem conteúdo XPath idêntico
'(ou seja, cada célula contribuirá para o mesmo conjunto de mapas de dados).
'Nenhuma das células deve conter informações XPath.
'O intervalo não contém áreas descontínuas.
'  Observação
'O cabeçalho e a linha de totais de uma tabela são considerados detentores
'de informações XPath.
'
'Qualquer intervalo que não atenda às condições acima retornará um erro em
'tempo de execução.
'
'Se a seleção do intervalo for válida mas nenhuma das células estiver
'mapeada, o Excel retornará um objeto XPath para que você possa acessar o
'método SetValue para criar um mapeamento


'Exibe o XPath de A1
MsgBox Range("A1").XPath
End Sub
Anúncios

In Excel We Trust

Marcado com: , , , , , ,
Publicado em Nível: Avançado

Deixe um comentário

Preencha os seus dados abaixo ou clique em um ícone para log in:

Logotipo do WordPress.com

Você está comentando utilizando sua conta WordPress.com. Sair / Alterar )

Imagem do Twitter

Você está comentando utilizando sua conta Twitter. Sair / Alterar )

Foto do Facebook

Você está comentando utilizando sua conta Facebook. Sair / Alterar )

Foto do Google+

Você está comentando utilizando sua conta Google+. Sair / Alterar )

Conectando a %s

Visitas dos usuários
  • 2,069,536

Clique para assinar este blog e receber notificações de novos artigos por email.

Junte-se a 1.534 outros seguidores

Aumente sua interação

Siga-nos do twitter (@usuariosdoexcel).

Acesse o nosso fórum e compartilhe as suas dúvidas.

Curta nossa página no Facebook.

Junte-se ao grupo do LinkedIn.

Visite-nos utilizando o seu smartphone ou tablet.

Recomende este Blog
Visualizar notícias
Site monitorado:
Real Time Web Analytics

Clicky

%d blogueiros gostam disto: