Est t'il possible d'automatiser des cases à cocher sur XL 2007,
Je souhaiterais que dés qu'il y a quelque chose dans la colonne C,
qu'automatiquement une case à cocher (du formulaire) se mette dans la
colonne B et que sa cellule lié soit dans la colonne A
Exemple
si dans Col C j'ai :
C3 = titi
C5 = momo
C8 = fafa
Alors il faudrait que j'ai des cases à cochers en B3, B5 et B8 et que les
cellules liés de ces cases soit A3, A5 et A8. Pas sure que ce soit
réalisable.
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
DanielCo
Bonjour, Mets ce code dans le module feuille :
Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column = 3 And Target <> "" Then Set chkb = ActiveSheet.OLEObjects.Add(ClassType:="Forms.CheckBox.1", _ Left:=Target.Offset(, -1).Left, Top:=Target.Top, _ Width:=Target.Offset(, -1).Top, Height:=Target.Height) chkb.LinkedCell = Target.Offset(, -2).Address chkb.Object.Value = False
'chkb.Value = False End If End Sub
Il te restera à gérer, les RAB de cellule, les changements d valeur dans les cellules. Cordialement. Daniel
Bonjour,
Est t'il possible d'automatiser des cases à cocher sur XL 2007,
Je souhaiterais que dés qu'il y a quelque chose dans la colonne C, qu'automatiquement une case à cocher (du formulaire) se mette dans la colonne B et que sa cellule lié soit dans la colonne A
Exemple
si dans Col C j'ai :
C3 = titi C5 = momo C8 = fafa
Alors il faudrait que j'ai des cases à cochers en B3, B5 et B8 et que les cellules liés de ces cases soit A3, A5 et A8. Pas sure que ce soit réalisable.
Merci
Manu
Bonjour,
Mets ce code dans le module feuille :
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 3 And Target <> "" Then
Set chkb =
ActiveSheet.OLEObjects.Add(ClassType:="Forms.CheckBox.1", _
Left:=Target.Offset(, -1).Left, Top:=Target.Top, _
Width:=Target.Offset(, -1).Top, Height:=Target.Height)
chkb.LinkedCell = Target.Offset(, -2).Address
chkb.Object.Value = False
'chkb.Value = False
End If
End Sub
Il te restera à gérer, les RAB de cellule, les changements d valeur
dans les cellules.
Cordialement.
Daniel
Bonjour,
Est t'il possible d'automatiser des cases à cocher sur XL 2007,
Je souhaiterais que dés qu'il y a quelque chose dans la colonne C,
qu'automatiquement une case à cocher (du formulaire) se mette dans la colonne
B et que sa cellule lié soit dans la colonne A
Exemple
si dans Col C j'ai :
C3 = titi
C5 = momo
C8 = fafa
Alors il faudrait que j'ai des cases à cochers en B3, B5 et B8 et que les
cellules liés de ces cases soit A3, A5 et A8. Pas sure que ce soit
réalisable.
Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column = 3 And Target <> "" Then Set chkb = ActiveSheet.OLEObjects.Add(ClassType:="Forms.CheckBox.1", _ Left:=Target.Offset(, -1).Left, Top:=Target.Top, _ Width:=Target.Offset(, -1).Top, Height:=Target.Height) chkb.LinkedCell = Target.Offset(, -2).Address chkb.Object.Value = False
'chkb.Value = False End If End Sub
Il te restera à gérer, les RAB de cellule, les changements d valeur dans les cellules. Cordialement. Daniel
Bonjour,
Est t'il possible d'automatiser des cases à cocher sur XL 2007,
Je souhaiterais que dés qu'il y a quelque chose dans la colonne C, qu'automatiquement une case à cocher (du formulaire) se mette dans la colonne B et que sa cellule lié soit dans la colonne A
Exemple
si dans Col C j'ai :
C3 = titi C5 = momo C8 = fafa
Alors il faudrait que j'ai des cases à cochers en B3, B5 et B8 et que les cellules liés de ces cases soit A3, A5 et A8. Pas sure que ce soit réalisable.
Merci
Manu
MichD
Voir message sur l'autre fil.
MichD -------------------------------------------- "Manu" a écrit dans le message de groupe de discussion : 4e1983bb$0$30785$
Bonjour,
Est t'il possible d'automatiser des cases à cocher sur XL 2007,
Je souhaiterais que dés qu'il y a quelque chose dans la colonne C, qu'automatiquement une case à cocher (du formulaire) se mette dans la colonne B et que sa cellule lié soit dans la colonne A
Exemple
si dans Col C j'ai :
C3 = titi C5 = momo C8 = fafa
Alors il faudrait que j'ai des cases à cochers en B3, B5 et B8 et que les cellules liés de ces cases soit A3, A5 et A8. Pas sure que ce soit réalisable.
Merci
Manu
Voir message sur l'autre fil.
MichD
--------------------------------------------
"Manu" a écrit dans le message de groupe de discussion : 4e1983bb$0$30785$ba4acef3@reader.news.orange.fr...
Bonjour,
Est t'il possible d'automatiser des cases à cocher sur XL 2007,
Je souhaiterais que dés qu'il y a quelque chose dans la colonne C,
qu'automatiquement une case à cocher (du formulaire) se mette dans la
colonne B et que sa cellule lié soit dans la colonne A
Exemple
si dans Col C j'ai :
C3 = titi
C5 = momo
C8 = fafa
Alors il faudrait que j'ai des cases à cochers en B3, B5 et B8 et que les
cellules liés de ces cases soit A3, A5 et A8. Pas sure que ce soit
réalisable.
MichD -------------------------------------------- "Manu" a écrit dans le message de groupe de discussion : 4e1983bb$0$30785$
Bonjour,
Est t'il possible d'automatiser des cases à cocher sur XL 2007,
Je souhaiterais que dés qu'il y a quelque chose dans la colonne C, qu'automatiquement une case à cocher (du formulaire) se mette dans la colonne B et que sa cellule lié soit dans la colonne A
Exemple
si dans Col C j'ai :
C3 = titi C5 = momo C8 = fafa
Alors il faudrait que j'ai des cases à cochers en B3, B5 et B8 et que les cellules liés de ces cases soit A3, A5 et A8. Pas sure que ce soit réalisable.
Merci
Manu
Manu
Merci Daniel, ca fonctionne nickel mais ce ne sont pas des cases de formulaires.Ce qu'à réalisé Mich me convient davantage hormis que si c'est possible, j'aurais preferé avoir la case seul et sans texte dedans. Je suppose que ce que tu appelle les RAB, ce sont les dimensions ? Merci Manu
"DanielCo" a écrit dans le message de news: ivc5et$nq6$
Bonjour, Mets ce code dans le module feuille :
Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column = 3 And Target <> "" Then Set chkb = ActiveSheet.OLEObjects.Add(ClassType:="Forms.CheckBox.1", _ Left:=Target.Offset(, -1).Left, Top:=Target.Top, _ Width:=Target.Offset(, -1).Top, Height:=Target.Height) chkb.LinkedCell = Target.Offset(, -2).Address chkb.Object.Value = False
'chkb.Value = False End If End Sub
Il te restera à gérer, les RAB de cellule, les changements d valeur dans les cellules. Cordialement. Daniel
Bonjour,
Est t'il possible d'automatiser des cases à cocher sur XL 2007,
Je souhaiterais que dés qu'il y a quelque chose dans la colonne C, qu'automatiquement une case à cocher (du formulaire) se mette dans la colonne B et que sa cellule lié soit dans la colonne A
Exemple
si dans Col C j'ai :
C3 = titi C5 = momo C8 = fafa
Alors il faudrait que j'ai des cases à cochers en B3, B5 et B8 et que les cellules liés de ces cases soit A3, A5 et A8. Pas sure que ce soit réalisable.
Merci
Manu
Merci Daniel, ca fonctionne nickel mais ce ne sont pas des cases de
formulaires.Ce qu'à réalisé Mich me convient davantage hormis que si c'est
possible, j'aurais preferé avoir la case seul et sans texte dedans.
Je suppose que ce que tu appelle les RAB, ce sont les dimensions ?
Merci
Manu
"DanielCo" <dcolardelleZZZ@free.fr> a écrit dans le message de news:
ivc5et$nq6$1@speranza.aioe.org...
Bonjour,
Mets ce code dans le module feuille :
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 3 And Target <> "" Then
Set chkb =
ActiveSheet.OLEObjects.Add(ClassType:="Forms.CheckBox.1", _
Left:=Target.Offset(, -1).Left, Top:=Target.Top, _
Width:=Target.Offset(, -1).Top, Height:=Target.Height)
chkb.LinkedCell = Target.Offset(, -2).Address
chkb.Object.Value = False
'chkb.Value = False
End If
End Sub
Il te restera à gérer, les RAB de cellule, les changements d valeur dans
les cellules.
Cordialement.
Daniel
Bonjour,
Est t'il possible d'automatiser des cases à cocher sur XL 2007,
Je souhaiterais que dés qu'il y a quelque chose dans la colonne C,
qu'automatiquement une case à cocher (du formulaire) se mette dans la
colonne B et que sa cellule lié soit dans la colonne A
Exemple
si dans Col C j'ai :
C3 = titi
C5 = momo
C8 = fafa
Alors il faudrait que j'ai des cases à cochers en B3, B5 et B8 et que les
cellules liés de ces cases soit A3, A5 et A8. Pas sure que ce soit
réalisable.
Merci Daniel, ca fonctionne nickel mais ce ne sont pas des cases de formulaires.Ce qu'à réalisé Mich me convient davantage hormis que si c'est possible, j'aurais preferé avoir la case seul et sans texte dedans. Je suppose que ce que tu appelle les RAB, ce sont les dimensions ? Merci Manu
"DanielCo" a écrit dans le message de news: ivc5et$nq6$
Bonjour, Mets ce code dans le module feuille :
Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column = 3 And Target <> "" Then Set chkb = ActiveSheet.OLEObjects.Add(ClassType:="Forms.CheckBox.1", _ Left:=Target.Offset(, -1).Left, Top:=Target.Top, _ Width:=Target.Offset(, -1).Top, Height:=Target.Height) chkb.LinkedCell = Target.Offset(, -2).Address chkb.Object.Value = False
'chkb.Value = False End If End Sub
Il te restera à gérer, les RAB de cellule, les changements d valeur dans les cellules. Cordialement. Daniel
Bonjour,
Est t'il possible d'automatiser des cases à cocher sur XL 2007,
Je souhaiterais que dés qu'il y a quelque chose dans la colonne C, qu'automatiquement une case à cocher (du formulaire) se mette dans la colonne B et que sa cellule lié soit dans la colonne A
Exemple
si dans Col C j'ai :
C3 = titi C5 = momo C8 = fafa
Alors il faudrait que j'ai des cases à cochers en B3, B5 et B8 et que les cellules liés de ces cases soit A3, A5 et A8. Pas sure que ce soit réalisable.
Merci
Manu
DanielCo
Non, ce que j'entendais par RAB, c'était effacement de la cellule (Remise A Blanc). Pour les dimensions, Height représente la hauteur et Width la largeur en points (72 points= 2.52 cm) Daniel
Merci Daniel, ca fonctionne nickel mais ce ne sont pas des cases de formulaires.Ce qu'à réalisé Mich me convient davantage hormis que si c'est possible, j'aurais preferé avoir la case seul et sans texte dedans. Je suppose que ce que tu appelle les RAB, ce sont les dimensions ? Merci Manu
Non, ce que j'entendais par RAB, c'était effacement de la cellule
(Remise A Blanc). Pour les dimensions, Height représente la hauteur et
Width la largeur en points (72 points= 2.52 cm)
Daniel
Merci Daniel, ca fonctionne nickel mais ce ne sont pas des cases de
formulaires.Ce qu'à réalisé Mich me convient davantage hormis que si c'est
possible, j'aurais preferé avoir la case seul et sans texte dedans.
Je suppose que ce que tu appelle les RAB, ce sont les dimensions ?
Merci
Manu
Non, ce que j'entendais par RAB, c'était effacement de la cellule (Remise A Blanc). Pour les dimensions, Height représente la hauteur et Width la largeur en points (72 points= 2.52 cm) Daniel
Merci Daniel, ca fonctionne nickel mais ce ne sont pas des cases de formulaires.Ce qu'à réalisé Mich me convient davantage hormis que si c'est possible, j'aurais preferé avoir la case seul et sans texte dedans. Je suppose que ce que tu appelle les RAB, ce sont les dimensions ? Merci Manu
Manu
Ok, j'ai pigé, merci Daniel
Manu
"DanielCo" a écrit dans le message de news: 4e19e89c$0$23680$
Non, ce que j'entendais par RAB, c'était effacement de la cellule (Remise A Blanc). Pour les dimensions, Height représente la hauteur et Width la largeur en points (72 points= 2.52 cm) Daniel
Merci Daniel, ca fonctionne nickel mais ce ne sont pas des cases de formulaires.Ce qu'à réalisé Mich me convient davantage hormis que si c'est possible, j'aurais preferé avoir la case seul et sans texte dedans. Je suppose que ce que tu appelle les RAB, ce sont les dimensions ? Merci Manu
Ok, j'ai pigé, merci Daniel
Manu
"DanielCo" <dcolardelleZZZ@free.fr> a écrit dans le message de news:
4e19e89c$0$23680$426a74cc@news.free.fr...
Non, ce que j'entendais par RAB, c'était effacement de la cellule (Remise
A Blanc). Pour les dimensions, Height représente la hauteur et Width la
largeur en points (72 points= 2.52 cm)
Daniel
Merci Daniel, ca fonctionne nickel mais ce ne sont pas des cases de
formulaires.Ce qu'à réalisé Mich me convient davantage hormis que si
c'est possible, j'aurais preferé avoir la case seul et sans texte dedans.
Je suppose que ce que tu appelle les RAB, ce sont les dimensions ?
Merci
Manu
"DanielCo" a écrit dans le message de news: 4e19e89c$0$23680$
Non, ce que j'entendais par RAB, c'était effacement de la cellule (Remise A Blanc). Pour les dimensions, Height représente la hauteur et Width la largeur en points (72 points= 2.52 cm) Daniel
Merci Daniel, ca fonctionne nickel mais ce ne sont pas des cases de formulaires.Ce qu'à réalisé Mich me convient davantage hormis que si c'est possible, j'aurais preferé avoir la case seul et sans texte dedans. Je suppose que ce que tu appelle les RAB, ce sont les dimensions ? Merci Manu
