Office: Excel Suchfunktion?

Moin jinx

Danke Dir für die Vorgaben,*boah werde einen, oder auch zwei Versuche wagen. Sollte ich Fragen haben,*confused.gif* bestimmt werde ich das, öffne ich einen neuen Thread.

Zu #14, habe ich wohl Vergessen die neue Mappe anzuhängen. Hole ich hiermit nach.

Einen schönen Abend
Sven

 

Hallo Jungs,

danke euch für die super hilfe, schaut wirklich super aus.

@jinx,

die suchfunktion mit dem fenster ist wirklich klasse. in eine text box bekomme ich das nicht?

 

Moin Carsten

ich sage keine Chance, tut mir Leid.*grinangel Lade Dir die neue Mappe mal runter.

Sven

 

Hallo Sven,

geht das also gar nicht? menoooo... *frown.gif* wäre echt zu schade. hätten wir auf arbeit nur den filemaker, da gibt es so schöne datenbanken. aber nö, eine alte excel version muß alles hergeben.

habe mir deine datei angeschaut, sie geht wunderbar. hilft mir auch sehr.

 

\@ Sven,

habe mal deinen Code aus der "Excel_Suchfunktion.xls" in meine Datei eingefügt, geht wirklich super. nur wie kann ich die User Form bzw. Suche, erneut aufrufen nachdem ich sie geschlossen habe?

 

Moin Carsten

schlecht, sehr schlecht.*redface Meine Ohren, seine Augen.
Steuerelement Toolbox, Befehlsschaltfläche(CommandButton) auf das Tabellenblatt ziehen, doppelclick auf den installierten Button, dann öffnet sich Visual Basic. Dort erscheint dann dieser Code
Code:

dort fügst Du dann ein.
Code:

Ansonsten könntest Du noch die Menuleiste erweitern, oder aber wir deaktivieren Dir das Schließkreuz.

Viel Glück
Sven

 

Hallo Leute,

ich habe euch mal eine xls eingefügt, genau so hatte ich sie mir vorgestellt. das ich eine bestimmt zahl oben in das suchfeld schreibe, er mir direkt dort hinspringt. jedoch geht das nicht mit zahlen von 1-100 da spinnt er mir rum. jedoch kann ich sie für meinen alltäglichen gebrauch sehr gut verwenden.

grüße
Carsten

 

Moin Carsten

Nur mit der TextBox funktioniert es wirklich nicht.*Smilie Bei jeder Zahl die Du eingibst, prüft der Code sofort ob der Wert vorhanden ist oder nicht. Abhilfe schafft hier nur ein CommandButton.
In der angehängten Mappe habe ich den Code in SelectionChange auf die Zelle A1 gehängt. Immer wenn Du diese Zelle verlässt, durchsucht der Code die Tabelle.
Wenn Du damit nichts anfangen kannst, bitte melden.

Gruß Sven

 

hi

für sowas gibt es ganz spezielle Textboxen *wink.gif*
einfache Variante inside.

 

Moin

@Carsten:
Die Änderung in dem Textfeld sollte vielleicht durch das LostFocus-Ereignis ersetzt werden, sonst wird bei jeder Änderung ein Suchvorgang ausgelöst:

Code:

@Sven:
warum Worksheet_SelectionChange und nicht Worksheet_Change?

Code:

 

Moin moin

@jinx
Der Code soll ausgeführt werden, wenn die Zelle A1 verlassen wird. Darum SelectionChange.

@chris
LostFocus und KeyUp, noch nie Ausprobiert. Aber was meinst Du mit Inside?

Lerne, lerne.
Vielen Dank an beide.
Gruß Sven

 

Hallo Sven

Das ich dies in der Beispielmappe hinterlegt habe. *Smilie

 

Moin,

danke euch für die zahlreichen Tabellen. nun kann ich mich nicht entscheiden welche Version ich nun nehmen soll. *tongue.gif*

 

Moin moin

@Carsten
Wenn Du dich schon nicht entscheiden kannst, versuche noch den Spezialfilter von jinx, sofern Du es nicht schon selbst probiert hast.*Smilie

@chris
Vielen Dank*top

@jinx
Keine weiteren Fragen zum Spezialfilter auf VBA Basis. Rundum besser wie das Original. Habe mir beim Versuch diesen Auszuführen alles Verflucht. Vielen Dank für diese Version, schon Umfunktioniert auf meine Bedürfnisse.*10points

Gruß Sven

 

Vergessen Datei anzuhängen.