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

Diagramm ohne Bezüge kopieren

Forumthread: Diagramm ohne Bezüge kopieren

Diagramm ohne Bezüge kopieren
25.08.2022 10:56:05
Marc
Hallo zusammen
Ich versuche per VBA das Register "Diagramm" zu kopieren und als neues Register *ohne Verknüpfungen bzw. nur als Werte* einzufügen. Ist das möglich, dass ich das Diagramm nur mit den Werten kopiere?
Vielen Dank für die Hilfe
Marc
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Diagramm ohne Bezüge kopieren
25.08.2022 11:22:08
Beverly
Hi Marc,
mit Register "Diagramm" meinst du ein Tabellenblatt mit eingebettetem Diagrammobjekt oder ein eigenständiges Diagrammblatt?
Bis später
Karin
AW: Diagramm ohne Bezüge kopieren
25.08.2022 11:42:11
Marc
Liebe Karin
Vielen Dank für die Antwort. Ja genau, es handelt sich hier um ein Register mit dem Namen Diagramm und einem eigenständiges Diagrammblatt. Also im Register hat es keine Zellen mehr, sondern alles ist grau und nur das Diagramm sichtbar.
Vielen Dank für die Hilfe
Marc
Anzeige
AW: Diagramm ohne Bezüge kopieren
25.08.2022 12:04:25
Beverly
Hi Marc,
das kannst du nach diesem Prinzip lösen:

Sub DiagrammBereichUmwandelnDiagrammblatt()
Dim lngReihe As Long          ' Schleifenvariable für Datenreihen
Dim arrWerte()                ' Variable für Datenreihenwerte
'  Bildschirmaktualisierung aus
Application.ScreenUpdating = False
'  Diagrammblatt kopieren
Charts("Diagramm").Copy After:=Sheets(Sheets.Count)
With Charts(Charts.Count)
'     Bezug zu Zellbereichen in Werte umwandeln
For lngReihe = 1 To .SeriesCollection.Count
' Y-Werte
arrWerte() = Range(Split(.SeriesCollection(lngReihe).Formula, ",")(2))
.SeriesCollection(lngReihe).Values = arrWerte()
' X-Werte
arrWerte() = Range(Split(.SeriesCollection(lngReihe).Formula, ",")(1))
.SeriesCollection(lngReihe).XValues = arrWerte()
Next lngReihe
End With
'   Bildschirmaktualisierung ein
Application.ScreenUpdating = True
End Sub
Bis später
Karin
Anzeige
AW: Diagramm ohne Bezüge kopieren
26.08.2022 11:27:34
Marc
Vielen Dank, funktioniert bestens.
Besten Gruss
Marc
AW: Diagramm ohne Bezüge kopieren
25.08.2022 11:38:59
Rudi
Hallo,
sowas?

Sub aaa()
Dim strAKT As String
strAKT = ActiveWorkbook.FullName
Sheets("Diagramm").Copy
ActiveWorkbook.BreakLink Name:=strAKT, _
Type:=xlExcelLinks
End Sub
Gruß
Rudi
Anzeige

Forumthreads zu verwandten Themen

Zellen kopieren (mit Formatierung)
Yves

Hallo zusammen,
ich möchte Daten von einem Tabellenblatt (Tabelle2) in ein anderes Tabellenblatt (Tabelle1) kopieren.
Habe dies bis anhin so gelöst:
sheets("Tabelle1").cells(1,1).value = sheets("Tabelle2").cells(5,1).value
Somit wurden einfach nur die Werte 'kopiert'. Nun würde...
08.08.2008 14:09:18
Thread-ID: 1000289
8 Beiträge
Zeilen Kopieren mit Formeln u. Formaten
Lemmi

Hallo zusammen,
ich möchte einen Block (5Zeilen) am Ende einer Tabelle einfügen!
Diese Zeilen sollen mit ihren Formaten unf Formel Kopiert und am Ende der Leiste eingefügt werden!
Die Formeln sind in den Roten Zellen.
Die Zellen sonst sind bis auf Spalte A und B ohne Inhalt!
11.08.2008 14:11:35
Thread-ID: 1000856
5 Beiträge
1:1-Kopieren ohne dass Formeln "angepasst" werden
Wolfango

