Bonjour,
J'ai plusieurs données et je veux créer une macro pour obtenir les courbes correspondantes. J'utilise les macros pour la première fois (VBA aussi).
D'abord je voudrais savoir comment faire si on veut initialiser un tableau qui contient les coordonnées des cases excel c'est à dire
Ainsi la case (H,1) = case (T(0),1)
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3 Dim T(26) As String T=[H,L,A,CE,A..]
Autrement dit la macro que j'ai crée est la suivante
Et je voudrais la modifier pour utiliser une liste de mesures
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16 Sub my_tuto_2() ' ' my_tuto_2 Macro ' ' Keyboard Shortcut: Ctrl+f ' ActiveSheet.Shapes.AddChart.Select ActiveChart.ChartType = xlLine ActiveWindow.SmallScroll Down:=-18 ActiveChart.SeriesCollection.NewSeries ActiveChart.SeriesCollection(1).Name = "=sheet!$C$1" ActiveChart.SeriesCollection(1).Values = "=sheet!$C$2:$C$29" ActiveChart.SeriesCollection(1).XValues = "=sheet!$A$1" ActiveChart.SeriesCollection(1).XValues = "=sheet!$A$2:$A$29" End Sub







Répondre avec citation
Partager