HERBERS Excel-Forum - das Archiv
Thema: Diagramm festen Platz F1 bis S30 zuweisen
-
hmm.. kommt fehlermichael
-
AW: hmm.. kommt fehlerK.Rola
-
also....michael
-
AW: also....K.Rola
Diagramm festen Platz F1 bis S30 zuweisen
michael
HAllo,
wie kan ich in einem Macro einem Diagramm eine feste Position im Tabellenblatt zuweisen z.B. von F1 bis S30?
DAnke Michael
AW: Diagramm festen Platz F1 bis S30 zuweisen
K.Rola
Hallo,
Sub Skalieren()
With ActiveSheet.ChartObjects(1)
.Left = [f1].Left
.Top = [f1].Top
.Width = [s30].Left - [f1].Left
.Height = [s30].Top
End With
End Sub
Gruß K.Rola
AW: Diagramm festen Platz F1 bis S30 zuweisen
michael
Hallo K.Rola,
danke für die Hilfe.
With ActiveSheet.ChartObjects(1) bezieht sich nur auf das Diagramm 1.
Wie kann ich das momentan aktive Diagramm skalieren?
Gibt es einen Befehl analog ActiveChart oder kann ich die Nummer des Chartobjekts auslesen und als Variable statt der 1 einsetzen?
Danke
Michael
AW: Diagramm festen Platz F1 bis S30 zuweisen
K.Rola
Hallo,
den Index einfach mal testen und dann einsetzen: ActiveSheet.ChartObjects(3)
Gruß K.Rola
hmm.. kommt fehler
michael
Hallo K.Rola,
hatte ich auch schon probiert (wobei diese Lösung auch nur im Testbetrieb praktikabel wäre und auch da nicht da beim Ändern von (1) auf (3) das Makro zurückgestzt werden will)
Hast du noch ne Idee, wie direkt der Name ausgelesen und später eingesetzt werden könnte?
Gruß
Michael
AW: hmm.. kommt fehler
K.Rola
Hallo,
ich weiß nicht, was du vorhast, beschreib mal.
Gruß K.Rola
also....
michael
Hallo K.Rola,
... ich will dass das Macro von selbst versteht dass ich nach dem x-ten Durchlauf des Macros das x-te Diagramm erstellt habe. Somit müsste das Macro feststellen wie nun das zuletzt erstellte (noch selectierte) Diagramm heißt.
Dieser Namen muss dann später an With ActiveSheet.ChartObjects(1) anstatt der 1 übergeben werden.
irgendie sowas:
n= activeChart.name
With ActiveSheet.ChartObjects(n)
leider geht das aber nicht (kam was wie Objekt nicht vorhanden?)...und ich habe keine weitere Idee mangels Kenntnis...
Gruß Michael
AW: also....
K.Rola
Hallo,
das oder die Diagramme werden laut Code an eine fixe Position verschoben. Das ist
nach meinem Verständnis ein einmaliger Vorgang. Warum sollte das nicht über den Index
gehen?
Gruß K.Rola
Diagramm festen Platz F1 bis S30 zuweisen
michael
HAllo,
wie kan ich in einem Macro einem Diagramm eine feste Position im Tabellenblatt zuweisen z.B. von F1 bis S30?
DAnke Michael
AW: Diagramm festen Platz F1 bis S30 zuweisen
K.Rola
Hallo,
Sub Skalieren()
With ActiveSheet.ChartObjects(1)
.Left = [f1].Left
.Top = [f1].Top
.Width = [s30].Left - [f1].Left
.Height = [s30].Top
End With
End Sub
Gruß K.Rola
AW: Diagramm festen Platz F1 bis S30 zuweisen
michael
Hallo K.Rola,
danke für die Hilfe.
With ActiveSheet.ChartObjects(1) bezieht sich nur auf das Diagramm 1.
Wie kann ich das momentan aktive Diagramm skalieren?
Gibt es einen Befehl analog ActiveChart oder kann ich die Nummer des Chartobjekts auslesen und als Variable statt der 1 einsetzen?
Danke
Michael
AW: Diagramm festen Platz F1 bis S30 zuweisen
K.Rola
Hallo,
den Index einfach mal testen und dann einsetzen: ActiveSheet.ChartObjects(3)
Gruß K.Rola
hmm.. kommt fehler
michael
Hallo K.Rola,
hatte ich auch schon probiert (wobei diese Lösung auch nur im Testbetrieb praktikabel wäre und auch da nicht da beim Ändern von (1) auf (3) das Makro zurückgestzt werden will)
Hast du noch ne Idee, wie direkt der Name ausgelesen und später eingesetzt werden könnte?
Gruß
Michael
AW: hmm.. kommt fehler
K.Rola
Hallo,
ich weiß nicht, was du vorhast, beschreib mal.
Gruß K.Rola
also....
michael
Hallo K.Rola,
... ich will dass das Macro von selbst versteht dass ich nach dem x-ten Durchlauf des Macros das x-te Diagramm erstellt habe. Somit müsste das Macro feststellen wie nun das zuletzt erstellte (noch selectierte) Diagramm heißt.
Dieser Namen muss dann später an With ActiveSheet.ChartObjects(1) anstatt der 1 übergeben werden.
irgendie sowas:
n= activeChart.name
With ActiveSheet.ChartObjects(n)
leider geht das aber nicht (kam was wie Objekt nicht vorhanden?)...und ich habe keine weitere Idee mangels Kenntnis...
Gruß Michael
AW: also....
K.Rola
Hallo,
das oder die Diagramme werden laut Code an eine fixe Position verschoben. Das ist
nach meinem Verständnis ein einmaliger Vorgang. Warum sollte das nicht über den Index
gehen?
Gruß K.Rola
Excel-Beispiele