Wie schwebe ich immer eine Befehlsschaltfläche auf einem Arbeitsblatt in Excel?
In einigen Fällen benötigen Sie möglicherweise eine schwebende Befehlsschaltfläche (ActiveX-Steuerelemente), um mit Ihrem Arbeitsblatt in Bewegung zu bleiben, unabhängig davon, wie Sie im Arbeitsblatt nach oben oder unten scrollen. Dieser Artikel zeigt Ihnen die Methode, um dies zu erreichen.
Immer eine Befehlsschaltfläche auf Arbeitsblatt mit VBA-Code schweben lassen
Immer eine Befehlsschaltfläche auf Arbeitsblatt mit VBA-Code schweben lassen
Gehen Sie wie folgt vor, damit eine Befehlsschaltfläche immer im Arbeitsblatt schwebt.
1. Klicken Sie in dem Arbeitsblatt, das die ActiveX Controls-Befehlsschaltfläche enthält, die schwebend sein soll, mit der rechten Maustaste auf die Registerkarte Blatt, und klicken Sie dann auf Code anzeigen in dem Kontextmenü.
2. Beim Auftauchen Microsoft Visual Basic für Applikationen Kopieren Sie den folgenden VBA-Code und fügen Sie ihn in das Code-Fenster ein.
VBA-Code: Erstellen Sie eine Befehlsschaltfläche, die immer im Arbeitsblatt schwebt
Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
On Error GoTo 0
With Cells(Windows(1).ScrollRow, Windows(1).ScrollColumn)
CommandButton1.Top = .Top + 100
CommandButton1.Left = .Left + 300
End With
End Sub
Note: Im obigen Code ist CommandButton1 der Schaltflächenname, den Sie immer sichtbar halten möchten. Bitte ändern Sie es nach Ihren Wünschen.
3. Drücken Sie dann die Taste Andere + Q Tasten zum Verlassen des Microsoft Visual Basic für Applikationen Fenster.
Von nun an schwebt die Befehlsschaltfläche immer in der oberen Mitte des Arbeitsblatts, wobei die aktiv angeklickte Zelle verschoben wird (siehe Abbildung unten).
Note: Dieser VBA funktioniert nur für die ActiveX Controld-Befehlsschaltflächen.
In Verbindung stehende Artikel:
- Wie kann ich eine aktive Arbeitsmappe ohne Aufforderung über eine Befehlsschaltfläche in Excel speichern und schließen?
- Wie aktualisiere oder füge ich (aktuelles) Datum und Uhrzeit über eine Befehlsschaltfläche in Excel ein?
- Wie verwende ich eine Befehlsschaltfläche, um einen bestimmten Zellenwert in Excel zu ändern?
- Wie erstelle ich eine Befehlsschaltfläche zum Kopieren und Einfügen von Daten in Excel?
- Wie verwende ich die Befehlsschaltfläche, um ein aktives Arbeitsblatt als PDF-Datei in Excel zu speichern?
- Wie füge ich automatisch eine leere neue Zeile über die Befehlsschaltfläche in Excel ein?
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, um die Produktivität zu steigern und Zeit zu sparen. Klicken Sie hier, um die Funktion zu erhalten, die Sie am meisten benötigen ...
Office Tab Bringt die Oberfläche mit Registerkarten in Office und erleichtert Ihnen die Arbeit erheblich
- Aktivieren Sie das Bearbeiten und Lesen von Registerkarten in Word, Excel und PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters und nicht in neuen Fenstern.
- Steigert Ihre Produktivität um 50 % und reduziert jeden Tag Hunderte von Mausklicks für Sie!