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

Schaubild variabel

Schaubild variabel
21.07.2005 12:30:08
wengc
Hallo,
ich hab da noch n kleines Problem,
ich hab ne Tabelle und will dass des Schaubild immer genauso groß ist wie die Werte Tabelle, also ein Variables Schaubild.
Ich hab mir da mal was ausgedacht und hab n Macro einfach neben herlaufengelassen(siehe unten). Der Wert "i" ist die länge der variablen Werte.
Aber des funktioniert nicht.
Weis einer von euch wie ich des schreiben muss?
Gruß Chris

Sub Makro2()
' Makro2 Makro
' Makro am 21.07.2005 von ZOCHWE aufgezeichnet
range("A1":"B" & i).Select
Application.CutCopyMode = False
Charts.Add
ActiveChart.ChartType = xlColumnClustered
ActiveChart.SetSourceData Source:=Sheets("Mess"). range("A1":"B" & i, PlotBy:= _
xlColumns
ActiveChart.Location Where:=xlLocationAsNewSheet
With ActiveChart
.HasTitle = False
.Axes(xlCategory, xlPrimary).HasTitle = False
.Axes(xlValue, xlPrimary).HasTitle = False
End With
Sheets("Mess").Select
Range("A19").Select
End Sub

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Schaubild variabel
21.07.2005 12:46:27
Herbert
hallo Chris,
in etwa so:

Sub Makro2()
Dim i%
i = Cells(Rows.Count, 1).End(xlUp).Row
Charts.Add
With ActiveChart
.ChartType = xlColumnClustered
.SetSourceData Source:=Sheets("Mess").Range("A1:B" & i), PlotBy:= _
xlColumns
.Location Where:=xlLocationAsNewSheet
.HasTitle = False
.Axes(xlCategory, xlPrimary).HasTitle = False
.Axes(xlValue, xlPrimary).HasTitle = False
End With
End Sub

gruß Herbert
AW: Schaubild variabel
21.07.2005 13:42:54
wengc
Vielen Dank,
Hat super geklappt.
Danke, Christoph
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige