Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
724to728
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
724to728
724to728
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Suchbegriff spezial

Suchbegriff spezial
02.02.2006 08:18:58
Günter
Hallo, Guten Morgen!
Folgendes Problem habe ich:
In einem Makro steht eine Inputbox.
Die Daten, welche durchsucht werden,
sehen so in Spalte A aus:
hier stehen keine Leerzeichen davor Dillenburg (04444)
hier stehen 3 Leerzeichen davor Eschenburg (07777)
hier stehen 3 Leerzeichen davor Haiger (09999)
Nun soll aber so gesucht werden, dass nur solche
gefunden werden, welche vorne keine Leerzeichen stehen
haben.
Hier habe ich ein Teil des Makros aufgeführt.
Suchbegriff = InputBox("Suchbegriff eingeben", "Eingabe")
If Suchbegriff "" Then
For index = 1 To Worksheets.Count
With Sheets(index).Cells
Set Zelle = .Find(What:=Trim(Suchbegriff), LookAt:=xlPart)
If Not Zelle Is Nothing Then
Adresse = Zelle.Address
Hat jemand eine Idee
Günter

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

Betreff
Datum
Anwender
Anzeige
AW: Suchbegriff spezial
02.02.2006 09:42:52
Matthias
Hallo Bünter,
so müsste es klappen:

Set zelle = .Find(What:=Trim(suchbegriff) & "*", LookAt:=xlWhole)

Gruß Matthias
AW: Suchbegriff spezial
03.02.2006 10:17:58
Günter
Vielen Dank Matthias,
das war genau das R i c h t i g e.
Schönes Wochenende
Günter
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige