Insère une colonne entre les colonnes A et B.
la ligne 1 contient les titres pour chaque colonne (Entreprise, Marge, EBIT, CA)
calcule la marge (=EBIT/CA) dans les cellules de la nouvelle colonne B
(par exemple en cellule "B2" tu auras : =C2/D2)
voici le code correspondant obtenu en mode enregistrement pour des données comprises dans A1-D4 (que tu devras adapter à tes données) :
Sub Macro1()
Range("A1:B4").Select
Charts.Add
ActiveChart.ChartType = xlColumnClustered
ActiveChart.SetSourceData Source:=Sheets("Feuil1").Range("A1:B4"), PlotBy:= _
xlColumns
ActiveChart.Location Where:=xlLocationAsNewSheet
With ActiveChart
.HasTitle = True
.ChartTitle.Characters.Text = "Marge"
.Axes(xlCategory, xlPrimary).HasTitle = False
.Axes(xlValue, xlPrimary).HasTitle = False
End With
End Sub