Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit
GELÖST

Excel in VBS Chart-Datenbereich für x- und y-Achse vorgeben ...

Frage Entwicklung VB for Applications

Mitglied: GobotheHero

GobotheHero (Level 1) - Jetzt verbinden

22.09.2014, aktualisiert 09.10.2014, 1291 Aufrufe, 3 Kommentare

Hallo =)
Ich habe Probleme beim Vergeben der Wertebereiche für ein erstelltes Chart.
Ich habe über ein Makro das Verändern der Wertebereiche gemacht und würde das jetzt gerne über mein VBScript steuern.

Der Fehler kommt bei der Zeile .SeriesCollection.NewSeries "Objekt erforderlich: 'SeriesCollection'"
Was mache ich falsch =(

dim objChart1
set objChart1 = xlw.Charts.Add
with xlw.ActiveChart
.ChartType = xlXYScatterLines
.SetSourceData xls.Range("K3:K6428"), xlColumns
.HasTitle = True
.ChartTitle.Characters.Text = ChartText
.Location xlLocationAsObject, "Tabelle2" 'xlLocationAsObject

.SeriesCollection.NewSeries
.SeriesCollection(1).XValues = "=Tabelle1!R3C11:R752C11"
.SeriesCollection(1).Values = "=Tabelle1!R3C12:R752C12"
.SeriesCollection(1).Name = "=""H2 [Vol%]"""

End With
With xlw.ActiveChart.Parent
.Top = 0
.Left = 0
.width = 1200
.height = 500
End With
Mitglied: 116301
22.09.2014 um 13:55 Uhr
Hallo GobotheHero!

Sollte in etwa so gehen:
01.
    With Sheets("Tabelle1") 
02.
        .ChartObjects.Add Top:=0, Left:=0, Height:=500, Width:=1200 
03.
         With .ChartObjects(1).Chart 
04.
            .ChartType = xlXYScatterLines 
05.
            '...... 
06.
            '...... 
07.
         End With 
08.
    End With
Gruß Dieter
Bitte warten ..
Mitglied: GobotheHero
23.09.2014 um 06:52 Uhr
Hi danke für die Antowort =)

Es handelt sich hier um VBScript.

Im Moment kann ich halt keine neue Reihe auf machen. Ich raffe irgendwie nicht wie ich an ein SeriesCollection-Objekt heran komme.
Ich dachte das wäre teil von einem Chart !?

with xlw.ActiveChart
.SeriesCollection.NewSeries
Bitte warten ..
Mitglied: 116301
LÖSUNG 23.09.2014, aktualisiert 09.10.2014
Hallo GobotheHero!

Das Problem ist, dass Du einen Mischmasch zwischen einem Diagrammblatt und einem eingebetteten Diagramm hast/machst.
D.h. Du erstellst erst ein Diagrammblatt (Diagramm1) und machst dann daraus ein eingebettetes Diagramm (.Location) in Tabelle2. Bei dem Diagrammblatt kann keine Breite/Höhe verändert werden. Bei Verwendung von .Location, wird die SeriesCollection dann nach dem 'With End' im ActiveChart festgelegt:
01.
objWkb.ActiveChart.SeriesCollection.NewSeries 
02.
objWkb.ActiveChart.SeriesCollection(1).XValues = "=Tabelle1!R3C11:R752C11" 
03.
.....
Ich persönlich hätte erst ein neues Sheet erstellt und das Chart dann anhand meines vorigen Postes eingefügt...

Grüße Dieter
Bitte warten ..
Ähnliche Inhalte
Microsoft Office
PIVOT-CHART IN EXCEL 2010

Frage von MiSt zum Thema Microsoft Office ...

VB for Applications
gelöst Excel mit VBS bearbeiten und Speichern Unter (8)

Frage von Yannosch zum Thema VB for Applications ...

Microsoft Office
Hilfe bei Erstellung eines Suchfelds im Excel (1)

Frage von ZeeRee zum Thema Microsoft Office ...

VB for Applications
gelöst EXCEL Macro oder ähnliches gesucht (3)

Frage von reissaus73 zum Thema VB for Applications ...

Neue Wissensbeiträge
Batch & Shell

Batch als Dienst bei Systemstart ohne Anmeldung ausführen

(2)

Tipp von tralveller zum Thema Batch & Shell ...

Sicherheits-Tools

Sicherheitstest von Passwörtern für ganze DB-Tabellen

(1)

Tipp von gdconsult zum Thema Sicherheits-Tools ...

Peripheriegeräte

Was beachten bei der Wahl einer USV Anlage im Serverschrank

(9)

Tipp von zetboxit zum Thema Peripheriegeräte ...

Heiß diskutierte Inhalte
Exchange Server
Exchange 2016 Standard Server 2012 R2 Hetzner Mail (36)

Frage von Datsspeed zum Thema Exchange Server ...

Windows 7
gelöst Lokales Adminprofil defekt (25)

Frage von Yannosch zum Thema Windows 7 ...

Verschlüsselung & Zertifikate
Mit Veracrypt eine zweite interne (non-system) Festplatte verschlüsseln (11)

Frage von Bernulf zum Thema Verschlüsselung & Zertifikate ...

Internet Domänen
Nameserver ein Geist? (9)

Frage von zelamedia zum Thema Internet Domänen ...