Tmodifier VBA

Bonjour, a la ligne générer toutes les combinaisons dans mon VBA j'utilise les variable ce dessous

j'ai en écriture la réponse suivante:

28, 7, 32, 15, 3

est ce possible de les écrire cellule par cellule séparée?

' Générer toutes les combinaisons possibles
    For i = LBound(rang1) To UBound(rang1)
        For j = LBound(rang2) To UBound(rang2)
            For k = LBound(rang3) To UBound(rang3)
                For l = LBound(rang4) To UBound(rang4)
                    For m = LBound(rang5) To UBound(rang5)
                        ' Créer la combinaison actuelle
                        resultat = rang1(i) & ", " & rang2(j) & ", " & rang3(k) & ", " & rang4(l) & ", " & rang5(m)

merci a tous

Windows / Edge 133.0.0.0