Live-Forum - Die aktuellen Beiträge
Datum
Titel
30.11.2023 14:52:42
PDF Dateien selectieren und verschieben
30.11.2023 14:44:49
Textbox Vertikale Bildlaufleiste immer am Anfang
30.11.2023 14:02:49
Hallo Piet Finde keine Lösung zu meinem Problem
Du konntest keine passende Antwort finden?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
996to1000
996to1000
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Diagrammquelle in Werte umwandeln mit VBA?

Diagrammquelle in Werte umwandeln mit VBA?
05.08.2008 23:15:40
Gregor
Hi,
ich möchte ein Diagramm, zu Vereinfachung, es stellt einen Kreis dar, von den Werten
in der Tabelle unabhängig machen.
Kann man das mit VBA erreichen?
mfg Gregor

9
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Diagrammquelle in Werte umwandeln mit VBA?
05.08.2008 23:40:52
Ramses
Hallo
Weder mit Formeln noch mit VBA.
Ein Diagramm basiert immer auf Werten.
Keine Werte,.. kein Diagramm
Gruss Rainer

AW: Diagrammquelle in Werte umwandeln mit VBA?
05.08.2008 23:48:00
Tino
Hallo,
nur mal so eine Idee, weis auch nicht ob sie Gut ist oder überhaupt Funktioniert.
Man könnte doch dieses Diagramm als Grafik speichern und diese Grafik in das Diagramm wieder einbinden.
Gruß Tino

AW: Diagramm ohne Tabellenbezug funktioniert
06.08.2008 14:20:00
Daniel
..., da man die Werte auch direkt in die Diagrammdefinition eingeben kann, wie dieses Beispiel zeigt:
https://www.herber.de/bbs/user/54384.xls
ein Bezug zu einer Tabelle ist dann nicht erforderlich.
das ist der Code, um das Diagramm zu erzeugen:

Sub Diagramm_Erzeugen()
Charts.Add
ActiveChart.ChartType = xlPie
ActiveChart.SeriesCollection.NewSeries
ActiveChart.SeriesCollection(1).XValues = "={""A"",""B"",""C""}"
ActiveChart.SeriesCollection(1).Values = "={1,2,3}"
ActiveChart.SeriesCollection(1).Name = "=""Beispiel"""
ActiveChart.Location Where:=xlLocationAsNewSheet
With ActiveChart
.HasTitle = True
.ChartTitle.Characters.Text = "Diagramm ohne Tabelle"
End With
End Sub


Gruß, Daniel

Anzeige
AW: Diagramm ohne Tabellenbezug funktioniert
06.08.2008 15:38:31
Gregor
Hi,
das geht schon in die richtige Richtung. Ich dachte, man kann, wie in Zellen ja auch möglich,
die Formel, die in der Datenreihe steht, in Werte umwandeln
mfg Gregor

AW: Diagramm ohne Tabellenbezug funktioniert
06.08.2008 16:20:12
Daniel
Hi
nee, so einfach geht das nicht.
wenn du ein Diagramm mit einem bestehenden Tabellenbezug entkoppeln willst, dann müsstest du ein Makro schreiben, daß aus den Tabellenwerten den passenden String zusammenbaut und diesen dann in die Diagrammdefinition schreiben.
(oder halt ne Bildschirmkopie machen und als Grafik speichern)
Gruß, Daniel

AW: Diagramm ohne Tabellenbezug funktioniert
06.08.2008 17:33:00
K.Rola
Hallo,
du kannst die Formel in Werte umwandeln, so nach diesem Prinzip:

Sub konvertiere_in_Arrays()
Dim objSeries As Series
Dim objChart As Chart
On Error GoTo Zuviel_des_Guten
Set objChart = ActiveSheet.ChartObjects(1).Chart
For Each objSeries In objChart.SeriesCollection
objSeries.Values = objSeries.Values
Next
Exit Sub
Zuviel_des_Guten:
MsgBox "Arraygrenze überschritten!" & Space(10), 64, "Weise hin..."
End Sub


Allerdings darf die Anzahl der Zeichen in dem so entstehenden Array nicht größer als 250 sein.
Gruß K.Rola

