Bonjour,
Je dois créer un graphique Excel via asp.
Le graphique est de type "pie".
J'aimerais afficher le pourcentage.
J'ai essayé le code suivant :
-------------------------------------------------------------
dim app
set app = createobject("Excel.Application" )
app.Visible = true
dim wb
set wb = app.workbooks.add
wb.ActiveSheet.Range(wb.ActiveSheet.Cells(1, 2), wb.ActiveSheet.Cells(1, <%= i %> + 1)).Value = Array(<%= TheTest %> )
wb.ActiveSheet.Range(wb.ActiveSheet.Cells(2, 1), wb.ActiveSheet.Cells(2, 1)).Value = Array("Business" )
wb.ActiveSheet.Range(wb.ActiveSheet.Cells(2, 2), wb.ActiveSheet.Cells(2, <%= i %> + 1)).Value = Array(<%= TheTest1 %> )
wb.ActiveSheet.Range(wb.ActiveSheet.Cells(1, 1), wb.ActiveSheet.Cells(2, <%= i %> + 1)).Select
wb.Charts.Add
wb.ActiveChart.ChartType = 5
wb.ActiveChart.HasTitle = True
wb.ActiveChart.ChartTitle.Text = "Répartition des demandes..."
wb.ActiveChart.ApplyDataLabels ShowPercentage:=True
app.UserControl = true
---------------------------------------------------
Ca ne fonctionne pas. Mais le reste du code fonctionne.
Merci pour votre aide.
Seblemalin