Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
964to968
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
964to968
964to968
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Laufzeitfehler '1004':

Laufzeitfehler '1004':
28.03.2008 14:37:57
Thorsten
Hallo,
ich bekomm bei der 2. Zeile hier einen Laufzeitfehler '1004': Anwendungs- oder objektdefinierter Fehler
ActiveChart.SeriesCollection(1).Name = "=Sheet1!$M$4"
ActiveChart.SeriesCollection(1).Values = "=Sheet1!$M$" & Replace(data, ";", ";Sheet1!$M$")
Wenn ich "=Sheet1!$M$" & Replace(data, ";", ";Sheet1!$M$") durch "=Sheet1!$M$4" ersetze geht es. Aber ich hab das hier mal ausprobiert und das gibt mir die richtige Zeichenkette aus:
data = "9;11;123;14124;213;13"
MsgBox ("=Sheet1!$M$" & Replace(data, ";", ";Sheet1!$M$"))
Hat jemand ne Idee woran es liegen könnte? Nur noch zur Info, das Makro muss auch unter Office 2003 funktionieren.
Gruß Thorsten

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Laufzeitfehler '1004':
28.03.2008 14:57:00
Beverly
Hi Thorsten,
versuche es auf diesem Weg:

Dim chDiagramm As Chart
Set chDiagramm = ActiveSheet.ChartObjects(1).Chart
With chDiagramm
.SeriesCollection(1).Values = "=(Sheet1!R9C13,Sheet1!R11C13,Sheet1!R123C13,Sheet1! _
R14124C13,Sheet1!R213C13,Sheet1!R13C13)"
End With




Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige