[Excel 2007]Case à cocher "Sélectionner tout"

Bonjour,
Votre case "selectionner tout" porte le numéro27 (à vous de l'adapter!)
La procédure :

Private Sub CheckBox27_Click()
Dim Obj As OLEObject
For Each Obj In ActiveSheet.OLEObjects
        If TypeOf Obj.Object Is MSForms.CheckBox Then
            Obj.Object.Value = True
        End If
Next Obj
End Sub

--
Salutations.
Le Pingou

Bonjour,
Voici ma proposition : https://www.cjoint.com/?3lClWLOJDEn
J'espère que cela correspond à votre demande

Bonjour, Bonjour Le pingou.
Ca ne marche qu'avec des CheckBox de la barre d'outils "Contrôles" pas avec les outils "Formulaire".
Change tes CheckBox par des checkBox Contrôles.
A+

Bon je me rend compte que c est trop la galère pour du luxe. En fait ce que je veux arriver a faire au final, c est qu il me recopisse dans un autre tableau que les ligne qui auront été selectionnée....

vous vouyez mon soucis?

Tu a beaucoup de ligne sur ta feuille ? Combien ?

Un classeur exemple
Il reprend une autre fonction pour un autre poste (Les 2 couleurs)
Tu dis
L'expérience instruit plus sûrement que le conseil. (André Gide)
Si tu te cognes à un pot et que ça sonne creux, c'est pas forcément le pot qui est vide. ;-)(Confucius)

Bonjour,
Ce n'est certainement pas une galère !
Est-il possible de mettre le fichier sur https://www.cjoint.com/ et poster le lien.

Bonjour,
Pour la case à cocher formulaire, utiliser cette procédure qui liste que les cases à cocher de la feuille active:

Sub BoucleCheckBoxes_Formulaire()
Dim Cb As CheckBox
For Each Cb In ActiveSheet.CheckBoxes
        Cb.value=true
Next Cb
End Sub

--
Salutations.
Le Pingou

voila le lien : https://www.cjoint.com/?3lBvIGZnB5P

j ai pas mis mon fichier original, pour des raison de confidentialité de ma boite. dsl les gars.... J y ai repris ce que je voulais y faire j'Espère que ça sera assez clair...

MErci bien Pingou après y avoir jeter un coup d oeil, cela correspond pas mal a ce que je voulais faire. L'histogramme s'adapte en fonctio ndu nombre de comp selectionner, c est nikel!!

Mais pourrais tu vite fait m expliquer comment tu as fait pour le graphique? et pourquoi ta variable litlab commence à 9 ?? soit tu me l explique soit renvoie moi le fichier avec les commentaire dans la macro pour que je puisse l adapter a mon vrai fichier.

J'ai vu que tu avait nommer des plage avec la fonction decaler. Je suppose que c est celle ci que tu te sert pour faire un graphique evolutif, mais comment t en sert tu?

merci

ça m evitera a vous redemander ulterieurement!

J ai encore besoin de votre aide pour un diagramme a bulle evolutif!!! allez voir sur https://forums.commentcamarche.net/forum/affich-20005960-excel2007-graph-a-bulles-evolutif-vba#p20005960 merci bcp!!!!

je sais que j'abuse mais j'ai une dernièr erequete a vous faire messieurs les experts. celle par contre, je ne sais pas si ça sera possible à faire .....

https://forums.commentcamarche.net/forum/affich-20026141-excel-2007-histogramme-variable-evolutif#p20026141

MErci pour tout ce que vous avez deja fait pour moi!