XL 2010 case à cocher

GREG MDS · 19 Mars 2021

bonjour les amis

est-ce que quelqu'un peux m'expliquer comment on peux faire des cases à cocher en ligne sans les faire une a une.

voir dans mon tableau ci joint dans page Inscriptions au bout de chaque ligne dans la colonne avis mds je voudrais qu'il y ai une case à cocher correspondant à chaque individu.
là je suis en train de les faire ligne par ligne.... j'en ai 150 minimum a faire.
peut-on les faire en mode accéléré?

merci
greg

fanch55 · 19 Mars 2021

Bonjour,
Plutôt que de faire une multitude d'objets similaires surchargeant la feuille,
vous pouvez par exemple:
- renommer l'objet checkbox en Ckb
- coller le code ci-dessous dans celui de la feuille Inscription

VB:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    [Ckb].Visible = False
    If Target.Count = 1 Then
        If Not Intersect(Target, [__Anonymous_Sheet_DB__0[avis mds]]) Is Nothing Then
            With [Ckb]
                .LinkedCell = vbNullString
                    .Left = Target.Left
                    .Top = Target.Top
                    .Value = Target = True
                    .Visible = True
                .LinkedCell = Target.Address
            End With
        End If
    End If
End...

fanch55 · 19 Mars 2021

Bonjour,
Plutôt que de faire une multitude d'objets similaires surchargeant la feuille,
vous pouvez par exemple:
- renommer l'objet checkbox en Ckb
- coller le code ci-dessous dans celui de la feuille Inscription

VB:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    [Ckb].Visible = False
    If Target.Count = 1 Then
        If Not Intersect(Target, [__Anonymous_Sheet_DB__0[avis mds]]) Is Nothing Then
            With [Ckb]
                .LinkedCell = vbNullString
                    .Left = Target.Left
                    .Top = Target.Top
                    .Value = Target = True
                    .Visible = True
                .LinkedCell = Target.Address
            End With
        End If
    End If
End Sub

GREG MDS · 20 Mars 2021

fanch55 à dit:
Bonjour,
Plutôt que de faire une multitude d'objets similaires surchargeant la feuille,
vous pouvez par exemple:
- renommer l'objet checkbox en Ckb
- coller le code ci-dessous dans celui de la feuille Inscription

VB:

Private Sub Worksheet_SelectionChange(ByVal Target As Range) [Ckb].Visible = False If Target.Count = 1 Then If Not Intersect(Target, [__Anonymous_Sheet_DB__0[avis mds]]) Is Nothing Then With [Ckb] .LinkedCell = vbNullString .Left = Target.Left .Top = Target.Top .Value = Target = True .Visible = True .LinkedCell = Target.Address End With End If End If End Sub

bonjour pouvez-vous être plus explicite svp?

j'ai essaye mais j'ai pas l'impressions d'avoir fais ce qu'il faut .

merci

fanch55 · 20 Mars 2021

Bonjour,
Classeur modifié,
la Checkbox à modifier était celle de type formulaire nommée "Case à cocher 4"

GREG MDS · 25 Mars 2021

bonjour impeccable

quelqu'un est il capable de m'expliquer comment on peux faire une convocation a un tournoi en prenant en compte la validation par case cocher
et de déterminer le nombre de convocation par rapport au nombre de personne retenue
merci
gregory
voir mon tableau ci dessous

GREG MDS · 19 Mai 2021

fanch55 à dit:
Bonjour,
Plutôt que de faire une multitude d'objets similaires surchargeant la feuille,
vous pouvez par exemple:
- renommer l'objet checkbox en Ckb
- coller le code ci-dessous dans celui de la feuille Inscription

VB:

Private Sub Worksheet_SelectionChange(ByVal Target As Range) [Ckb].Visible = False If Target.Count = 1 Then If Not Intersect(Target, [__Anonymous_Sheet_DB__0[avis mds]]) Is Nothing Then With [Ckb] .LinkedCell = vbNullString .Left = Target.Left .Top = Target.Top .Value = Target = True .Visible = True .LinkedCell = Target.Address End With End If End If End Sub

