Microsoft Office Forum [ www.Office-Fragen.de ] >> READONLY <<

Microsoft Office 2003-2019 => Excel => Thema gestartet von: hziemer am November 01, 2012, 11:27:49 Vormittag

Titel: Office 2010: Grafik soll mit der Eingabe von Daten mit nach unten rutschen
Beitrag von: hziemer am November 01, 2012, 11:27:49 Vormittag

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

Titel: Antw:Office 2010: Grafik soll mit der Eingabe von Daten mit nach unten rutschen
Beitrag von: Beverly am November 01, 2012, 11:58:19 Vormittag

Hi,

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

Bis später,
Karin

Titel: Office 2010: Antw:Office 2010: Grafik soll mit der Eingabe von Daten mit nach unten rutschen
Beitrag von: hziemer am November 02, 2012, 18:37:09 Nachmittag

Hallo Beverly

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

Danke für eine Antwort

Titel: Antw:Office 2010: Grafik soll mit der Eingabe von Daten mit nach unten rutschen
Beitrag von: Beverly am November 03, 2012, 10:54:58 Vormittag

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

Titel: Office 2010: Antw:Office 2010: Grafik soll mit der Eingabe von Daten mit nach unten rutschen
Beitrag von: hziemer am November 03, 2012, 19:02:39 Nachmittag

Guten Abend Beverly

Das war es genau was ich gesucht habe.

Danke für Deine Hilfe.

hziemer