Anzeige
AW: Diagramm ohne Tabellenbezug funktioniert
06.08.2008 18:29:00
Gregor
Hi,
hab mal rumprobiert, klappt tatsächlich. Die Beschränkung ist ja nicht so schön, aber für
einige Anwendungfälle reicht es.
Danke nochmal!
mfg Gregor

AW: Diagramm ohne Tabellenbezug funktioniert
06.08.2008 22:28:19
Uwe
Hi,
sehr unbekannt, sehr schön, sehr nützlich, danke.
mfg Uwe

AW: Diagrammquelle in Werte umwandeln mit VBA?
05.08.2008 23:47:00
{Boris}
Hi Gregor,
in Ergänzung zu Rainer:
Maximal Diagramm (mit Werten) erzeugen, als Bild kopieren, Bild einfügen und sowohl Diagramm als auch Werte wieder löschen.
Grüße Boris

307 Forumthreads zu ähnlichen Themen

Formel "Text" ROTE Zahl bei Minuswert?
dieter(drummer)

Hi Formelspezialisten,
in Zelle B2 steht dise Formel (funktionert auc h):
=TEXT(I4-D4;"00.0")&" ("&TEXT(I4/D4-1;"0%")&")".
Mein Ziel, dass eine Minuszahl in ROT erscheint. Hab's mit bedingte Formatierung versucht und bekomme es nicht hin.
Gibt es eine Möglichkeit, a...
12.08.2008 10:59:29
Thread-ID: 1001135
7 Beiträge
@ Tino - brauche Hilfe bei einer deiner Formeln
oblivion

Hallo, ich habe eine Frage an dich. Du hast mir die Formel erstellt in A16.
Ich habe die Datei mal hochgeladen und in Blatt "Beispiel" Spalte A etwas hereingeschrieben.
Danke für deine Hilfe.
Gruß Oblivion
https://www.herber.de/bbs/user/54685.zip
17.08.2008 21:06:00
Thread-ID: 1002466
4 Beiträge
Letzter Wert einer Spalte (Matrixformel)
{mskro}

Hallo Excelaner,
ich benötige mal wieder eine Hilfestellung.
Es soll der Wert in einer Spalte angezeigt werde, der in der untersten Zeile steht.
Mittels der Recherche habe ich nun folgende MatrixFormel erstellt:
=INDEX(Z1:Z5000;MAX(WENN(Z1:Z5000"";ZEILE(1:5000)));1)
Nur wird...
28.08.2008 09:59:21
Thread-ID: 1005303
9 Beiträge
Array-Formel in VBA-Code umwandeln?
Robert

Hallo,
ich bräuchte bitte eure Hilfe.
Hab folgende Formel...
Selection.FormulaArray = _
=IF(ROW(R[-107]C[-3])>COUNTA('1'!R5C[4]:R200C[4]),"""",INDEX('1'!R5C4:R200C4,SMALL(IF('1'!R5C[4]:R200C[4]<>"""",ROW(R1:R196),""""),ROW(R[-107]C[-3]))))"
Mein Problem ist, dass ic...
26.10.2008 10:56:28
Thread-ID: 1019326
13 Beiträge
Textformatierung in einer Formel
Dieterlem

Hallo Excelfreunde,
ich möchte ein Wort fett innerhalb eines Formelergebnisses fett darstellen. Beispiel:
"WENN(A1="Ja";"Beispieltext soll Fett dargestellt werden";"")
Dabei soll nur das Wort 'Fett', fett formatiert werden.
Ist so etwas möglich?
Gruß
Dieterlem
27.10.2008 19:55:00
Thread-ID: 1019731
3 Beiträge
Formel in Makro umwandeln?
Josef_T

Guten Abend zusammen.
Habe mal wieder ein Problem, dass ich alleine nicht gelöst bekomme.
Es geht darum, einen Ausdruck zu machen wobei nur Zeilen gedruckt werden sollen, die in C einen Wert haben, der grösser Null ist.
Habe mal ein Muster hochgeladen, weil meine Fragen und Erklärun...
29.11.2008 19:08:00
Thread-ID: 1028896
6 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige