Supportnet / Forum / Datenbanken
Bei Auswahl eines Wertes in einem Dropdown-Feld ein weiteres Feld mit dazugehörigen Daten befüllen
Frage
Hallo,
ich habe wieder mal eine Frage an die Access Experten unter Euch.
Also, ich möchte in einem Formular ein Dropdown-Feld einbauen. Grundlage hierfür ist eine Excel Tabelle mit einer Spalte "Artikelname" und einer Spalte "Artikelnummer". Im Dropdown-Menü soll der Benutzer den Artikelnamen Auswählen können. Nun möchte ich daneben ein Feld einbringen, das zum gewählten Artikelnamen die passende Artikelnummer einfügt, ohne das der Nutzer dieses Feld seperat bearbeiten muss (es sei denn, es ist noch keine Art.-Nr. vergeben). Nachvollziehbar? O.k., noch ein, vielleicht etwas plattes, Beispiel: User wählt im Dropdownfeld "Schoko-Eis" aus, "schoko-Eis" hat die Artikel-Nr. 1234-567, Access setzt im feld automatisch die eben angeführte Artikelnummer ein!
Wär echt super, wenn Ihr mir helfen könntet!
P.S.: bräuchte Tipps zu Access 97 und XP!
Moinsen
Antwort 1 von JohnnyLoser
Hi Moinsen,
der RowSource für Deine ComboBox sollte so aussehen:
In den Eigenschaften Deiner ComboBox schreibst Du bei
Name: CB_Artikel
Anzahl Spalten: 2
Gebundene Spalte: 1
Spaltenbreite: 0cm; 4cm
In die Steuerelementeigenschaft Deiner TextBox schreibst Du
=CB_Artikel
Wenn Du allerdings die Artikelnummer weiterverwenden und die TextBox nach der Verwendung wieder leeren willst, solltest Du anstatt der festen Zuweisung in der Steuerelementeigenschaft folgenden Code in das Ereignis Deiner ComboBox schreiben:
Gruß
Johnny
der RowSource für Deine ComboBox sollte so aussehen:
SELECT Artikelnr, Beschreibung FROM ArtikelTabelleIn den Eigenschaften Deiner ComboBox schreibst Du bei
Name: CB_Artikel
Anzahl Spalten: 2
Gebundene Spalte: 1
Spaltenbreite: 0cm; 4cm
In die Steuerelementeigenschaft Deiner TextBox schreibst Du
=CB_Artikel
Wenn Du allerdings die Artikelnummer weiterverwenden und die TextBox nach der Verwendung wieder leeren willst, solltest Du anstatt der festen Zuweisung in der Steuerelementeigenschaft folgenden Code in das Ereignis Deiner ComboBox schreiben:
Sub CB_Artikel_Click()
On Error Resume Next
TextBox = CB_Artikel
End SubGruß
Johnny
Antwort 2 von Teddy7
Dein KombiFeld enthält also zwei Felder und die ArtikelNr steht an zweiter Position ??
Dann kannst Du im lost-focus-Ereignis des Kombifeldes (oder "beiÄnderung")
folgendes hinterlegen:
txtArtikelNr = cmbArtikel.column(1)
Dieser Befehl weist dem Textfeld txtArtikelNr den zweiten Wert des Kombifeldes zu.
Gruß
Teddy
Dann kannst Du im lost-focus-Ereignis des Kombifeldes (oder "beiÄnderung")
folgendes hinterlegen:
txtArtikelNr = cmbArtikel.column(1)
Dieser Befehl weist dem Textfeld txtArtikelNr den zweiten Wert des Kombifeldes zu.
Gruß
Teddy
Antwort 3 von Moinsen
Hallo und guten Abend,
vielen Dank für die Tipps - werde sie ausprobieren und (hoffentlich nicht) erneut nachbohren!!
Moinsen
vielen Dank für die Tipps - werde sie ausprobieren und (hoffentlich nicht) erneut nachbohren!!
Moinsen