Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Ein CommandButton mitscrollen lassen

Forumthread: Ein CommandButton mitscrollen lassen

Ein CommandButton mitscrollen lassen
13.10.2008 17:13:24
Jakob
Hallo,
ist es möglich ein CommandButton beim scrollen in der Tabelle mitscrollen zu lassen sodaß es immer sichtbar ist?
Vielen Dank für Eure Hilfe.
Gruß,
jakob
Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Ein CommandButton mitscrollen lassen
13.10.2008 17:18:00
Heinz
Hi,
nein, entweder oben platzieren und fixieren oder floating Commandbar verwenden.
mfg Heinz
AW: Ein CommandButton mitscrollen lassen
14.10.2008 00:01:00
Daniel
Hi
also direkt beim Scrollen ist es nicht möglich (zumindest nicht mit vertretbarem Aufwand).
mit diesem Code kannst du allerdings den Commandbutton in den sichtbaren bereich holen, sobald eine Zelle selektiert wird.
der Code muss in Modul des Tabellenblatts.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
CommandButton1.Top = ActiveWindow.VisibleRange.Top
CommandButton1.Left = ActiveWindow.VisibleRange.Left
End Sub


eine ander Alternative zu den schon genannten wäre eine Userform, die den Button enthält.
Gruß, Daniel

Anzeige
AW: Ein CommandButton mitscrollen lassen
14.10.2008 14:14:00
Jakob
Hallo Daniel,
vielen Dank für Dein Lösungsansatz. Das einzige unschöne daran ist, daß der Commandbutton links und nicht recht angezeigt wird. Ich habe einfach versucht "left" durch "right" zu ersetzen aber scheinbar gibt es die Eigenschaft "right" nicht. Ich habe das Problem einfach dadurch gelöst, daß ich eine leere Spalte A eingefügt habe.
Gruß,
Jakob
Anzeige
AW: Ein CommandButton mitscrollen lassen
14.10.2008 22:02:00
Daniel
Hi
wenn der Commandbutton am rechten Rand des sichtbaren bereichs erscheinen soll, dann wäre folgender Befehl vonnöten:
Commandbutton1.Left = ActiveWindow.VisibleRange.Left + ActiveWindow.VisibleRange.Width - Commandbutton1.Width
ggf erwünsche Abstände zum Rand kann man bei bedarf noch mit dazu addieren oder abziehen.
für die Höhe heißt die WIDTH entsprechende Eigenschaft HEIGHT
Gruß, Daniel
Anzeige
AW: Ein CommandButton mitscrollen lassen
15.10.2008 11:01:00
Jakob
Hallo Daniel,
das klappt super.
Vielen Dank.
Gruß,
Jakob
;
Anzeige

Infobox / Tutorial

CommandButton in Excel beim Scrollen sichtbar halten


Schritt-für-Schritt-Anleitung

  1. Öffne das Excel-Dokument in dem Du den CommandButton hinzufügen möchtest.

  2. Füge den CommandButton über die Entwicklertools hinzu:

    • Gehe zu "Entwicklertools" > "Einfügen" > "CommandButton".
  3. Klicke mit der rechten Maustaste auf den CommandButton und wähle "Code anzeigen".

  4. Füge den folgenden VBA-Code ein, um den Button beim Scrollen sichtbar zu halten:

    Private Sub Worksheet_SelectionChange(ByVal Target As Range)
       CommandButton1.Top = ActiveWindow.VisibleRange.Top
       CommandButton1.Left = ActiveWindow.VisibleRange.Left + ActiveWindow.VisibleRange.Width - CommandButton1.Width
    End Sub
  5. Schließe den VBA-Editor und teste die Scrollfunktion.


Häufige Fehler und Lösungen

  • Fehler: Der CommandButton bleibt nicht am rechten Rand sichtbar.

    • Lösung: Stelle sicher, dass Du den Code für die richtige Position wie folgt anpasst:
      CommandButton1.Left = ActiveWindow.VisibleRange.Left + ActiveWindow.VisibleRange.Width - CommandButton1.Width
  • Fehler: Der Button ist nicht sichtbar, wenn ich die Zelle wechsle.

    • Lösung: Überprüfe, ob der Code im richtigen Tabellenblatt-Modul eingefügt wurde.

Alternative Methoden

Eine alternative Methode, um einen CommandButton sichtbar zu halten, ist die Verwendung einer Userform. Diese Form kann immer im Vordergrund gehalten werden und ermöglicht eine bessere Benutzerinteraktion.

  1. Erstelle eine Userform über den VBA-Editor.
  2. Füge einen CommandButton zur Userform hinzu.
  3. Setze die Userform als Modal oder nicht-modal, je nach Bedarf.

Praktische Beispiele

Wenn Du den CommandButton links anstatt rechts platzieren möchtest, kannst Du den Code entsprechend anpassen:

CommandButton1.Left = ActiveWindow.VisibleRange.Left

Falls Du zusätzlich Abstände vom Rand hinzufügen möchtest, kannst Du den Befehl wie folgt modifizieren:

CommandButton1.Left = ActiveWindow.VisibleRange.Left + 10 'addiert 10 Punkte Abstand

Tipps für Profis

  • Verwende die Eigenschaft Height, um den Button auch in der Höhe anzupassen, falls gewünscht:

    CommandButton1.Top = ActiveWindow.VisibleRange.Top + 10 ' Abstand nach oben
  • Speichere Deine Arbeit regelmäßig, insbesondere beim Programmieren in VBA, um Datenverluste zu vermeiden.


FAQ: Häufige Fragen

1. Kann ich mehrere CommandButtons gleichzeitig sichtbar halten?
Ja, Du kannst den gleichen Code anpassen, um mehrere Buttons zu verwalten. Achte jedoch darauf, dass die Positionierung korrekt ist.

2. Funktioniert dieser Code in allen Excel-Versionen?
Der Code ist mit Excel 2010 und neueren Versionen kompatibel. Ältere Versionen könnten Unterschiede aufweisen.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige