Probleme avec UserForm

[Mytå]

Bonsoir ou Bonjour le Forum.

Petit problème avec le fichier ci-joint,

Je ne veux pas parcontre avoir la solution complet, mais des justes
des idées pour mieux travailler avec les UserForms.

Si d'autre problème persiste alors la je demanderais plus d'information de
votre par.

) Veillez accepter d'avance mes Merci

Un ancien Newbies qui commence à manger du EXCEL pour déjeuner )

Bien oui encore moi º¿º Mytå º¿º

 

[Ti]

pour ton graphique, change ta procédure "Graphique" comme ça et ça ira :

Sub Graphique()
Application.DisplayAlerts = False
Sheets("Graph1").Select
ActiveWindow.SelectedSheets.Delete
A = Range("c65535").End(xlUp).Row
B = Range("c65535").End(xlUp).Column
C = Range("q65535").End(xlUp).Row
D = Range("q65535").End(xlUp).Column
Charts.Add
ActiveChart.ChartType = xlColumnClustered
With Worksheets("Triage")
ActiveChart.SetSourceData Source:=.Range(.Cells(A, B), .Cells(C, D)), PlotBy _
:=xlRows
End With
With ActiveChart
.Name = "Graph1"
.HasTitle = False
.Axes(xlCategory, xlPrimary).HasTitle = False
.Axes(xlValue, xlPrimary).HasTitle = False
End With
Application.DisplayAlerts = True
End Sub

pour tes Toggle, tu les sélectionnes (un par un ou dans une boucle) et tu utilises la méthode "Clear".

 

[Ti]

tiens, voilà le fichier complet, pour répondre à toutes tes questions. Note que j'ai utilisé la propriété Tag de tes togglebuttons pour les sélectionner

 

[Mytå]

Re Ti et le forum,

Excuser le retard pour les remerciements j'avais trop de boulot

merci a Ti le fichier marche a la perfection

Merci encore a XLD

Mytå º¿º