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...

GREG MDS · 22 Juillet 2021

fanch55 à dit:
Bon, j'arrive trop tard .
Dans le classeur joint,
Les présents de la feuille Tirage sont synchrones avec la feuille Présents que ce soit avec les cases à cocher ou les boutons charger .

Si une présence est modifiée, le tirage (dans la feuille Tirage) est annulé .
Chaque "bâtiment" de la feuille Tirage est équipé d'un bouton Tirage qui permet de le refaire .

A toi de voir ce que tu préfères ...

hello
peut tu jeter un œil sur la page "présent" jai une anomalie sur le bâtiment C
lorsque je coche les présents il me met un message alerte "E400"
idem sur la feuille "tirage" lorsque je presse tirage C

merci GREG

XL 2010 case à cocher

GREG MDS

XLDnaute Junior

Pièces jointes

fanch55

GREG MDS

XLDnaute Junior

Discussions similaires