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

Diagrammfläche formatieren Zellposition unabhängig

Diagrammfläche formatieren Zellposition unabhängig
10.08.2005 10:20:35
Dominik
Hallöchen Forum!
Gibt es die Möglichkeit, dass Excel immer (also Standardmäßig) die folgende Eigenschaft aktiviert:
--- Diagrammfläche formatieren
--- Eigenschaften
--- Von Zellposition und -größe unabhängig
Vielen Dank und Grüße
Dominik

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Diagrammfläche formatieren Zellposition unabhängig
10.08.2005 10:49:44
Galenzo
nein
AW: Diagrammfläche formatieren Zellposition unabhä
10.08.2005 11:28:01
Dominik
Und wenn man das ganze irgendwie in ein Makro in VBA packt?
Also nachdem Schema:
?

Private Sub diagram_Change(ByVal Target As Excel.Range) ?
With Sheets("Tabelle1").DrawingObjects("Diagramm 2")
.Placement = xlFreeFloating
.PrintObject = True
End With
Sheets("Tabelle1").DrawingObjects("Diagramm 2").Locked = True
End Sub

wie heißt die erste Befehlszeile richtig? Kann man diese Sub-Routime dann auch für gerade neu geschaffene Diagramme benutzen?
Danke und Gruß
Dominik
AW: Diagrammfläche formatieren Zellposition unabhä
10.08.2005 11:33:33
Galenzo
dann nimm das Makro von Dominic
Viel Erfolg!
Anzeige
AW: Diagrammfläche formatieren Zellposition unabhängig
10.08.2005 11:17:43
Dominic
Hi Dominik,
kopiere diese code ins modul und weise eine schaltfläche dazu.
Vorgehensweise:
1. Chart makieren
2. Makro laufen lassen

Sub test()
Dim str_dia As String, str_sheet As String, str_diagramm As String
str_dia = ActiveChart.Name
str_sheet = Mid(str_dia, 1, Application.WorksheetFunction.Find(" ", str_dia) - 1)
str_diagramm = Mid(str_dia, Application.WorksheetFunction.Find(" ", str_dia) + 1, Len(str_dia))
Sheets(str_sheet).DrawingObjects(str_diagramm).Placement = xlFreeFloating
End Sub

gruß
Dominic
AW: Diagrammfläche formatieren Zellposition unabhä
10.08.2005 11:54:59
Dominik
Ja, das sollte funktionieren!
Grüße und tausend Dank
Dominik
Anzeige
AW: Diagrammfläche formatieren Zellposition unabhä
10.08.2005 11:57:32
Dominic
Bitte!
Gruß
Dominic

300 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige