Automatiser la plage de données d'un graphique

  • Initiateur de la discussion Initiateur de la discussion Marlur
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

Marlur

XLDnaute Nouveau
Bonjour à tous,

J'aurais voulu savoir s'il existait un code quelconque qui repère le nombre de données dans un tableau (si 8 ou bien 10 lignes par exemple sont remplies), et qui affecterait la plage de données d'un graphique en conséquence.

Exemple :
Tableau dans lequel des données sont renseignées de A1 à B9 : plage de données du graphique A$1:B$9.
Pour ce même tableau, je remplis la ligne 10 : plage de données du graphique A$1:B$10.
Je supprile les lignes 6 à 10 : plage de données du graphique A$1:B$5.
Etc.

Une idée ?

Merci,
Marlur
 
Dernière édition:
Re : Automatiser la plage de données d'un graphique

Code:
sub compte_ligne()
   
   i=Sheets(1).Range("A1").End(xlDown).Row

end sub

Avec ça tu as ton numéro de dernière ligne (stocké dans i)

Ensuite quand tu as enregistré ta macro pour ton graphique, il faut faire 2 choses:
1) appeler la procédure compte_ligne() au début
2) remplacer la plage de données du graphique comme ceci: $A$1:$B$ & i

Pense à joindre un exemple de fichiers si tu es encore bloqué.
 
Re : Automatiser la plage de données d'un graphique

Bonjour Marlur, Bonjour richert90


Sans macro sous 2003 il faut définir des plages nommées dynamiques et les uiliser dans les données du graph.
Les noms se trouvent dans Insertion / Noms / Définir
J'ai laissé des indications dans le fichier joint
Cordialement
 

Pièces jointes

  • T.xls
    T.xls
    29 KB · Affichages: 37
  • T.xls
    T.xls
    29 KB · Affichages: 38
  • T.xls
    T.xls
    29 KB · Affichages: 38
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Retour