Descrição:
A função Join
em VBA é utilizada para unir os elementos de uma matriz em uma única string. Ela permite especificar um caractere ou sequência de caracteres para separar os elementos na string resultante. Essa função é particularmente útil ao trabalhar com matrizes e ao formatar dados para exibição ou exportação.
Exemplos:
Sub Exemplo1()
Dim arr() As Variant
arr = Array("Maçã", "Banana", "Pera")
Dim str As String
str = Join(arr, ", ") ' Retorna "Maçã, Banana, Pera"
MsgBox str
End Sub

Neste exemplo, a função Join
é utilizada para unir os elementos do array arr
em uma única string, separando-os por vírgula e espaço.
Sub Exemplo2()
Dim numeros() As Variant
numeros = Array(1, 2, 3, 4, 5)
Dim str As String
str = Join(numeros, "-") ' Retorna "1-2-3-4-5"
MsgBox str
End Sub
Neste exemplo, a função Join
é utilizada para unir os elementos do array numeros
em uma única string, separando-os por hífen.
Sub Exemplo3()
Dim nomes() As Variant
nomes = Array("João", "Maria", "José")
Dim str As String
str = Join(nomes, " e ") ' Retorna "João e Maria e José"
MsgBox str
End Sub
Neste exemplo, a função Join
é utilizada para unir os elementos do array nomes
em uma única string, separando-os por ” e “.
Sub Exemplo4()
Dim letras() As Variant
letras = Array("A", "B", "C", "D", "E")
Dim str As String
str = Join(letras, "") ' Retorna "ABCDE"
MsgBox str
End Sub
Neste exemplo, a função Join
é utilizada para unir os elementos do array letras
em uma única string, sem separação.
Sub Exemplo5()
Dim vazia() As Variant
Dim str As String
str = Join(vazia, ", ") ' Retorna uma string vazia ""
MsgBox str
End Sub
Neste exemplo, a função Join
é utilizada em um array vazio. O resultado é uma string vazia.