bonjour
tu peux essayer
Dim Obj As OLEObject
Set Obj = ActiveSheet.OLEObjects.Add(ClassType:='Forms.Comma ndButton.1', Link:=False, _
Left:=11, Top:=3, Width:=38, Height:=24)
Obj.Object.Caption = 'Purge'
bon apres midi
MichelXld
Message édité par: michelxld, à: 09/05/2006 12:47