Bonjour,

J'ai plusieurs modules de classe :
Obj_Scn
Obj_Bat
...
A partir d'un string je voudrais pouvoir créer le type décrit d'objet dedans.

Ex. :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
 
Sub Toto()
Dim monString as String
Dim Obj as Object
 
monString = "Obj_Scn"
 
set Obj = new monString          <-- Forcément ça marche pas
 
end sub
J'ai essayé avec vbComponents mais apparemment ça ne renvoi pas une classe objet.
Bref, je ne sais pas comment faire.
Ah si, mais je souhaiterai éviter, avec un select case

Merci de faire contribuer vos neurones pour m'aider.

Cordialement.

Cribest