VBA Union – Unir Vários Intervalos
Função Union – Unir Vários Intervalos
Talvez você queira combinar ou unir vários intervalos se a cadeia de intervalos for muito longa ou se quiser tentar facilitar o trabalho com o código.
A necessidade de combinar várias cadeias de intervalos é provavelmente mais comum quando se seleciona um grande número de células não contíguas com o VBA.
Uma maneira de unir várias cadeias de intervalo é usar a função Union do VBA. A sintaxe da função Union é a seguinte
Union(Arg1 as Range, Arg2 as Range,etc,etc) as Range
A seguir, um exemplo de uso da função Union. Primeiro, você declara algumas variáveis de intervalo, depois define as variáveis de intervalo como iguais a algo e, por fim, combina-as usando a função Union.
Sub ExemploUnion()
Dim Rng1, Rng2, Rng3 As Range
Set Rng1 = Range("A1,A3,A5,A7,A9,A11,A13,A15,A17,A19,A21")
Set Rng2 = Range("C1,C3,C5,C7,C9,C11,C13,C15,C17,C19,C21")
Set Rng3 = Range("E1,E3,E5,E7,E9,E11,E13,E15,E17,E19,E21")
Union(Rng1, Rng2, Rng3).Select
End Sub
Codificação VBA Facilitada
Pare de procurar códigos VBA on-line. Saiba mais sobre o AutoMacro – um construtor de código VBA que permite que os iniciantes codifiquem procedimentos do zero com o mínimo de conhecimento de codificação e com muitos recursos que economizam tempo para todos os usuários!