eingebettetes Diagramm bis zu einer bestimmten Zei



Excel-Version: 97SR2
  

Re: eingebettetes Diagramm bis zu einer bestimmten Zei

von: GraFri
Geschrieben am: 14.04.2002 - 06:53:31


Hallo

Ich hoffe, die Frage richtig verstanden zu haben, dann:
--------------------------------------------------------

Sub Koordinaten_bestimmen()
Dim y_Koordinate As Single
Dim EndZelle As Integer

'Diagramm nach der 20-ten Zeile plazieren
EndZelle = 20

y_Koordinate = 0

For n = 1 To EndZelle
y_Koordinate = y_Koordinate + Cells(n, 1).Height
Next n

'Diagramm plazieren (Diagrammname: 'Diagramm 1')
ActiveSheet.ChartObjects("Diagramm 1").Activate
ActiveChart.ChartArea.Select
ActiveSheet.Shapes("Diagramm 1").Left = 0
ActiveSheet.Shapes("Diagramm 1").Top = y_Koordinate

End Sub

--------------------------------------------------------

mfg, GraFri

  

Re: eingebettetes Diagramm bis zu einer bestimmten Zei

von: WalterDa
Geschrieben am: 15.04.2002 - 13:23:42


Danke GraFri,

wusste nicht dass es so einfach geht!

Walter

nach unten

Betrifft: eingebettetes Diagramm bis zu einer bestimmten Zei
von: WalterDa
Geschrieben am: 14.04.2002 - 06:03:07

Ich möchte ein eingebettetes Diagramm beim öffnen einer Datei immer bis zum Ende der Datenreihe (Zeilen) verschieben.
Gibt es eine einfache Möglichkeit für eine bestimmte Zelle (z.B. A200) die x-Koordinaten zu bestimmen?

Walter


 nach oben

Beiträge aus den Excel-Beispielen zum Thema "eingebettetes Diagramm bis zu einer bestimmten Zei"