macro edition graphique avec selection de plages de données

[stienne]

bonjour à tous,

je reviens vers vous toujours dans le devellopement de mon prgm de suivi de maintenance.
j'ai créer dans un classeur, une feuille données qui recoie l'ensemble des informations attachées à une date t et un lieu donnée.
Ces données sont unique pour chaque date et chaque lieu et sont rattaché à une feuille nommé par sa date de création et son lieu.
Les données sont ajoutée à la suite dans le tableau sans réelle suite logique.
Les données sont entrées par l'intermédiaire d'une suite d'userforme qui me permettent de controler les saisie et obliger à remplir les champs pour qu'ils ne restent pas vide.
Ce tableau est complété jour après jour à la suite.
Je souhaite pouvoir choisir le lieu et ensuite le parametre à afficher ainsi que la période.
Je vous joins un petit fichier vous présentant sommairement la fonctionnalité recherchée.
merci de votre aide

 

[Cousinhub]

Re : macro edition graphique avec selection de plages de données

Bonsoir, voire bonjour....

regarde le fichier joint

 

[stienne]

Re : macro edition graphique avec selection de plages de données

le filtre fonctionne !, c'est super.
Pour ma culture, peux tu m'indiquer dans la prog, en annotation la fonction des lignes, merci. J'aurai quelques modifs à apporter par rapport au projet définitif.
maintenant, pour associer cette fonctionnalité à mon prgm, il serait necessaire d'utiliser un userform comme celui que l'on trouve à l'ouverture du fichier joint.En effet, sur le prgm définitif il existe un menu qui contient un sous menu "èdition graphique". De plus, l'utilisateur ne doit pas pouvoir : modifier et voir la feuille de données.
L'userforme remplacera les boutons présents sur la feuille "données", j'essaie de modifier la prog, j'arrive à sélectionner les paramètres vis les chekbox, mais je n'arrive pas à gérer les lieux et les dates, surement un pbm de compréhension des lignes de prog.
merci de votre aide ...

 

[stienne]

Re : macro edition graphique avec selection de plages de données

un petit up!

 

[Cousinhub]

Re : macro edition graphique avec selection de plages de données

Bonjour,
pas vu d'usf à l'ouverture
je commente les lignes

Edit le fichier avec les lignes commentées

 

[stienne]

Re : macro edition graphique avec selection de plages de données

ok, j'avais oublié de charger usf au démarrage, c'est fait dans le fichier joint.
Une petite question qu signifi range("base"), j'ai rien vu qui s'y rapporte dans les groupes de données ?
je n'arrive tjrs pas à changer le lieu et la plage de date ds mon usf !!!

 

[Cousinhub]

Re : macro edition graphique avec selection de plages de données

Re-,
ci-joint un fichier avec l'usf à renseigner

- le range("base) est une zone nommée intégrant toutes les données dans la feuille "Données". Regarde du côté de Insertion/Nom/Définir

Pour les dates, avec les combobox, un peu galère. Regarde le code utilisé dans l'initialyze de l'usf, et ensuite la façon de les intégrer dans la feuille dans la code du commandbutton1

 

[stienne]

Re : macro edition graphique avec selection de plages de données

je dispose de la version 2007
je ne trouve pas le range ("base")

 

[Cousinhub]

Re : macro edition graphique avec selection de plages de données

Bonsoir,
De mémoire, je crois que sous 2007, les zones nommées, tu peux les voir dans l'onglet Formule, Gestion des noms (ou un truc comme ça...)

 

[stienne]

Re : macro edition graphique avec selection de plages de données

oh oui, comme ça c'est plus clair
ca me permet effectivement de mieux comprendre la démarche.
j'adapte l'usf à mon appli et je vous tiens au parfum.
En tout cas parfait, la prog marche d'enfer, j'ai ajouter un graphique sur une feuille, et programmé son affichage automatique. En modifiant ls données, la courbe change sans prog particulière.
Juste une question sur les echelles d'axe, y a t il un moyen pour définir l'échelle de l'axe en fonction du paramètre, je m'explique :
les variations de ph sont faible, et lorsque l'on fait apparaitre le ph en moyenne de 6.8 à 7.4 avec par exemple la t° de l'ordre de 25°C la variation du ph n'apparait pas ou très peu, la solution consisterai à adopter une echelle différente pour le paramètre pH, cette pratique peut être valable pour d'autre paramètre ou la valeur varie peu ou de qq dixième. J'ai cherché dans les paramètres d'affichage mais en vain, de plus, la version 2007 offre presque trop de possibilité en ce qui concerne la personnalisation des graphes ! On est jamais content !!

 

[Cousinhub]

Re : macro edition graphique avec selection de plages de données

Re-,
le plus simple serait d'ajouter un axe "y" secondaire
sous 2003, on sélectionne la courbe voulue, on fait Format/Série de données sélectionnées, et dans l'onglet "Sélection de l'axe", on choisis "Axe Secondaire"
Regarde dans l'aide avec ces mots clés : Axe secondaire, tu devrais trouver ton bonheur

 

[stienne]

Re : macro edition graphique avec selection de plages de données

je n'arrive pas à adapter le prgm à mon appli, il bloque sur la sélection de date !
je ne vois pas pourquoi.
je joins l'appli pour avis, merci !
RapidShare: 1-Click Webhosting

 

[stienne]

Re : macro edition graphique avec selection de plages de données

a quoi servent les deux cellule I1 et I2 ?, pouvez vous me mettre un commentaire dans le gestionnaire des noms en complément, je ne saisi pas tout, notemment sur le rôle des formules, merci, cela devrai m'aider à résoudre mon pbm.

 

[stienne]

Re : macro edition graphique avec selection de plages de données

un petit up pour une aimable réponse ...

 

[Cousinhub]

Re : macro edition graphique avec selection de plages de données

Bonsoir,
mieux vaut tard que jamais.....
voici le fichier modifié, avec quelques modifs...


- les en-êtes que tu veux extraire doivent être écrits comme sur la feuille "Données"

    If Accueil.CheckBox11.Value = True Then .[IV1].End(xlToLeft).Offset(, 1) = "[COLOR="Red"]T° eau[/COLOR]"
    If Accueil.CheckBox10.Value = True Then .[IV1].End(xlToLeft).Offset(, 1) = "[COLOR="Red"]pH[/COLOR]"
    If Accueil.CheckBox9.Value = True Then .[IV1].End(xlToLeft).Offset(, 1) = "[COLOR="Red"]TH[/COLOR]"
    If Accueil.CheckBox8.Value = True Then .[IV1].End(xlToLeft).Offset(, 1) = "[COLOR="Red"]TAC[/COLOR]"

- sur la feuille données, en A12, B12 et C12, les critères que tu as choisis

- en I2, la formule qui sert de critères...

=ET(SOMMEPROD((Données!E2>=Données!$A$12)*(Données!E2<=Données!$B$12)*1);Données!F2=Données!$C$12)

qui veut donc dire : si la cellule E2 de Données est supérieure à la date en A12 ET inférieure à la date en B12, on obtient 1.
si de plus la cellule F2 est égale au lieu défini, on extrait les données sélectionnées par les checkbox

Le souci pour le chargement de l'usf, c'est que pour initialiser un userform, il ne faut pas mettre Accueil_Initialise() mais UserForm_Initialize(), il ne faut pas l'appeler par son petit nom, mais par l'objet...
Essaie, et reviens si pb