Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
732to736
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
732to736
732to736
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Variabler Datenbereich für Diagramm

Variabler Datenbereich für Diagramm
21.02.2006 10:11:21
AndréL.
Hallo!!
Ich brauche mal wieder eure Hilfe.
Für ein Netzdiagramm soll die Datenquelle variabel sein.
Vorgestellt habe ich mir das der Anwender:
1. Seine Kriterien einträgt (Spalte A) beliebig viele,
2. Die SOLL Werte einträgt (Spalte B),
3. Die IST Werte einträgt (Spalte C)
4. Auf einen Button klickt und in Tabelle2 ist das Diagramm fertig.
Wichtig für mich ist, wie schon gesagt, dass Spalte A variabel
lang sein kann (Spalten B u. C sind natürlich genau so lang).
Vielen Dank für Eure Hilfe
AndréL.

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Variabler Datenbereich für Diagramm
21.02.2006 14:03:52
Herbert
hallo Andre,
probier das einmal:

Sub DiagrammErstellen()
Dim cht As ChartObject
Dim yv As String, l!, t!, lz%, dQu
With Sheets("Tabelle1")
lz = .Cells(Rows.Count, 1).End(xlUp).Row
Set dQu = .Range("a1:c" & lz)
End With
With Sheets("Chart")
l = .Range("b5").Left: t = .Range("b5").Top
.ChartObjects.Add(l, t, 410, 250).Name = "Diagramm1"
With .ChartObjects(1).Chart
.SetSourceData Source:=dQu, PlotBy:=xlColumns
.ChartType = xlRadarMarkers
End With
End With
Application.SendKeys "{esc}"
End Sub

gruß Herbert
AW: Variabler Datenbereich für Diagramm
21.02.2006 14:08:37
Herbert
bei den ersten Zeilen kannst du was rauslöschen...hab ich übersehen...
gruß herbert
Sub DiagrammErstellen()
Dim l!, t!, lz%, dQu
With Sheets("Tabelle1")
Anzeige
AW: Variabler Datenbereich für Diagramm
21.02.2006 15:58:50
AndréL.
Hallo Herbert!
Das ist ja super, genau so wollte ich es!!!
Vielen Dank
Gruß André

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige