Msgbox tableau

Bonjour,

Il y a plusieur sujet sur google où on demande ça, mais je ne comprend pas ces topics, on voit des réponses differentes ...

Je cherche à afficher les valeurs d'un tableau dans un msgbox, il y a une formule general ou c'est du cas par cas ?

Merci

Bonjour,

Un exemple dans le fichier joint.

Cdlt.

Public Sub Message()
Dim TD As Range, Cell As Range, Msg As String
    Set TD = Range("Table1")
    For Each Cell In TD.ListObject.DataBodyRange
        Msg = Msg & Cell.Value & vbNewLine
    Next Cell
    MsgBox Msg, 64, "Information"
End Sub