Discussion :

[johannj]

Bonjour le fil,

je souhaiterai avoir des informations sur les objets OLEO, et notamment les checkbox (case à cocher).
Je souhaite insérer des checkbox. Ne sachant pas comment faire, j'ai donc utilisé l'enregistreur de macro. J'utilise donc le code suivant:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Workbook.Worksheets(2).OLEObjects.Add ClassType:="Forms.CheckBox.1

Ma question est la suivante: est il possible d'insérer une checkbox à une ligne donnée. Je précise: je traite des données qui me donne une moyenne sur la feuille 3 de mon classeur. Pour chaque nouvelle moyenne, j'insère donc une ligne dans mon feuille 3; l'idée est d'ajouter une checkbox pour chaque nouvelle ligne insérer. Ce queje ne sais pas faire, c'est définir l'emplacement: puis je écrire un code qui pour chaque ligne insérer, une nouvelle checkbox est ajouté par exemple dans la colonne E de mon classeur?

J'espère être assez précis.

Merci d'avance pour votre aide,

Johann

Bonsoir le fil, bonsoir le forum,

Je me demandais juste si j'ai été assez précis dans mes explications, vu que pour le moment, personne n'a répondu ?

Je continue de chercher,

Merci d'avance,

Johann

[mercatog]

Sélectionne d'abord la cellule puis insert ton OLE

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
With Worksheets(2)
'...
.Range("C" & i).Select
.OLEObjects.Add ClassType:="Forms.CheckBox.1"
End With

[johannj]

Bonjour le forum, bonjour le fil,

Merci mercatog pour ta réponse. Je ne pensais pas que la solution serait aussi simple

Bonne journée et merci beaucoup pour l'aide,

Johann