Office: Wert X in Combobox auswählen und Wert Y in Zelle schreiben

Hallo zusammen

Leider komme ich gerade einfach nicht dahinter, wie ich folgendes Problem lösen soll:

Ich möchte eine Zelle mit einer ComboBox versehen. In dieser sollen bspw. die Werte "John", "Paul", "George", "Ringo" (die Reihenfolge sei nicht wertend, da es sich sowieso um ein fiktives Beispiel handelt *tongue.gif* ) stehen.
Wenn der User nun bspw. "Paul" anklickt, soll in der Zelle "2" stehen.
Dies liegt einfach daran, dass eine "2" auf einem Ausdruck und auf dem Bildschirm weniger Platz benötigt und es mit Zahlen bequemer rechnet als mit Strings (und nein, ich will natürlich dann nicht "Paul" mit "Ringo" addieren und schauen, was raus kommt).

Das Befüllen der Combobox wird dann mittels einer Collection erfolgen. Gegebenenfalls kann ich aber auch auf eine "physische Liste" in Form von Range("A:A") oder Range("A:B") zurück greifen.

Für Ideen bin ich sehr dankbar.

Viele Grüsse
Entchen *quietschquietsch*

:)

 

bei Steuerelement Formatieren Zellverknüpfung eintragen, Register Steuerung.

 

Hallo Hajo,

Danke schön, das bringt mich doch schon weiter.

An diese Combobox habe ich gar nicht mehr gedacht, darum habe ich es auch nicht explizit dazu geschrieben. Ich wollte die Geschichte eigentlich über die "Data Validation" lösen

Code:

Wenn ich nun was auswähle, steht da ja nun "John". Die einzige lösung, die mir gerade einfällt, ist relativ unschön und umständlich:

Code:

Würde ja insofern gehen, da ich Application.EnableEvents nicht auf False gesetzt habe. Also zuerst durchlaufen, und die Combobox erzeugen. Wenn die steht, ist das Makro fertig. Wenn ich eine Eingabe mache, läuft das Makro nochmal los, erzeug erneut die Comboliste (.ShowError = FALSE) und hat nun auch einen Wert für den If-Then-Else Teil.

Aber dieses "Makro-zwei-mal-Ausführen" und die Wertezuordnung über die If-Then-Else-Abfrage, die je nach grösse ewig dauert und vorallem nicht dynamisch ist finde ich etwas suboptimal.

Vielleicht was mit .offset(r,c), wenn ich die Collection nicht über Werte sondern Zellen füllen lasse? Aber ich finde da keinen Ansatzpunkt.

p.s. Tippfehler können vorkommen, da ich das geschreibsel gerade nicht überprüfen konnte

Viele Grüsse
*quietschquietsch*

 

du wolltest Zahlen und mein Vorschlag schreibt Zahlen in die Verknüpfte Zelle.
Was wahrscheinlich daran liegt das ich Formular Elemente benutze.

 

Hallo Hajo,

Damit funktioniert es ja auch einwandfrei, wie ich geschrieben habe. Nur eben leider wollte ich meine Tabelle ohne diese Steuerelemente gestallten, sondern auch für dieses Problem die DataValidation benutzen (liegt schlicht und ergreiffend daran, dass ich schon mehrere Tabellenblätter auf diese Art bearbeitet habe und nun nicht wegen dem einen Problem auf die "andere" Combobox zurück greifen möchte).

Aber geht das verlinken irgendwie auch mit der DataValidation oder ist das eine Steuerelement-Only-Geschichte?

Besten Dank und viele Grüsse
Entchen

 

dann musst Du die Zahl in eine andere Zelle schreiben. Suchen mit Vergleich()

 

Guten Morgen,

Besten Dank für das Anschauen. Ich habe mich somit damit abgefunden, dass Validation mir diese Option, wie sie das Steuerelement kennt, nicht zur Verfügung stellt.
Seis drum - somit löse ich das nun mit "Suchen".

Viele Grüsse
*quietschquietsch*

 

Hallo quietscheentchen,

wer wird denn gleich die Flinte ins Korn werfen? Hier mein Beispiel:

Gruß von Luschi
aus klein-Paris