Office: (Office 2003) Wert aus Combobox per VBA wählen

Hallo,

ich habe eine Combobox. Diese wird mit Daten aus einer Datenbank gefüllt (über ein Recordset).

Ich möchte per VBA einen Wert aus dieser Combobox auswählen, der zuvor in einem Textfeld eingegeben wurde.
Mit Code:

funktioniert es leider nicht.

Wie muss ich den Wert übergeben?

Danke Tomaz

:)

 

Hat die ComboBox eine versteckte, gebundene Spalte?
Genau diesen Wert musst Du zuweisen.

Bloß mal als Vorschlag: wieso überhaupt mit dem Textfeld?
Man kann doch in eine ComboBox auch etwas eingeben, das dann gefunden wird.
Genau deshalb heißt das Ding doch Kombinationsfeld (Kombination aus Eingabe und Auswahlliste).

 

Hallo,

das Kombinationsfeld hat noch eine versteckte Spalte mit dem IDENT, aber den weiß ja der Anwender nicht.

Ich möchte dieses Feld (und noch weitere) automatisch füllen, wenn ein Anwender auf das Registerblatt mit diesen Felder wechselt.
Die Werte hat er schon auf dem ersten Register eingetragen.

Gruß Tomaz

 

Wieso müssen sie dann nochmals angezeigt werden udn das in einer Combobox?

 

Damit der Anwender sie ändern kann.

Ich habe eine Datenbank mit Frontend.
Mit diesem Frontend können neue Datensätze angelegt werden oder bestehende verändert.

Ich habe ein Register, in dem Anwender einen Datensätz auswählen können.
Wenn sie dann auf den "Change"-Button drücken, soll in ein Register verzweigt werden, in dem für jede Eigenschaft des Datensatzes ein Kombinationsfeld mit den möglichen Werten angezeigt wird.
Und der Wert, den der Datensatz im Moment gespeichert hat, soll vorbelegt sein.

Gruß Tomaz

 

Hab ich mir gedacht *wink.gif*

Aber trotzdem leuchtet es mir nicht ein, warum Du ein Textfeld brauchst und der Anwender das nicht in das Kombifeld direkt eingeben kann ...

 

Hallo,

habe ich oben versucht zu erklären: es sind zwei verschiedene Register mit unterschiedlichen Aufgaben (Anzeige, Änderung)

Gruß Tomaz

 

Hey an die Community!

Da ich Neu hier bin, hoffe ich, die "richtige" Rubrik an dieser Stelle gefunden zu haben (wenn nicht, ich hab ein dickes Fell *grins )

Irgendwie komme ich im Moment nicht weiter (vielleicht liegts an fehlender grauer Hirnmasse *grins *grins ). Mein Prob:

Ich erstelle gerade eine Adressenverwaltung, in der ein Benutzer bei der Erfassung eines neuen Datensatzes über 2 ComboBoxen die Plz und den Ort auswählen bzw. eingeben kann (die in den Boxen angezeigten Werte stammen aus einer separaten Tabelle). Abhängig von den ausgewählten Werten sollen weitere Felder automatisch gefüllt werden. Das funktioniert auch, solange als erstes die Plz gewählt wird. Wenn aber der Ort zu erst gewählt wird, zeigt die Plz-ComboBox eine falsche Plz an. Im Einzelschritt-Modus enthält die der Plz-ComboBox zugeordnete Column die richtigen Werte, die aber im Formular nicht angezeigt werden.
Für die Plz-ComboBox werden die Werte mittels

SELECT plzdeutschland.PlzPos,

FROM plzdeutschland;

ausgelesen. Die gebundene Spalte ist 1.

Für den Ort:

SELECT plzdeutschland.PlzPos,

FROM plzdeutschland;

Die gebundene Spalte ist wiederum 1.

Der Code für den Ort:

Private Sub KuOrtCombi_AfterUpdate()
Me.KuPlzCombi = Me.KuOrtCombi.Column(2)
Me.KuOrtZusatz = Me.KuOrtCombi.Column(3)
Me.KundenTelefon = Me.KuOrtCombi.Column(4)
Me.KundenFax = Me.KuOrtCombi.Column(4)
Me.KuBuLand = Me.KuOrtCombi.Column(5)
Me.KundenPOrt = Me.KuOrtCombi.Column(2) + " " + Me.KuOrtCombi.Column(1)
End Sub

Der Code für die Plz:

Private Sub KuPlzCombi_AfterUpdate()
Me.KuOrtCombi = Me.KuPlzCombi.Column(2)
Me.KuOrtZusatz = Me.KuPlzCombi.Column(3)
Me.KundenTelefon = Me.KuPlzCombi.Column(4)
Me.KundenFax = Me.KuPlzCombi.Column(4)
Me.KuBuLand = Me.KuPlzCombi.Column(5)
Me.KundenPOrt = Me.KuPlzCombi.Column(1) + " " + Me.KuPlzCombi.Column(2)
End Sub

Bei dem Feld "KundenPOrt" handelt es sich um ein "unsichtbares" Feld aus der Kombination von Plz und Ort, was für den Einsatz auf "Drucksachen" für die Absender-Angabe eingesetzt wird. In dieses Feld wird die korrekte Plz eingetragen!

Wie kann es zu dieser falschen Anzeige kommen? Kein Plan *smashing *stupid

Bin für alle Hinweise dankbar. *streit

Mfg *confused.gif* *confused.gif* Schweijk

 

Hallo und willkommen im Forum *wink.gif* .
Das von dir beschriebene Verhalten liegt wohl daran, dass der an die jeweiligen Kombis zugewiesene Wert nicht der Wert der gebundenen Spalte ist.
Probier's mal mit:
Code:

und guck am besten auch noch mal hier:
FAQ4.36 Abhängige Kombifelder
maike

 

Ohh, alt wern kann man wie ne Kuh, Lernen muss man immer zu *tausch

Vielen Dank für den Hinweis. Jetzt läufts (fragt sich nur, wohin *grins)

Ich wünsch allen ein schönes WE und genügend Geistesblitze.