Função de junção VBA

Descrição de junção

Une várias substrings em uma única string.

Exemplos de junção simples

123456789

Sub Join_Example ()Dim strNomeTotal como stringDim arrName (0 a 2) como stringarrName (0) = "Michael"arrName (1) = "Pauling"strFullName = Join (arrName)MsgBox strFullNameEnd Sub

Isso será exibido da seguinte maneira.

Sintaxe de junção

No Editor VBA, você pode digitar “Join (” para ver a sintaxe da função Join:

A função Join contém 2 argumentos:

SourceArray: Array 1d contendo substrings a serem unidos.

Delimitador: [Opcional] Delimitador. Se omitido, o caractere de espaço (”“) é usado.

Exemplos de função de junção VBA do Excel

12345678

Sub JoinArray_Example1 ()Dim strFullPath As StringDim arrPath (0 a 2) como stringarrPath (0) = "C:"arrPath (1) = "Usuários"arrPath (2) = "Público"strFullPath = Join (arrPath, "\")End Sub

Resultado: C: \ Usuários \ Público

123	Sub JoinArray_Example2 ()MsgBox Join (Array ("A", "B", "C"), ",")End Sub

Resultado: “A, B, C”