Registriert seit: 22.09.2021
Version(en): Professional Plus 2016
Guten Tag,
ich suche eine Möglichkeit, womit bei Excel bei Suchen und Ersetzen der Haken bei "Gesamten Zellinhalt vergleichen" als Standard nicht gesetzt ist.
Bei der Suchfunktion (VBA) Application.Dialogs(xlDialogFormulaFind).Show "", 2, 2 funktionier das auch einwandfrei. Allerdings lässt sich bei diesem geöffneten Dialogfenster das Arbeitsblatt nicht mehr auswählen.
Und das ist für meine Anforderung essenziell.
Daher würde ich sehr gerne mit (VBA) Application.CommandBars.FindControl(ID:=1849).Execute arbeiten.
Hier habe ich bisher jedoch keine Möglichkeit finden können, die Parameter einzustellen.
Hat jemand eine Idee? Mit SendKeys möchte ich nicht arbeiten! :)
Alternativ würde es mir auch helfen, könnte ich das Suchfenster mit einem Befehl schließen:
Application.Dialogs(xlDialogFormulaFind).Show "", 2, 2
"Suchfenster schließen" (Application.SendKeys ("{ESC}") funktioniert nicht - stellt mit nur NumLock um?!)
Application.CommandBars.FindControl(ID:=1849).Execute
Beste Grüße
MrLord (Anfänger)
Registriert seit: 04.11.2014
Version(en): Office 365 Beta
Hi,
Vorschlag: Nutze ein Userform (mit einem "Ausführen-Button" und 2 Textfeldern - eins für "Suchen nach" und das andere für "Ersetzen") - Showmodal-Eigenschaft des Forms stellst Du auf False.
Beim Klick auf "Ausführen" führst Du dann die gewünschte Aktion mit "enthält" durch.
Registriert seit: 08.10.2020
Version(en): 2019+365
Mal zum Verständnis, meinst du das Fenster?
Interpunktion und Orthographie dieses Textes sind frei erfunden.
Eine Übereinstimmung mit aktuellen oder ehemaligen Regeln wäre rein zufällig und ist nicht beabsichtigt.
Grüße, StefanB
Registriert seit: 22.09.2021
Version(en): Professional Plus 2016
@StefanB
Genau richtig. Mit diesem würde ich gerne arbeiten. Allerdings ist nach einer gewissen Zeit der Haken bei "Gesamten Zellinhalt vergleichen" wieder gesetzt.
Bei der alten Suchfunktion Application.Dialogs(xlDialogFormulaFind).Show "", 2, 2 kann ich vordefinieren, wie gesucht wird, jedoch kann ich bei diesem geöffneten Dialog keine Zelle auswählen.
Öffne ich nun zuerst die "alte" Suchfunktion, schließe diese und öffne anschließend die "neue" Suchfunktion Application.CommandBars.FindControl(ID:=1849).Execute, werden die Einstellungen übernommen.
Nur finde ich bisher keine Möglichkeit per Makrobefehl das Dialogfenster zu schließen.
@Boris
Was es alles gibt. In diese Materie muss ich mich erst etwas einarbeiten. Aber wenn ich es richtig verstehen, kann ich mir damit meinen eigenen Suchdialog basteln, richtig?
Registriert seit: 08.10.2020
Version(en): 2019+365
Hmm...komisch. Bei mir ist der Haken dauerhaft NICHT gesetzt.
Interpunktion und Orthographie dieses Textes sind frei erfunden.
Eine Übereinstimmung mit aktuellen oder ehemaligen Regeln wäre rein zufällig und ist nicht beabsichtigt.
Grüße, StefanB
Registriert seit: 22.09.2021
Version(en): Professional Plus 2016
Excel scheint sich die Einstellung auch grundsätzlich zu merken. Allerdings liegt meine Datei auf einem Server und gefühlt bei jedem Backup ist der Haken wieder gesetzt :(
Registriert seit: 08.10.2020
Version(en): 2019+365
Interpunktion und Orthographie dieses Textes sind frei erfunden.
Eine Übereinstimmung mit aktuellen oder ehemaligen Regeln wäre rein zufällig und ist nicht beabsichtigt.
Grüße, StefanB
Registriert seit: 22.09.2021
Version(en): Professional Plus 2016
22.09.2021, 14:58
(Dieser Beitrag wurde zuletzt bearbeitet: 22.09.2021, 15:04 von MrLord.)
@StefanB
Wow, unglaublich - das scheint zu funktionieren.
Herzlichen Dank. Ich habe es jetzt in mein Marko eingebaut - optimal!
Eine kurze Zusatzfrage:
Ist es damit auch möglich, die Position des Suchfensters festzulegen?
Registriert seit: 08.10.2020
Version(en): 2019+365
Wo ploppts denn auf wenn Du es öffnest? Immer an der gleichen Position oder an der, wo Du es zuletzt geschlossen hattest?
Interpunktion und Orthographie dieses Textes sind frei erfunden.
Eine Übereinstimmung mit aktuellen oder ehemaligen Regeln wäre rein zufällig und ist nicht beabsichtigt.
Grüße, StefanB
Registriert seit: 04.11.2014
Version(en): Office 365 Beta
Hi,
Zitat:Aber wenn ich es richtig verstehen, kann ich mir damit meinen eigenen Suchdialog basteln, richtig?
Exakt!