Interpreter du texte en nom de champs d'une variable

Bonjour,

Peut-on interpréter le contenu d'une cellule en nom d'une variable VBA?

je m'explique :

dans une cellule j'ai la valeur "Matricule".

Et je voudrais dans mon code VBA, pouvoir interpréter ça en :

MaValeur= Salarié.matricule

Sachant que Salarié est une classe (module de classe) ou j'ai :

Private mEntr As String

Private mMatricule As String

Private mNom As String

Private mPrenom As String

Private mDebut As Date

Private mFin As Date

Private mCodeContrat As String

Private mH_PAYE100 As Single

Private mH_ATNP As Single

Private mH_MAJ1 As Single

Private mH_SUP1 As Single

Private mH_SUP2 As Single

Private mH_NUIT As Single

C'est un genre de EVALUATE mais dans le VBA.

Cela m'éviterais d'écrire du code pour chaque champs de ma classe

merci d'avance

Bonjour,

A ma connaissance, ce n'est pas possible !

Par contre, pourquoi ne pas créer un type ? Dans un module de classe, un Type est de toute manière "Private" :

Type Salarie

    mEntr As String
    mMatricule As String
    mNom As String
    mPrenom As String
    mDebut As Date
    mFin As Date
    mCodeContrat As String
    mH_PAYE100 As Single
    mH_ATNP As Single
    mH_MAJ1 As Single
    mH_SUP1 As Single
    mH_SUP2 As Single
    mH_NUIT As Single

End Type

Sub Ini()

    Dim TSalarie As Salarie

    With TSalarie

        .mEntr = "ma chaine"
        .mMatricule = "123456"
        .mNom = "son nom"
        .mPrenom = "son prénom"
        .mDebut = CDate("15/12/2016")
        'etc...

    End With

End Sub
Rechercher des sujets similaires à "interpreter texte nom champs variable"