“Solution de caractère dépassant dans le tableau VBA” Réponses codées

Solution de caractère dépassant dans le tableau VBA

Sub TestStrLength()
    Dim s As String
    Dim i As Integer

    s = ""
    For i = 1 To 500
        s = s & "1234567890"
    Next i

    MsgBox s
End Sub