Fehlermeldung System.NullReferenceException: "Die Objektvariable oder die With-Blockvariable wurde nicht festgelegt." 'Erstellt ein neues Datenblatt vor dem vorhandenem Blatt Dim xlSheet2 As Excel.Worksheet = CType(xlBook.Sheets.Add(), Worksheet) 'Neuer Name des Tabellenblatts xlSheet2.Name = "Aktien Chart" Dim myChart As Excel.ChartObjects myChart = xlBook.ActiveChart With myChart .ChartType = XlChartType.xlLine .SeriesCollection(1).HasDataLabels = True .SeriesCollection(1).XValues = a_datum.ToArray 'Die X-Daten Datum .SeriesCollection(1).Values = a_wert.ToArray 'Die Y Daten Kurswerte .HasTitle = True .ChartTitle.Text = AknName & " vom " & StartDatum & " bis " & EndDatum & vbCrLf & " min. Wert " & Format(min_werte, "#,##0.00 €") & " max. Wert " & Format(max_werte, "#,##0.00 €") .HasLegend = False End With