Ajouter une variable dans un nom de variable ?

Bonjour,

Dans le code ci dessous je souhaiterais trouver une solution en rajoutant un 2ème argument dans la procédure afin de changer dynamiquement ma variable "F1H1".

Ce que je voudrais faire, c'est de changer en fonction de l'argument passé dans ma procédure (1, 2, 3 ou 4 par exemple), changer le nom de la variable F1H1 pour F1H2, ou F1H3, etc...

En gros avoir mon nom de variable F1Hx dont le x serait un entier donné en paramètre à la procédure lors de son appel.

Je ne sais pas si c'est clair comme explication

Public Sub compte_formateur(num_cellule As Integer)
'Cette function va faire en sorte de compter les formateurs dans

Select Case num_cellule

Case Is = 0
    If F1H1 = "" Then
        If curCell.Offset(num_cellule, 0).Value <> vbNullString Then
            F1H1 = curCell.Offset(num_cellule, 0).Value
        End If
    End If

Merci d'avance

David

Bonjour,

ça n'existe pas en vba, tu peux utiliser un tableau :

Dim F1H(1 to 4) as type_voulu

Que je suppose déclarée en Public hors Sub...

Et :

Public Sub compte_formateur(num_cellule As Integer, arg2 as integer)
Select Case num_cellule

Case Is = 0
    If F1H(arg2) = "" Then
        If curCell.Offset(num_cellule, 0).Value <> vbNullString Then
            F1H(arg2) = curCell.Offset(num_cellule, 0).Value
        End If
    End If

eric

PS : une fonction c'est avec Function, là c'est une procédure

Bonjour eriiic, c'est impeccable ca fonctionne

Merci