Bonjour,

Dans le cadre d'un projet, j'aurais besoin de faire une boucle sur un ensemble de variable.
voici le code:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
Dim i, iligne, icolonne As Integer
Dim mem1, mem2 As String 'etc jusq'à mem 16

i = 1
For iligne = 2 To 346
    For icolonne = 3 To 20
        If Worksheets("Angst & Pfister").Cells(iligne, icolonne) <> "" Then
            mem& i = Worksheets("Angst & Pfister").Cells(iligne, icolonne)
            i = i + 1
        End If
    Next icolonne
Next iligne
en gros je voudrais que pour chaque colonne corresponde une variable mem mais je ne sais pas comment faire...

Pourriez-vous m'aider ?
Merci d'avance