Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
208to212
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
208to212
208to212
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

wie ersetzen?

wie ersetzen?
29.01.2003 18:27:58
maik
hallo an alle hilfswilligen!

in meinem makro steht folg. zeile:

ActiveChart.SeriesCollection(2).Values = "='Umsatz Monate'!R31C4"

frage: wie kann ich den wert "R31" (ist zeile 31) so ersetzen das dort die aktuelle zeile aus der tabelle "umsatz monate" steht? sinngemäss soll dort stehen: nimm aus der und der tabelle vom aktuellen blatt die aktuelle zeile und die vierte spalte.

wer kann helfen?

danke


4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: wie ersetzen?
29.01.2003 18:42:13
Bernd Held

Hallo Maik,

versuche mal folgendes:

ActiveChart.SeriesCollection(2).Values = _
"='Umsatz Monate'!R" & Activecell.Row & "C4"

Viele Grüße
Bernd
MVP für Microsoft Excel
Noch mehr Excel-Tipps und VBA-Datenbank unter: http://held-office.de


Re: wie ersetzen?
29.01.2003 21:17:09
lasmik

hallo

so sieht es jetzt aus:

Charts.Add
ActiveChart.ChartType = xlColumnClustered
ActiveChart.SetSourceData Source:=Sheets("Umsatz Monate").Range("A34"), _
PlotBy:=xlRows
ActiveChart.SeriesCollection.NewSeries
ActiveChart.SeriesCollection(1).XValues = "={""februar""}"
ActiveChart.SeriesCollection(1).Values = "='Umsatz Monate'!R31C3"
ActiveChart.SeriesCollection.NewSeries
ActiveChart.SeriesCollection(2).Values = _
"='Umsatz Monate'!R" & ActiveCell.Row & "c4"
ActiveChart.Location Where:=xlLocationAsNewSheet
With ActiveChart
.HasTitle = False
.Axes(xlCategory, xlPrimary).HasTitle = False
.Axes(xlValue, xlPrimary).HasTitle = False
End With

es kommt aber die fehlermeldung:

laufzeitfehler 91
objektvariable oder with-blockvariable nicht festgelegt

muss ich die akt. zeile voher auswählen, wenn ja wie

danke

Anzeige
Re: wie ersetzen?
29.01.2003 21:22:21
Bernd Held

hallo Maik,

komme an der Ecke nicht weiter! Könntest Du mir Deine Datei mailen? Ist zwar nicht so im Sinne der Newsgroup, aber ich sehe sonst keine andere Möglichkeit, Dir zu helfen.

Viele Grüße
Bernd
MVP für Microsoft Excel
Noch mehr Excel-Tipps und VBA-Datenbank unter: http://held-office.de



Re: wie ersetzen?
30.01.2003 23:24:22
lasmik

hallo bernd

wo finde ich deine mailadresse?

danke

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige