Génerer Chart Excel en VB.Net
Bonjour,
Je voudrais afficher un graphe sous forme de column sur excel à partir de vb.net:
j'aimerais eviter déterminer le positionnement de mon graphe et le placer à partir d'une cellule définie et non pas par Top, Left.... je connais pas a l'avance le positionnement de mon graph parce que j'affiche un tableau des données d'une table et apres la derniere ligne ajouté j'affiche mon graphe.
voila mon code:
Code:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27
| Dim oChart As Excels.Chart
Dim MyCharts As Excels.ChartObjects
Dim MyCharts1 As Excels.ChartObject
MyCharts = xlWorkSheet.ChartObjects
'set chart location
MyCharts1 = MyCharts.Add(180, 80, 400, 250) mon probleme est la; on peut eviter ca??
oChart = MyCharts1.Chart
With oChart
'set data range for chart
Dim chartRange As Excels.Range
chartRange = xlWorkSheet.Range("F5:F" & R & ",I5:I" & R & ",J5:J" & R)
.SetSourceData(chartRange)
'set how you want to draw chart i.e column wise or row wise
.PlotBy = Excels.XlRowCol.xlColumns
'set data lables for barssss
.ApplyDataLabels(Excels.XlDataLabelsType.xlDataLabelsShowNone)
'set legend to be displayed or not
.HasLegend = True
'set legend location
.Legend.Position = Excels.XlLegendPosition.xlLegendPositionRight
'select chart type
.ChartType = Excels.XlChartType.xlColumnClustered
'chart title
.HasTitle = True
''.ChartTitle.Text = "titre"
'set titles for Axis values and categories
End With |
Merci de m'aider.