Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1628to1632
1628to1632
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Diagramm erstellen und an Zelle heften

Forumthread: Diagramm erstellen und an Zelle heften

Diagramm erstellen und an Zelle heften
26.06.2018 19:57:32
GreatGerda
Hallölle,
ich hab schon das halbe Netz durchforstet und nur Mist produziert. Daher suche ich hier Hilfe!!!! :(
Also, ich habe ein Worksheets("Übersicht") und ein Worksheets("Konsole").
In Übersicht sind 2 * 9 Datensätze mit 7 Reihen und 45 Reihen, bspw. Range("A6:H51").
In Konsole befinden sich meine Button, einer der die Daten erstellt und ein zweiter, der nun Graphen optimaler Weise in einer Schleife unterhalb der jeweiligen Tabelle plotten soll.
Ich möchte den jeweiligen Graphen immer eine Zelle zuweisen, um sie gegebenenfalls hoch und runter rutschen lassen zu können, falls meine Tabelle mal länger oder kürzer wird.
Allerdings fängt das ganze schon beim erzeugen eines Graphens an.
Ein Beipielcode für das erstellen eines Liniengraphens auf den Bereich A6:H51 mit Zuweisung auf eine Zelle würde mir schon mal seeeehr weiter helfen.
Die Schleife würde ich dann vermutlich selber hinbekommen
Liebe Grüße
Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Diagramm erstellen und an Zelle heften
26.06.2018 20:36:21
Beverly
Hi,
was verstehst du unter "anheften" - soll das Diagramm mit der linken oberen Ecke auf einer bestimmten Zelle liegen? Dazu hat das Diagramm die Eigenschaft Top und Left und Zellen ebenfalls.

AW: Diagramm erstellen und an Zelle heften
26.06.2018 21:29:06
GreatGerda
Ja,genau an sowas hatte ich dabei gedacht.
Ist das eine Funktion von ChartObjects oder wo kann ich das zuordnen?
Kennst du zufällig eine Seite auf der das alles einmal gut erklärt ist? Mir fehlt ein bisschen die Übersicht über die "Möglichkeiten"
Anzeige
AW: Diagramm erstellen und an Zelle heften
26.06.2018 21:58:41
Beverly
Ja, das ist eine Eigenschaft des Chart-Objektes - so wie jedes Shape-Objektes im Tabellenblatt. Suche bei Google unter "excel vba shapes positionieren" - da findest du viele Links.

AW: Diagramm erstellen und an Zelle heften
28.06.2018 18:18:33
GreatGerda
Hat leider nicht so geklappt, wie ich mir das gedacht hab und hab es jetzt wie folgt gelöst:
Werden die Tabellen länger oder kürzer muss ich leider nachjustieren

For j = 1 To reihen
For i = 1 To spalten
Set CO = ThisWorkbook.Worksheets("Übersicht").ChartObjects
.Add(70 + ((i - 1) * 540), 850 + ((j - 1) * 1200), 350, 200)
Set CH = CO.chart
CH.ChartType = xlLine
x=...
y=...
a=...
b=...
CH.SetSourceData Worksheets("Übersicht").Range(Worksheets("Übersicht")
.Cells(x, y), Worksheets("Übersicht").Cells(a, b))
Set CO = ThisWorkbook.Worksheets("Übersicht").ChartObjects(counter)
CO.chart.HasTitle = True
CO.chart.ChartTitle.Text = Chr(64 + j) & " - " & Überschriften(i - 1)
With CO.chart
.SeriesCollection(1).XValues = "=Übersicht!$B$6:$B$51"
End With
counter = counter + 1
Next i
Next j

Anzeige
AW: Diagramm erstellen und an Zelle heften
28.06.2018 19:42:03
Beverly
Benutze doch einfach die Höhe des jeweils vorhergehenden Diagramms.

Forumthreads zu verwandten Themen

diagramm in vba einbetten
petear

servus leute,
ich hab bis jetzt mit hilfe folgenden code erzeugen könnne
Sub ZeileKopieren() Dim zell As Range With Worksheets("Bericht") For Each zell In .Range("A6:A" & .Cells(Rows.Count, 1).End(xlUp).Row) If zell "" Then On Error Resume Next zell.EntireRow.Copy _ Worksheets(zell...
14.07.2009 21:04:16
Thread-ID: 1088046
2 Beiträge
Zeitdifferenz in Zelle einfügen
Alina

Hallo zusammen,
ich habe mir in Excel eine Überstundentabelle gebastelt. Soweit funktioniert auch alles. Ich kann mir auch die Überstunden pro Tag in der Spalte G berechnen lassen. Berechnet wird das durch die Solleinzeit in Spalte F und der tatsächlichen Endzeit in Spalte D.
Nun möcht...
16.08.2009 00:06:36
Thread-ID: 1096190
12 Beiträge
Diagramm und einzelen Zellen nach PPT kopieren
Mandy

Hallo,
ich habe eine Excelmappe mit Daten und Diagrammen. Meine Frage dazu, ist es möglich, mit einem Makro aus Excel heraus, Diagramme (Diagramm 1", "Diagramm 2") und / oder ein kopierter Range (zB A1 : D10)
in ein Powerpointdokument zu bringen ?
Ich stelle mir das so vor, dass nac...
02.10.2009 09:57:53
Thread-ID: 1106620
2 Beiträge
Anzeige
Formel in Zelle einfügen
Alexander

Hallo zusammen,
Sub test() Dim str As String str = "=WENN(Daten!$F$1='Tabelle1'!" & Cells(11, 5).Address & ";JAHR('Tabelle1'!" & Cells(18, 4) _ .Address & ")" End Sub wie kann ich die Formel in der Varialben str in eine Zelle einfügen? Oder kann ich die Formel auch direkt o...
13.10.2009 09:45:55
Thread-ID: 1109248
6 Beiträge
Anzeige
diagramm aus sich verändernden werten einer zelle
Gill

hallo, hier ein hoffentlich kleines problemchen:
in zelle b12 wird ein wert in abhängigkeit der eingaben in zeile 7 ermittelt.
der verlauf der änderungen in b12 soll grafisch dargestellt werden.
ein bekannter meinte, das ginge nur mit vba.
leider kenne ich mich mit vba nicht aus...
17.11.2009 13:30:19
Thread-ID: 1117955
4 Beiträge
Bilder in Zelle einfügen wenn
Andre´

Hallo alle zusammen,
ich möchte für den Bereich C5:F10 Bilder einfügen (jeweils mittig in Zelle), in Abhängigkeit des Zellwertes.
Ist der Zellwert = 1 dann Bild1 von Tabelle "Bilder" einfügen
Ist der Zellwert = 2 dann Bild2 von Tabelle "Bilder" einfügen
Ist der Zellwert = 3 dann...
15.12.2009 09:51:03
Thread-ID: 1123961
5 Beiträge
Anzeige
Datum und Zeit in Zelle einfügen
chris

Schönen Christtag!
Ich suche eine Lösung welche ich trotz googlen nichts geeignetes finden konnte.
Also: Wenn im Bereich F4:F100 neue Werte eingetragen werden, dann soll sich im Bereich L4:L100 in der gleichen Zeile das Datum (evtl. sogar mit Uhrzeit) neu eingetragen werden.
Für Hil...
25.12.2009 13:37:43
Thread-ID: 1125900
8 Beiträge
Datum und Zeit in Zelle einfügen
chris

Schönen Christtag!
Ich suche eine Lösung welche ich trotz googlen nichts geeignetes finden konnte.
Also: Wenn im Bereich F4:F100 neue Werte eingetragen werden, dann soll sich im Bereich L4:L100 in der gleichen Zeile das Datum (evtl. sogar mit Uhrzeit) neu eingetragen werden.
Für Hil...
25.12.2009 13:38:19
Thread-ID: 1125901
2 Beiträge
Über Button in Zelle Hyperlink einfügen
Ingo

Hallo zusammen,
Ich möchte bei Betätigung eines Button in der makierten Zelle einen Hyperlink einfügen. Bei der Betätigung des Buttons soll sich ein Dialog öffnen in dem ich den Pfad für den Hyperlink angeben kann.
Hat jemand hiermit Erfahrung und hätte einen Tipp? Die Makroaufzeichnug...
22.04.2010 11:40:05
Thread-ID: 1153267
2 Beiträge
Anzeige
1.Zeichen in Zelle einfügen
Helmut

Hallo liebe VBA'ler,
ich habe eine kurze Frage zu einer sicherlich normalen Excel-Funktion.
Wie kann ich in einer Zelle ein erstes Zeichen vor den dort stehenden Text setzen? Ich finde dazu leider nichts Genaues hier; wahrscheinlich,weil es so einfach ist?! (Oft findet man Einträge, die...
22.04.2010 13:54:45
Thread-ID: 1153309
5 Beiträge
Formel via VBA in best. (viele) Zellen einfügen
Klaus

Hallihallo zusammen,
und zwar mache ich u.a. einen Vergleich von 2 Tabellen mit mehreren Spalten und vielen Zeilen (meist um die 2500). [Vergleichscode ursprünglich von Hajo-Excel.de... vielen Dank an der Stelle!!]
Ich habs so hinprogrammiert und es hat im Kleinen auch gut funktioniert....
15.09.2010 16:53:30
Thread-ID: 1177873
5 Beiträge
Bild in Zelle einfügen.
Ernst

Hallo Exel Profis !
Ich würde mal wieder eure Hilfe benötigen.
Ich bräuchte ein makro das mir folgendes erfüllt, per Doppelklick in Zelle. g3 sollte sich der ordner C:\Dokumente und Einstellungen\Eigene Dateien\Eigene Bilder öffnen .Danach möchte ich mir ein bild auswählen können das si...
24.11.2010 12:48:35
Thread-ID: 1188515
4 Beiträge
Anzeige
Anzeige

Infobox / Tutorial

Diagramm in Excel an Zelle heften

Schritt-für-Schritt-Anleitung

  1. Diagramm erstellen: Zuerst musst Du ein Diagramm in Excel erstellen. Du kannst dies über die Registerkarte „Einfügen“ tun. Wähle den gewünschten Diagrammtyp aus, z.B. ein Balkendiagramm oder ein Kreisdiagramm.

  2. VBA-Editor öffnen: Drücke ALT + F11, um den VBA-Editor zu öffnen.

  3. Neues Modul hinzufügen: Klicke mit der rechten Maustaste auf „VBAProject (DeinArbeitsblattName)“ und wähle „Einfügen“ > „Modul“.

  4. Code einfügen: Füge den folgenden VBA-Code in das Modul ein, um das Diagramm in einer bestimmten Zelle zu verankern:

    Sub DiagrammInZelleEinfügen()
    Dim CO As ChartObject
    Set CO = Worksheets("Übersicht").ChartObjects.Add(Left:=Range("A1").Left, _
                                                       Top:=Range("A1").Top, _
                                                       Width:=300, Height:=200)
    CO.Chart.ChartType = xlLine
    CO.Chart.SetSourceData Source:=Worksheets("Übersicht").Range("A6:H51")
    CO.Chart.HasTitle = True
    CO.Chart.ChartTitle.Text = "Mein Diagramm"
End Sub

  5. Diagramm verankern: Um das Diagramm an eine Zelle zu heften, kannst Du die Eigenschaften Top und Left des Diagramms verwenden, um es an die gewünschte Zelle auszurichten.

  6. Makro ausführen: Schließe den VBA-Editor und führe das Makro aus, um das Diagramm an der gewünschten Stelle zu platzieren.

Häufige Fehler und Lösungen

  • Diagramm erscheint nicht an der richtigen Stelle: Stelle sicher, dass die Top und Left Eigenschaften korrekt auf die Zelle eingestellt sind, in der Du das Diagramm haben möchtest.

  • Fehlermeldung beim Ausführen des Makros: Überprüfe, ob alle Referenzen zur Range korrekt sind und dass das Arbeitsblatt "Übersicht" existiert.

  • Diagramm wird nicht aktualisiert: Wenn sich die Daten ändern, stelle sicher, dass Du den SetSourceData Befehl im Code aktualisierst, um die neuen Daten einzubeziehen.

Alternative Methoden

Wenn Du kein VBA verwenden möchtest, kannst Du auch das Diagramm manuell erstellen und dann per Drag & Drop an die gewünschte Zelle verschieben. Um das Diagramm an eine Zelle zu fixieren, gehe zu den Diagrammeinstellungen und wähle „Diagramm an Zelle ausrichten“.

Ein weiterer Ansatz ist die Verwendung von Google Sheets, um ein Diagramm zu erstellen und es dann in Excel zu importieren. Dabei musst Du jedoch beachten, dass die Formatierungen möglicherweise nicht identisch sind.

Praktische Beispiele

  1. Balkendiagramm in Zelle: Erstelle ein einfaches Balkendiagramm mit den Werten in den Zellen A1:A10 und verankere es in Zelle B1.

    ' Beispielcode zum Erstellen eines Balkendiagramms
Sub BalkendiagrammErstellen()
    Dim CO As ChartObject
    Set CO = Worksheets("Übersicht").ChartObjects.Add(Left:=Range("B1").Left, _
                                                       Top:=Range("B1").Top, _
                                                       Width:=300, Height:=200)
    CO.Chart.ChartType = xlBarClustered
    CO.Chart.SetSourceData Source:=Worksheets("Übersicht").Range("A1:A10")
End Sub

  2. Kreisdiagramm erstellen: Verwende einen ähnlichen Ansatz, um ein Kreisdiagramm zu erstellen und in Zelle C1 zu verankern.

Tipps für Profis

  • Experimentiere mit verschiedenen Diagrammtypen, um die besten Ergebnisse für Deine Daten zu erzielen.
  • Nutze den Diagrammzeichner in Excel, um benutzerdefinierte Diagramme zu erstellen.
  • Wenn Du regelmäßig Diagramme erstellst, erwäge die Erstellung eines benutzerdefinierten Makros, um den Prozess zu automatisieren.

FAQ: Häufige Fragen

1. Wie kann ich ein Diagramm in Zelle verankern?
Du kannst die Top und Left Eigenschaften des Diagrammobjekts verwenden, um es an einer bestimmten Zelle auszurichten.

2. Kann ich ein Diagramm in Google Sheets erstellen und in Excel verwenden?
Ja, Du kannst ein Diagramm in Google Sheets erstellen und es dann als Bild exportieren, um es in Excel einzufügen. Beachte jedoch, dass interaktive Funktionen verloren gehen können.

Beliebteste Forumthreads (12 Monate)

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