Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
772to776
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
772to776
772to776
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Optionen im Suchfenster

Optionen im Suchfenster
18.06.2006 14:26:20
Ralf-Eckhard
Hallo zusammen.
Untenstehen Code verwende ich um per Shortcut den "Suchen und Ersetzen"-Dialog aufzurufen. Ich möchte im angegeben Zellbereich aber nur nach Werten suchen - hierzu muß man in den Optionen im Dialgofenster den Punkt "Suchen in" manuell auf "Werte" setzen. Leider merkt sich Excel beim Beenden diese Einstellung nicht. Kann man per Code den "Suchen"-Dialog gleich mit dieser Einstellung aufrufen?
Vielen Dank im voraus,
Ralf-Eckhard
--------------------
Range("C2:C514").Select
If Not CommandBars.FindControl(ID:=1849) Is Nothing Then
CommandBars.FindControl(ID:=1849).Execute
--------------------

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

Betreff
Datum
Anwender
Anzeige
AW: Optionen im Suchfenster
18.06.2006 21:40:04
bst
Abend Ralf-Eckhard,
rufe vorher (einmal) .Find auf und setze dort die gewünschten Parameter. Excel merkt sich diese.
cu, Bernd
--
Option Explicit

Sub Makro1()
    Cells(1).Find What:="", LookIn:=xlValues
    Range("C2:C514").Select
    If Not CommandBars.FindControl(ID:=1849) Is Nothing Then _
    CommandBars.FindControl(ID:=1849).Execute
End Sub

Anzeige
AW: Optionen im Suchfenster
19.06.2006 09:22:02
Ralf-Eckhard
Danke Bernd, so funktionierts :-))
lg,
Ralf

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige