Hoe voeg je een horizontale gemiddelde lijn toe aan een grafiek in Excel?

Als je een horizontale gemiddelde lijn wilt invoegen in een grafiek, kun je eerst het gemiddelde van de gegevens berekenen en vervolgens de grafiek maken. Doe het volgende:

1. Bereken het gemiddelde van de gegevens met Gemiddelde functie, bijvoorbeeld, in Gemiddelde Kolom C2, typ deze formule: =Average($B$2:$B$8), en sleep dan de AutoVul-handgreep van deze cel naar het bereik dat je nodig hebt. Zie screenshot:

2. Selecteer vervolgens dit bereik en kies een grafiekformaat dat je wilt invoegen, zoals 2-D Kolom onder de Invoegen tab. Zie screenshot:

3. En er is een grafiek gemaakt, klik op een van de gemiddelde gegevenskolommen (de rode balk) in de grafiek, klik met de rechtermuisknop en selecteer de Wijzig Reeks Grafiektype uit het contextmenu. Zie screenshot:

4. In het pop-up Grafiektype Wijzigen dialoogvenster, klik om te markeren de Combinatie in de linkerlijst, klik op het vak achter de Gemiddelde, en selecteer vervolgens een lijngrafiekstijl uit de vervolgkeuzelijst. Zie screenshot:

5. Klik op de OK knop. Nu heb je een horizontale lijn die het gemiddelde vertegenwoordigt in je grafiek, zie screenshot:

Deze methode zal een geweldig hulpmiddel aanbevelen, de functie Lijn Toevoegen aan Grafiek van Kutools voor Excel, om snel een horizontale gemiddelde lijn toe te voegen aan de geselecteerde kolomgrafiek met slechts 2 klikken!

Stel dat je een kolomgrafiek hebt gemaakt zoals in de onderstaande screenshot, en je kunt een horizontale gemiddelde lijn toevoegen als volgt:

1. Selecteer de kolomgrafiek, en klik op Kutools > Grafieken > Lijn Toevoegen aan Grafiek om deze functie te activeren.

2. In het Voeg lijn toe aan grafiek dialoogvenster, vink de Gemiddelde optie aan, en klik op de Ok knop.

Nu wordt de horizontale gemiddelde lijn onmiddellijk toegevoegd aan de geselecteerde kolomgrafiek.

Stel dat je een kolomgrafiek hebt gemaakt met je gegevens in je werkblad, en de volgende VBA-code kan je ook helpen om een gemiddelde lijn in je grafiek in te voegen.

1．Klik op een van de gegevenskolommen in je grafiek, en vervolgens worden alle gegevenskolommen geselecteerd, zie screenshot:

2. Houd de toetsen ALT + F11 ingedrukt, en het venster Microsoft Visual Basic for Applications wordt geopend.

3. Klik op Invoegen > Module, en plak de volgende code in het Module Venster.

VBA: voeg een gemiddelde lijn toe aan de grafiek

Sub AverageLine()
'Update 20130907
Dim ser As Series
Dim arr As Variant
Dim total As Double
Dim outArr As Variant
If VBA.TypeName(Application.Selection) <> "Series" Then Exit Sub
Set ser = Application.Selection
arr = ser.Values
total = Application.WorksheetFunction.Average(arr)
ReDim outArr(LBound(arr) To UBound(arr))
For i = LBound(outArr) To UBound(outArr)
    outArr(i) = total
Next
With ActiveChart.SeriesCollection.NewSeries
    .XValues = ser.XValues
    .Values = outArr
    .Name = "Average " & ser.Name
    .AxisGroup = ser.AxisGroup
    .MarkerStyle = xlNone
    .Border.Color = ser.Border.Color
    .ChartType = xlLine
    .Format.Line.ForeColor.ObjectThemeColor = msoThemeColorAccent6
End With
End Sub

4. Druk vervolgens op de F5 toets om deze code uit te voeren, en een horizontale gemiddelde lijn is ingevoegd in de kolomgrafiek. Zie screenshot:

Opmerking: Deze VBA kan alleen worden uitgevoerd wanneer het kolomformaat dat je invoegt 2-D Kolom is.