Thema Datum  Von Nutzer Rating
Antwort
01.12.2018 20:39:10 Alex
NotSolved
01.12.2018 20:42:52 Alex
NotSolved
02.12.2018 00:25:36 ugor
*****
NotSolved
02.12.2018 01:59:17 Alex
NotSolved
Rot VBA Variable als Tabellennamen
03.12.2018 12:07:53 ugor
NotSolved

Ansicht des Beitrags:
Von:
ugor
Datum:
03.12.2018 12:07:53
Views:
478
Rating: Antwort:
  Ja
Thema:
VBA Variable als Tabellennamen

Hallo,

ich teste das jetzt nicht so super aus, aber als ich mal Charts mit VBA angelegt habe, ist mir auch aufgefallen, dass da unterschiedlich viele Datenreihen vorhanden waren (hängt vielleicht vom gerade selektierten oder so ab). Keine Ahnung was da jedenfalls bei Charts.Add genau passiert (könnte man ja mal in der Hilfe nachlesen :-). )

Jedenfalls schlage ich vor, einfach das Chart anzulegen und dann alle Datenreihen zu löschen:

Sub GraphErstellen()
Dim b As String, c As String, a As String, myChart As Chart, i As Long
'a = InputBox("Bitte geben Sie den Datenreihennamen an")
'b = InputBox("Bitte geben Sie den Diagrammnamen an")
c = InputBox("Bitte Geben Sie den Tabellennamen an")
Set myChart = Charts.Add
myChart.ChartType = xlXYScatterSmooth

'Alle Datenreihen löschen
For i = myChart.SeriesCollection.Count To 1 Step -1
    myChart.SeriesCollection(i).Delete
Next

'Datenreihe anlegen
myChart.SeriesCollection.NewSeries
myChart.SeriesCollection(1).XValues = "='" & c & "'!A1:A11"
myChart.SeriesCollection(1).Values = "='" & c & "'!B1:B11"
myChart.SeriesCollection(1).Name = a
myChart.HasTitle = True
myChart.ChartTitle.Characters.Text = b
End Sub

 


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
01.12.2018 20:39:10 Alex
NotSolved
01.12.2018 20:42:52 Alex
NotSolved
02.12.2018 00:25:36 ugor
*****
NotSolved
02.12.2018 01:59:17 Alex
NotSolved
Rot VBA Variable als Tabellennamen
03.12.2018 12:07:53 ugor
NotSolved