Vidéo : combiner plusieurs graphiques

Bonjour à tous,

[Edit] : Voici deux approches pour combiner plusieurs séries de données. Merci à DocLeka pour la deuxième approche 🙂

Première solution : graphiques superposés

Voici une astuce qui va vous permettre de créer des graphiques superposés, par exemple si vous avez besoin de mixer plusieurs types de graphiques ensemble.

L'idée générale est de superposer deux graphiques, d'uniformiser les échelles et de mettre la zone de traçage et la zone de graphique en transparent.
Cette idée peut être développée et aboutir à des graphiques très complexes.

Dans l'exemple ci-dessus, ca nous donne ceci :
cours-excel-graphique-superpose 1

Comment faire?
Voici la réponse dans ces deux vidéos !

Deuxième solution, avec un seul graphique

A noter que sous Excel 2013, l'emplacement de la gestion des séries du graphique est différente :
cours-excel-graphique-superpose2 1

Et le fichier excel correspondant.

A bientôt et n'hésitez pas à partager vos créations 🙂

Gaëtan

Explosif ! Eclatez vos neurones !

Au sens figuré, bien sur !!!

Bref, n'oubliez pas les packs proposés ici :

Formations Excel & VBA — Achats groupés

Et pour terminer, voici le commentaire de Stéphane, qui vient juste de finir d'étudier les CD sur VBA avancé (vol. 1 et 2) ! 🙂
---------
Bonjour Gaëtan,

Je tenais à vous remercier pour les cours VBA 1 & 2 que j'ai acheté
sur votre site.
Grace à ces cours, j'ai pu enfin finaliser le projet que je souhaitais
faire pour mon travail à savoir associer sur le même userform la
gestion automatique d'un formulaire de saisie ainsi que la gestion
d'une table de données avec les listbox avec recherche dynamique et
avec critères et distribution du fichier pour les clients.

ET TOUT CA EN UN CLIC !

Merci encore.

Stéphane.
------------

Gaëtan

Compléter une plage en utilisant un array

Bonjour à tous,

Voici un code VBA qui explique comment remplir une plage avec un array.

On veut remplacer une série d'instructions comme celle-ci :
Range("A1").Value = "pif"
Range("A2").Value = "pof"
Range("A3").Value = "paf"

Par quelque chose de plus propre.

On va d'abord créer l'array (le tableau) :
Dim arrValeur() as string
redim arrValeur (1 to 3, 1 to 1)

Puis, on va attribuer les valeurs à l'array :
arrValeur(1,1) = "pif"
arrValeur(2,1) = "pof"
arrValeur(3,1) = "paf"

Et finalement, on va affecter les valeurs à la plage :
Range("A1:A3").value = arrValeur

D'où le code final que vous pouvez copier dans un module :
Sub RemplitPlageAvecArray()
Dim arrValeur() As String
ReDim arrValeur(1 To 3, 1 To 1)
arrValeur(1, 1) = "pif"
arrValeur(2, 1) = "pof"
arrValeur(3, 1) = "paf"
Range("A1:A3").Value = arrValeur
End Sub

On peut aussi améliorer le code pour faire référence aux colonnes. Dans ce cas, le deuxième argument de arrValeur fera référence aux colonnes.
Par exemple :
Sub RemplitPlageAvecArray()
Dim arrValeur() As String
ReDim arrValeur(1 To 3, 1 To 2)

arrValeur(1, 1) = "pif"
arrValeur(2, 1) = "pof"
arrValeur(3, 1) = "paf"

arrValeur(1, 2) = "plif"
arrValeur(2, 2) = "plof"
arrValeur(3, 2) = "plaf"

Range("A1:B3").Value = arrValeur
End Sub

A bientôt.

Gaëtan