Wie behält man ein Diagramm in Excel beim Scrollen stets im Blick?
Wenn ein Diagramm in ein Arbeitsblatt eingefügt wurde und Sie das Blatt nach unten scrollen, um die Daten anzuzeigen, bleibt das Diagramm – wie im folgenden Screenshot gezeigt – außerhalb des sichtbaren Bereichs, was äußerst ärgerlich sein kann. In diesem Artikel stelle ich einen VBA-Code vor, mit dem das Diagramm stets sichtbar bleibt, egal ob Sie das Blatt nach oben oder unten scrollen.
 |
 |
 |
Ein Diagramm stets im Blick behalten
Ein Diagramm stets im Blick behalten
Um ein Diagramm beim Scrollen des Arbeitsblatts stets sichtbar zu halten, nutzen Sie einfach den folgenden VBA-Code – so bleibt Ihr Diagramm jederzeit im Blick.
1. Klicken Sie mit der rechten Maustaste auf die Registerkarte des Arbeitsblatts, in dem das Diagramm sichtbar bleiben soll, und wählen Sie im Kontextmenü Code anzeigen aus. Siehe Screenshot:
2. Fügen Sie im erscheinenden Fenster Microsoft Visual Basic for Applications den folgenden Code in das leere Skript ein.
VBA: Diagramm stets im Blick behalten
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'UpdatebyExtendoffice20161111
Dim CPos As Double
Application.ScreenUpdating = False
CPos = ActiveWindow.ScrollRow * ActiveCell.RowHeight
ActiveSheet.ChartObjects("Chart 2").Activate
ActiveSheet.Shapes("Chart 2").Top = CPos
ActiveWindow.Visible = False
Application.ScreenUpdating = True
End Sub
3. Speichern und schließen Sie den Dialog; anschließend wird das Diagramm beim Anklicken einer beliebigen Zelle entsprechend nach oben oder unten verschoben.
Hinweise:
(1) Im VBA-Code steht „Chart 2“ für den Namen des Diagramms, das Sie stets sichtbar halten möchten; ändern Sie diesen Namen einfach nach Bedarf.
(2) Mit diesem VBA-Code können mehrere gruppierte Diagramme nicht gleichzeitig dauerhaft sichtbar bleiben.
Entfesseln Sie die Magie von Excel mit KUTOOLS AI
- Intelligente Ausführung: Führen Sie Zelloperationen durch, analysieren Sie Daten und erstellen Sie Diagramme – alles ganz einfach per Sprachbefehl.
- Benutzerdefinierte Formeln: Erstellen Sie maßgeschneiderte Formeln, um Ihre Arbeitsabläufe optimal zu optimieren.
- VBA-Programmierung: Schreiben und implementieren Sie VBA-Code ganz mühelos.
- Formelinterpretation: Verstehen Sie komplexe Formeln spielend leicht.
- Textübersetzung: Überwinden Sie Sprachbarrieren direkt in Ihren Tabellenkalkulationen.
Beste Office-Produktivitätstools
Verbessern Sie Ihre Excel-Kenntnisse mit Kutools für Excel und erleben Sie Effizienz wie nie zuvor.Kutools für Excel bietet über 300 erweiterte Funktionen zur Steigerung der Produktivität und Zeit sparen.Klicken Sie hier, um die Funktion zu erhalten, die Sie am dringendsten benötigen...
Office Tab bringt eine tabbasierte Oberfläche in Office und macht Ihre Arbeit viel einfacher
- Aktivieren Sie tabbasiertes Bearbeiten und Lesen in Word, Excel, PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters – statt jedes in einem separaten Fenster zu öffnen.
- Steigert Ihre Produktivität um 50 % und erspart Ihnen täglich Hunderte von Mausklicks!
Alle Kutools-Add-Ins – ein Installationsprogramm
Kutools for Office-Paket bündelt Add-Ins für Excel, Word, Outlook und PowerPoint sowie Office Tab Pro – ideal für Teams, die mit mehreren Office-Anwendungen arbeiten.
- Alles-in-einem-Paket— Add-Ins für Excel, Word, Outlook & PowerPoint sowie Office Tab Pro
- Ein Installationsprogramm, eine Lizenz— innerhalb weniger Minuten eingerichtet (MSI-fähig)
- Funktioniert besser zusammen— optimierte Produktivität über alle Office-Anwendungen hinweg
- 30-tägige Vollversion zum Testen— keine Registrierung, keine Kreditkarte erforderlich
- Bestes Preis-Leistungs-Verhältnis— sparen Sie im Vergleich zum Kauf einzelner Add-Ins