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

Forumthread: Suchfeld per vba öffnen

Suchfeld per vba öffnen
28.01.2019 17:41:56
David
Hallo,
ich möchte mit einem ActiveX Steuerelement(Command Button) das Suchfenster aufrufen.
Mit einem normalen button (Makro)funtioniert es mit der Funktion:
Sub Suchen()
Application.Dialogs(xlDialogFormulaFind).Show
End Sub
Allerdings brauche ich es als Command Button weil ich es mir mit folgendem Button:
Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
On Error GoTo 0
With Cells(Windows(1).ScrollRow, Windows(1).ScrollColumn)
CommandButton1.Top = .Top + 10
CommandButton1.Left = .Left + 10
End With
End Sub

als fliegendes Element einfügen möchte.
Vielen Dank.
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Suchfeld per vba öffnen
28.01.2019 17:51:50
Shapeir
Sorry hat sich erledigt ....
AW: Suchfeld per vba öffnen
28.01.2019 17:52:37
Dieter(Drummer)
Hallo David,
da brauchst du nur den Commandbutton1, in z.B. Tabelle1, und diesesn Code des Commandbutton1 unter Tabelle1 einfügen:
Private Sub CommandButton1_Click()
Application.Dialogs(xlDialogFormulaFind).Show
End Sub
Gruß, Dieter(Drummer)
Anzeige
;
Anzeige
Anzeige

Infobox / Tutorial

Suchfeld in Excel mit VBA erstellen


Schritt-für-Schritt-Anleitung

Um ein Suchfeld in Excel zu erstellen, das über einen Command Button aktiviert wird, kannst du die folgenden Schritte befolgen:

  1. Aktiviere die Entwicklertools:

    • Klicke auf „Datei“ > „Optionen“ > „Menüband anpassen“.
    • Setze ein Häkchen bei „Entwicklertools“ und klicke auf „OK“.
  2. Füge einen Command Button hinzu:

    • Gehe zu „Entwicklertools“ > „Einfügen“ und wähle den „Command Button“ (ActiveX-Steuerelement) aus.
    • Ziehe den Button auf das Arbeitsblatt.
  3. Code für den Command Button einfügen:

    • Klicke mit der rechten Maustaste auf den Command Button und wähle „Code anzeigen“.
    • Füge den folgenden VBA-Code ein:
    Private Sub CommandButton1_Click()
       Application.Dialogs(xlDialogFormulaFind).Show
    End Sub
  4. Positioniere den Command Button:

    • Du kannst den Command Button mithilfe des folgenden Codes als fliegendes Element positionieren:
    Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
       On Error GoTo 0
       With Cells(Windows(1).ScrollRow, Windows(1).ScrollColumn)
           CommandButton1.Top = .Top + 10
           CommandButton1.Left = .Left + 10
       End With
    End Sub
  5. Testen:

    • Schließe den VBA-Editor und gehe zurück zu Excel. Klicke auf den Command Button, um das Suchfenster zu öffnen.

Häufige Fehler und Lösungen

  • Fehler: Command Button funktioniert nicht
    Lösung: Überprüfe, ob der Code korrekt im richtigen Arbeitsblatt eingefügt wurde und ob der Button als ActiveX-Steuerelement erstellt wurde.

  • Fehler: Suchfenster öffnet sich nicht
    Lösung: Stelle sicher, dass die Funktion Application.Dialogs(xlDialogFormulaFind).Show richtig geschrieben ist und dass keine anderen VBA-Fehler vorliegen.


Alternative Methoden

Falls du kein VBA verwenden möchtest, kannst du auch ein Suchfeld in Excel einfügen:

  1. Verwende das integrierte Suchfeld:

    • Gehe zu „Start“ und suche nach dem Suchfeld in der oberen rechten Ecke des Excel-Fensters.
  2. Filter verwenden:

    • Aktiviere die Filterfunktion über „Daten“ > „Filter“. Damit kannst du auch nach bestimmten Werten suchen.

Praktische Beispiele

Hier sind einige praktische Anwendungen für das Excel Suchfeld:

  • Schnellzugriff auf Daten: Nutze das Suchfeld, um direkt zu bestimmten Daten in großen Tabellen zu gelangen.
  • Datenanalyse: Kombiniere das Suchfeld mit Pivot-Tabellen, um gezielt Werte zu analysieren.

Tipps für Profis

  • Anpassungen: Du kannst das Aussehen und die Position des Command Buttons anpassen, damit es besser in dein Arbeitsblattdesign passt.
  • Makros optimieren: Überlege, eigene Makros zu erstellen, die das Suchfeld automatisch aufrufen, wenn bestimmte Bedingungen erfüllt sind.

FAQ: Häufige Fragen

1. Wie kann ich das Suchfeld in einer bestimmten Excel-Version einfügen?
Das Einfügen eines Suchfeldes funktioniert in den meisten Excel-Versionen ab Excel 2007. Stelle sicher, dass du die Entwicklertools aktiviert hast.

2. Kann ich das Suchfeld anpassen?
Ja, du kannst das Suchfeld in Excel anpassen, indem du den VBA-Code bearbeitest oder das Layout des Command Buttons veränderst.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige