Grace à l'aide de MichelXld, j'ai appris pas mal de choses sur les objets, mais j'ai oublié de lui demander comment on vérifiait l'exstence d'un objet créer par le code suivant.
Merci de m'aider.
Eric D
Dim Obj As OLEObject
Set Obj = Sheets('Feuil1').OLEObjects.Add(ClassType:='Forms.TextBox.1', _
Link:=False, DisplayAsIcon:=False, Left:=369, Top:=12, Width:=342, Height:=200)
Merci pour votre aide, et bonne soirée
Eric D