[SaLoOoMX]

لها عده طرق مثل ماذكر الاخ وكلها نفس الحل

كود :

Dim n(4) As String

        n(0) = "N1"
        n(1) = "N2"
        n(2) = "N3"
        n(3) = "N4"
        n(4) = "N5"

        For Each m In n
            MsgBox(m)
        Next