Det känns svårt att spela in ett makro som gör detta även om man nog kan komma ganska långt i att skapa ett makro som skapar ett diagram i taget givet markerade celler. Man får då använda relativa referenser när man spelar in.

Excelspecialisten hjälper dig annars enkelt att skapa ett makro som fixar alla på en gång.
Det gör de enkelt med lite programmering och bör inte ta många timmar.

Koden för detta kan se ut ungefär, men det är svårt att tillämpa om man inte är kunnig i VBA-programmering.

Public Sub CreateCharts()
    
    Dim lngStartCol As Long
    Dim lngEndCol As Long
    Dim rngChartArea As Range
    Dim rngChartData As Range 'variabel för varje diagrams dataområder
    Dim rngXValues As Range 'diagrammens kolumnetiketter
    Dim i As Long

    Set rngChartArea = Selection
   
    'bestäm dataområdets start respektive slutkolumn
    lngStartCol = rngChartArea.Column
    lngEndCol = rngChartArea.Column + rngChartArea.Columns.Count - 1

    Set rngXValues = kod

    For i = rngChartArea.Row + 1 To rngChartArea.Rows.Count - 1

        Set rngChartData = kod
        
        Charts.Add
  
        With ActiveChart
            ActiveChart.SetSourceData Source:=rngChartData
            ActiveChart.Location Where:=xlLocationAsNewSheet
            ActiveChart.SeriesCollection(1).XValues = rngXValues
        End With
       
    Next i
   
End Sub