Método Application.Union (Excel)

Retorna a união de dois ou mais intervalos.

Sintaxe

expressão. União (Arg1, Arg2, Arg3, Arg4, Arg5, Arg6, Arg7, Arg8, Arg9, Arg10, Arg11, Arg12, Arg13, Arg14, Arg15, Arg16, Arg17, Arg18, Arg19, Arg20, Arg21, Arg22, Arg23, Arg24, Arg25, Arg26, Arg26, Arg27, Arg27, Arg27, Arg27, Arg25, Arg26, Arg26, Arg27, Arg26, Arg27, Arg26, Arg27, Arg26, Arg27, Arg26, Arg27, Arg27, Arg27, Arg26, Arg27, Arg26, Arg27, Arg26, Arg27, Arg26, Arg27, Arg26, Arg27, Arg26, Arg27, Arg27, Arg27, Arg27, Arg27, Arg27, Arg26, Arg27, Arg27, Arg27, Arg27, Arg27, Arg27, Arg27Arg28, Arg29, Arg30)

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

Parâmetros

Nome Obrigatório/Opcional Tipo de dados Descrição
Arg1 Obrigatório Range Pelo menos dois objetos Range devem ser especificados.
Arg2 Obrigatório Range Pelo menos dois objetos Intervalo devem ser especificados.
Arg3Arg30 Opcional Variantes Um intervalo.

Valor de retorno

Intervalo

Exemplo

Este exemplo preenche a união de dois intervalos nomeados, Range1 e Range2, com a fórmula =RAND().

Worksheets("Sheet1").Activate 
Set bigRange = Application.Union(Range("Range1"), Range("Range2")) 
bigRange.Formula = "=RAND()"

Este exemplo compara a propriedade Worksheet.Range , o método Application.Union e o método Application.Intersect .

Range("A1:A10").Select                            'Selects cells A1 to A10.
Range(Range("A1"), Range("A10")).Select           'Selects cells A1 to A10.
Range("A1, A10").Select                          'Selects cells A1 and A10.
Union(Range("A1"), Range("A10")).Select           'Selects cells A1 and A10.
Range("A1:A5 A5:A10").Select                     'Selects cell A5.
Intersect(Range("A1:A5"), Range("A5:A10")).Select 'Selects cell A5.

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.