Excel userform VBA

Question

Eu quero alterar um rótulo de acordo com uma combinação de células. Por exemplo, eu tenho 5 colunas que posso mostrar no meu rótulo. Mas vou mostrar apenas as colunas que não estão em branco. Label.Caption = Coluna A, Coluna C e Coluna D Como posso expressar isso em VBA em Label.Caption? Obrigado

    

Answer 1

Algo parecido com isto

Sub Henrique()
    Dim labelRow As Long
    Dim labelText As String
    Dim i As Long
    labelRow = 1
    For i = 1 To 5
        If Not IsEmpty(Sheet1.Cells(labelRow, i)) Then
            labelText = labelText & Sheet1.Cells(labelRow, i) & " "
        End If
    Next
    labelText = Trim$(labelText)
    With UserForm1.Label1
        .Caption = labelText
    End With
End Sub