bonjour FANCH 55
est ce normal que lorsque je quitte la page "tirage au sort" les personnes presente que j'ai coché ne le sont plus ?
merci

ci joint le fichier

fanch55 · 19 Mai 2021

Bonjour,
Dans la mesure où vous reconstruisez toutes les grilles de la feuille "tirage au sort" à chaque fois que vous y entrez, c'est normal .

GREG MDS · 20 Mai 2021

fanch55 à dit:
Bonjour,
Dans la mesure où vous reconstruisez toutes les grilles de la feuille "tirage au sort" à chaque fois que vous y entrez, c'est normal .

bonjour

y a t-il donc une possibilités de figer la présence des individus souhaité?

d'une part et d'autre part de supprimer le bouton dans cette page "tirage au sort"

merci

fanch55 · 20 Mai 2021

Au lieu de vider les grilles et de les remplir systématiquement à l'activation de "tirage_au_sort",
il vaudrait mieux :
1) faire un bouton explicite pour chaque grille pour la remplir, en ce cas la colonne présent sera rincée .
2) sinon à l'activ

GREG MDS · 22 Mai 2021

BONJOUR
c'est dans ce sens que je suis effectivement partie
tu trouveras un bouton dans chaque liste .

GREG MDS · 27 Mai 2021

fanch55 à dit:
Au lieu de vider les grilles et de les remplir systématiquement à l'activation de "tirage_au_sort",
il vaudrait mieux :
1) faire un bouton explicite pour chaque grille pour la remplir, en ce cas la colonne présent sera rincée .
2) sinon à l'activ

BONJOUR
c'est dans ce sens que je suis effectivement partie
tu trouveras un bouton dans chaque liste .

dans ce cas pourrais tu de ce fait le modifier

fanch55 · 30 Mai 2021

Bonsoir,
Regardez si le classeur joint correspond à la demande (code de la feuille tirage_au_sort) .

GREG MDS · 31 Mai 2021

fanch55 à dit:
Bonsoir,
Regardez si le classeur joint correspond à la demande (code de la feuille tirage_au_sort) .

salut
c'est parfait
merci beaucoup

GREG MDS · 1 Juin 2021

fanch55 à dit:
Bonsoir,
Regardez si le classeur joint correspond à la demande (code de la feuille tirage_au_sort) .

Bonjour après avoir teste je rencontre une anomalie
tu verras dans les fichier joints
dans ta version les poules D E F ne se chargent pas ni les personnes détenues
dans ma version précédente sa se fait automatiquement

merci

fanch55 · 1 Juin 2021

Salut, c'est plutôt normal :
j'ai travaillé sur le fichier que vous aviez fourni ,
celui-ci était incomplet: bâtiment A,B,C seuls présents et zone4 incorrecte .
je me suis dit que vous pouviez modifier ce qui manquait: nommer les bâtiments dans les grilles et y dupliquer les boutons "charger" .

Rien n'est automatique: il faut cliquer sur le bouton "charger" de chaque grille pour la mettre à jour .

Le classeur joint a été complété et intègre le chargement automatique dans l'activate de la feuille
Ce chargement conserve les présents , vous devrez les enlever manuellement .
A vous d'adapter le code à votre désir:
soit vous synchronisez à chaque activate de la feuille
soit vous le faites via un "bouton" à ajouter

XL 2010 case à cocher

XLDnaute Junior

Pièces jointes

XLDnaute Barbatruc

XLDnaute Junior

Pièces jointes

XLDnaute Barbatruc

Pièces jointes

XLDnaute Junior

Pièces jointes

XLDnaute Junior

Pièces jointes

XLDnaute Barbatruc

XLDnaute Junior

Pièces jointes

XLDnaute Barbatruc

XLDnaute Junior

XLDnaute Junior

XLDnaute Barbatruc

Pièces jointes

XLDnaute Junior

XLDnaute Junior

Pièces jointes

XLDnaute Barbatruc

Pièces jointes

Discussions similaires