Thema Datum  Von Nutzer Rating
Antwort
08.04.2008 10:50:29 Chemiker
NotSolved
Blau Aw:InputBox mit anschließender Suche nach Eingabe
09.04.2008 11:30:37 Holger
NotSolved

Ansicht des Beitrags:
Von:
Holger
Datum:
09.04.2008 11:30:37
Views:
1772
Rating: Antwort:
  Ja
Thema:
Aw:InputBox mit anschließender Suche nach Eingabe
Hallo Chemiker
versuche
Sub Suchen_2()
ActiveSheet.Rows.Hidden = False
b = InputBox("Hersteller")
If b = "" Then Exit Sub
For i = 1 To ActiveSheet.UsedRange.SpecialCells(xlCellTypeLastCell).Row
Set a = Range("a" + CStr(i) + ":iv" + CStr(i)).Find(b)
If a Is Nothing Then Rows(CStr(i) + ":" + CStr(i)).EntireRow.Hidden = True
Next i
End Sub
Gruß
Holger


Chemiker schrieb am 08.04.2008 10:50:29:

Hallo,
folgende Situation:
Ich habe eine Excel-Tabelle mit Daten über verschiedene PKW's. Diese ist nach Fahrzeughersteller geordnet.
Jetzt möchte ich gerne dem Benutzer eine InputBox beim öffnen ermöglichen. Die Eingabe des Benutzers soll dann in der Tabelle gesucht werden.
z.B. so:
Bitte geben Sie den Fahrzeughersteller ein:
Benutzereingabe: BMW

Nun sollte also nur noch alle Felder der Tabelle angezeigt werden, wo der Wert BMW enthalten ist.

Wie funktioniert dies ?

Für Hilfe wäre ich sehr dankbar.

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
08.04.2008 10:50:29 Chemiker
NotSolved
Blau Aw:InputBox mit anschließender Suche nach Eingabe
09.04.2008 11:30:37 Holger
NotSolved