sergio_bzh
XLDnaute Nouveau
Bonjour,
je suis en train de créer dynamiquement des CheckBox en VBA mais je bute sur la propriété LinkedCell. Je n'arrive pas à indiquer une cellule d'une autre feuille.
J'ai repris le code de ce post :
https://www.excel-downloads.com/threads/cases-a-cocher-creation-automatique.56149/
En particulier, par rapport au code fourni directement dans le post par MichelXLD, je n'ai qu'une différence, c'est l'utilisation d'une seconde feuille :
Le problème est que la LinkedCell de ma CheckBox est de la forme "$F$5" et non pas "Feuill2!$F$5".
Comment peut-on faire ? Ai-je raté quelque chose ?
Merci.
Sergio
je suis en train de créer dynamiquement des CheckBox en VBA mais je bute sur la propriété LinkedCell. Je n'arrive pas à indiquer une cellule d'une autre feuille.
J'ai repris le code de ce post :
https://www.excel-downloads.com/threads/cases-a-cocher-creation-automatique.56149/
En particulier, par rapport au code fourni directement dans le post par MichelXLD, je n'ai qu'une différence, c'est l'utilisation d'une seconde feuille :
Code:
Dim i As Integer, j As Integer
Dim Obj As OLEObject
i = Feuil1.Range('D65536').End(xlUp).Row
For j = 2 To i
Set Obj = Feuil1.OLEObjects.Add('Forms.CheckBox.1')
With Obj
.Left = Feuil1.Cells(j + 1, 10).Left
.Top = Feuil1.Cells(j + 1, 10).Top
.Width = Feuil1.Cells(j + 1, 10).Width
.Height = Feuil1.Cells(j + 1, 10).Height
.Object.Caption = 'L' & j - 1
.LinkedCell = [B][U]Feuil2[/U][/B].Cells(j, 5).Address
End With
Next j
Le problème est que la LinkedCell de ma CheckBox est de la forme "$F$5" et non pas "Feuill2!$F$5".
Comment peut-on faire ? Ai-je raté quelque chose ?
Merci.
Sergio