Office 2010: Grafik soll mit der Eingabe von Daten mit nach unten rutschen

[hziemer]

Hallo an alle Forenmitglieder

Nach Suchen im Internet und diversen Versuchen das Problem selbst zu lösen wende ich mich jetzt an Alle hier im Forum.

Mein Problem ist die Positionierung einer Grafik im aktuellen Tabellenblatt. Jeden Tag werden 4 neue Werte unterhalb der bestehenden Werte in den Spalten b und c eingegeben. In der Spalte d wird ein Mittelwert aus Spalte c gebildet.
Durch die 4 neuen Werte jeden Tag wandert die Grafik im Laufe der Tage langsam nach oben, bis sie nicht mehr sichtbar ist.
Gibt es eine Möglichkeit die Grafik mit dem unteren Rand immer auf der Höhe der aktuellen Eingabezeile zu halten?
Danke für eine Antwort.

Mit freundlichen Grüßen
hziemer

[Beverly]

Hi,

ja, das ist möglich, aber nur per VBA.

Bis später,
Karin

[hziemer]

Hallo Beverly

Hast Du da vielleicht einen Ansatz, den ich weiter verfolgen könnte?

Danke für eine Antwort

[Beverly]

Hi,

kopiere folgenden Code ins Codemodul des Tabellenblattes:

Code: [Auswählen]

Private Sub Worksheet_Change(ByVal Target As Range)
   If Target.Column = 2 Or Target.Column = 3 Then _
      ActiveSheet.ChartObjects(1).Top = _
      Target.Offset(1, 0).Top - ActiveSheet.ChartObjects(1).Height
End Sub
Bis später,
Karin

[hziemer]

Guten Abend Beverly

Das war es genau was ich gesucht habe.

Danke für Deine Hilfe.

hziemer