Hallo Experten!
Eine Spalte enthält lauter Formeln (alles relative Bezüge). Wenn ich diese komplette Spalte (markiert über Klick auf Spaltenkopf) in eine neue, unbenutzte Spalte kopiere werden (aufgrund der relativen Bezüge) ja stets alle Formeln automatisch angepasst (egal ob über das Menü...
17.09.2008 15:45:18
Thread-ID: 1010435
3 Beiträge
VBA Zellen mit x kopieren aber nur bestimmte Zellen
balta

Hallo zusammen,
habe folgendes problem, undzwar sieht meine Tabelle so aus
__A____B______C______D_____E_______F_____G____H
1_x___alf___test1_________________1234___a____ist ein Auto
2_y________________Ulf____test2__________b____ist ein Krad
3
4
5
6_y_____________...
26.09.2008 23:48:47
Thread-ID: 1012775
6 Beiträge
Zellen formatierung mit Formeln
Peter

Hallo
habe eine Formatierung in einer Zelle, in der er die 0 als 00 anzeigen soll.
Das macht er so lange ich keine Formel drin habe.
Sobald die Formel drin ist., zeigt er mir nur eine 0 (Null an.
die Formel ist
RECHTS(SUMMEWENN(C14:C40;">0";G14:G40);2)
Wie bekomme ic...
08.11.2008 18:25:00
Thread-ID: 1022970
7 Beiträge
Formel mit VBA kopieren
Hartmut_M

Hallo, ich möchte mit VBA aus einem Bereich die Formeln in einen anderen Bereich kopieren.
Nutze hierfür folgenden code, wobei die variablen spalte und spalteneu für die Spaltennummern stehen:
Range(Cells(5, spalte), Cells(130, spalte)).Select
Selection.AutoFill Destination:=Range(C...
12.12.2008 10:02:26
Thread-ID: 1032307
3 Beiträge
nicht die Formel mitkopieren
TomTom

Hi,
Ich habe in meinem Sheet eine Funktion, mit der will ich verschiedene Zeilen kopieren:
MeineQuelle.Rows(lngZeile).Copy Destination:=MeinZiel.Cells(lngZeile, 1)
Wenn ich nun in einer gefundenen Zeile, die kopiert wird, irgendwo eine Formel drin habe, (die sich auf irgend was bezi...
30.01.2009 11:15:07
Thread-ID: 1045327
8 Beiträge
Daten per Makro kopieren ohne Formeln
Kai

Hi,
ich möchte Zeilen innerhalb einer Mappe von einem Tabellenblatt ins ander kopieren. Meine Daten stehen in der Tabellen "IMPORT" (Zeilen 10:100) und sollen nach "DATENBESTAND" ab Zeile 50 reinkopiert werden.
Das kopieren alleine wäre sicher nicht das Problem, aber in meinem Tabellenb...
05.03.2009 13:05:31
Thread-ID: 1056794
3 Beiträge
Anzeige
Formel runterkopieren und bestimmte Zellen ausl.
Tom

Hallo zusammen,
vielleicht kann mir jemand bei folgendem Problem helfen:
In Zelle C1 steht eine Formel die ich ab und zu verändern muss, nun möchte ich diese Formel mit Doppelklick runterkopieren, in der Spalte C sind aber bestimmte Zellen, die bestimmte Werte enthalten und die dürfen n...
10.05.2009 18:13:07
Thread-ID: 1074184
6 Beiträge
einzelne Zellen mit Formeln sperren
natka

Hallo Ihr Lieben Excel Begeisterte,
hättet Ihr bitte eine Tipp für mich, wie ich einzelne Zellen in einenm Tabellenblatt im Excel für Dritte sperren kann. Sie sollen zwar das Ergebnis seheh, aber nicht anklicken können. Damit meine tole Formel keinen Schaden nimmt.
Danke
natka
15.05.2009 14:20:56
Thread-ID: 1075486
4 Beiträge
VBA - Formeln kopieren mit Bezug auf andere Sheets
Fabian

Hallo Zusammen,
ich habe folgende Problemstellung:
Eine Exceldatei *xlsx mit insgesamt 4 Tabellenblättern.
Tabellenblatt 1 - Material Data - Dateneingabe ab Zeile 2.
Tabellenblatt 2 - ABCXYZ - nicht relevant für das Problem
Tabellenblatt 3 - Life Time Cycle - Berechnung, di...
16.09.2009 09:14:54
Thread-ID: 1103102
5 Beiträge
Wennformel mit Gültigkeit in Zellen
Sebastian

Hallo Excel-Freunde,
im Anhang findet ihr eine Tabelle die ich soweit schon versucht habe zum laufen zu bringen. Ich habe jetzt nur ein Problem mit einer Wenn-Abfrage wenn in einem Feld schon eine Gültigkeit vorgegeben ist.
Hier die Tabelle: https://www.herber.de/bbs/user/65096.xls
...
15.10.2009 13:25:58
Thread-ID: 1109770
7 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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