Mehrere Werte in der INPUTBOX auswählen können

J

josef24

Erfahrenes Mitglied
Guten Tag. Komme mal wieder mit einem Problem wie man die Inputbox gestaltet wenn man mehrere bzw. von - bis Werte auswählen will.
Ich kenne es wenn ein Wert zur Auswahl steht, aber das flexible weiß ich nicht wie geht. Ich kopiere mal meinen bisherigen Kode hier rein und bitte wenn möglich um
ein entsprechendes Beispiel. Danke in voraus und Gruß Josef

Code: 
 ...........
gruppe = Application.InputBox(Title:="Auswahl der betroffenen gruppe Jubilare", Prompt:="Geben Sie die altersangaben ein:", _
Default:="Hier eingeben", Type:=1)
bereich.AutoFilter Field:=9, Criteria1:=gruppe
bereich.Copy
 
Lösung
Zvoni
Hallo Josef,

anbei. In Modul5 die Sub ClickInput. Ich habe mal schnell die "gängigen" Fälle abgearbeitet.
Ist nicht sehr gut kommentiert, aber ich glaube du siehst was ich meine.
Ein Todo haste auf jeden Fall: Die Range dynamisch herausfinden und entsprechend einsetzen. Ist jetzt halt hardcoded.
Verwendung:
Der User kann eingeben: "17;18;50;71" usw. --> ist dann als ob man manuell filtert
Der User kann auch eingeben:
"50-71" --> Zeige alle die grösser/gleich 50 und kleiner/gleich 71 sind"
"50-" --> Zeige alle die grösser/Gleich 50 sind"
"-71" --> Zeige alle die kleiner/gleich 71 sind.
Hinweis: Mann kann nicht beide Varianten mischen: Also ein "17;50;60-80" geht nicht (zumindest hatte ich nicht die Zeit es herauszufinden ob es geht)
Ich...
Bin nochmal mit einer Frage da. Habe versucht die Abfrage (das Ergebnis) mit einem WORD Dokument zu verknüpfen, ist mir allerdings nicht gelungen. Hänge meinen Versuch mal hier an. Gruß Josef
 

Anhänge

Um antworten zu können musst du eingeloggt sein.

Neue Beiträge

Zurück