Strg+F mit Makro ausführen...

Forumthread: Strg+F mit Makro ausführen...

23.08.2006 09:12:48

Stefan

Hi,..
das verstehe ich nicht !
Beim Aufrufen des "Suchen"Dialog (Strg+F) aus/mit einem Makro, findet Excel nichts ?
-------------------------------------------------------------------


Sub Suchen1()
Application.CommandBars.FindControl(ID:=1849).Execute
End Sub

-------------------------------------------------------------------


Sub Suchen2()
Application.Dialogs(xlDialogFormulaFind).Show
End Sub

-------------------------------------------------------------------
Das Fenster öffnet sich aber Excel findet keine Suchergebnisse...?
Wird der Dialog zum Suchen mit der normalen Tastenkombination Strg+F (Suchen,Finden)
aufgerufen, funktioniert es und Excel findet die Suchergebnisse und geht von
einem Suchergebnis zum nächsten - bis Dateiende.
ACHTUNG !!! Wird eines der Makros aufgerufen, kann es sein, dass Excel nicht mehr
richtig funzzzt - die Pos1 und PosEnde Funktionen funktionierten nicht mehr...
Mußte Excel beendeen und neu starten.
Wer kann helfen ? Bitte um Lösungen, aber bitte nicht mit "auto open" die Makros
aufrufen und die ganze Zeit im Hintergrund laufen,...das geht nur zur Lasten
der Performance.
Bitte um Eure Hilfe !
Vielen Dank - Gruss Stefan

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Strg+F mit Makro ausführen...

23.08.2006 09:38:55

Hans
AW: Strg+F mit Makro ausführen...

23.08.2006 15:15:15

Stefan

AW: Strg+F mit Makro ausführen...

23.08.2006 09:38:55

Hans

Hallo Stefan,
das Makro sollte funktionieren, wenn zum Zeitpunkt des Dialogaufrufs der relevante Bereich markiert ist. Alternativ:


Sub Suchen1()
Cells.Select
Application.CommandBars.FindControl(ID:=1849).Execute
End Sub

gruss hans

AW: Strg+F mit Makro ausführen...

23.08.2006 15:15:15

Stefan

Prima, das funktioniert..
----------------------------------------------------------


Sub Suchen()
Cells.Select
Application.CommandBars.FindControl(ID:=1849).Execute
ActiveCell.Select
End Sub

----------------------------------------------------------
vielen-vielen Dank Hans !
Gruss Stefan

Infobox / Tutorial

Schritt-für-Schritt-Anleitung

Um die "Suchen"-Funktion (Strg+F) über ein Makro auszuführen, kannst du die folgenden Schritte befolgen:

Öffne Excel und drücke ALT + F11, um den Visual Basic for Applications (VBA) Editor zu starten.
Klicke auf "Einfügen" und dann auf "Modul", um ein neues Modul zu erstellen.

Füge den folgenden VBA-Code ein:

Sub Suchen1()
   Cells.Select
   Application.CommandBars.FindControl(ID:=1849).Execute
End Sub

Schließe den VBA-Editor.
Um das Makro auszuführen, kannst du es manuell starten oder eine Tastenkombination dafür festlegen.

Häufige Fehler und Lösungen

Fehler: Excel Strg+F funktioniert nicht
Wenn die Suche nicht funktioniert, stelle sicher, dass der relevante Bereich in der Tabelle markiert ist, bevor du das Makro ausführst.
Fehler: Makro führt nicht zu Suchergebnissen
Überprüfe, ob das Makro korrekt ausgeführt wird. Du kannst den Bereich auch manuell auswählen, bevor du das Makro startest.
Problem mit Pos1 und PosEnde
Wenn diese Funktionen nach dem Ausführen des Makros nicht mehr funktionieren, kann es helfen, Excel neu zu starten.

Alternative Methoden

Es gibt verschiedene Methoden, wie du die "Suchen"-Funktion in Excel über ein Makro ausführen kannst:

Dialog für die Formelsuche anzeigen:

Sub Suchen2()
   Application.Dialogs(xlDialogFormulaFind).Show
End Sub

Tastenkombination für das Makro festlegen:
Um das Makro mit einer Tastenkombination zu starten, kannst du im VBA-Editor unter "Extras" -> "Makros" das gewünschte Makro auswählen und auf "Optionen" klicken, um eine Tastenkombination zuzuweisen.

Praktische Beispiele

Hier sind einige praktische Beispiele zur Verwendung des Makros:

Suchen in einem gesamten Arbeitsblatt:

Sub Suchen()
   Cells.Select
   Application.CommandBars.FindControl(ID:=1849).Execute
   ActiveCell.Select
End Sub

Makro mit Tastenkombination ausführen:
Wenn du häufig die Suchfunktion benötigst, kannst du das Makro mit einer eigenen Tastenkombination verknüpfen, um schnell darauf zugreifen zu können.

Tipps für Profis

Verwende die Cells.Select Methode, um sicherzustellen, dass der gesamte Bereich für die Suche ausgewählt ist.
Teste dein Makro regelmäßig, um sicherzustellen, dass es unter verschiedenen Bedingungen funktioniert.
Dokumentiere deine Makros gut, damit du und andere Nutzer wissen, was sie tun.

FAQ: Häufige Fragen

1. Wie kann ich ein Makro mit einer Tastenkombination starten?
Du kannst im Makro-Dialog unter "Extras" die gewünschte Tastenkombination festlegen, um das Makro schnell auszuführen.

2. Was tun, wenn Excel Strg+F nicht funktioniert?
Vergewissere dich, dass der relevante Bereich markiert ist und teste, ob das Makro korrekt ausgeführt wird. Ein Neustart von Excel kann ebenfalls helfen.

Beliebteste Forumthreads (12 Monate)