Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Wert im Kombinationsfeld in Variable speichern

Wert im Kombinationsfeld in Variable speichern
21.04.2006 12:25:08
Jochen
Hallo,
ich komme an einer Stelle nicht weiter, vielleicht kann mir jemand weiterhelfen.
Ich habe ein Kombinationsfeld, indem ich einen Wert auswählen kann, dieser soll in einer Variable abgespeichert werden.
Mein Lösungsversuch sieht so aus:

Private Sub CommandButton1_Click()
Combobox1.Value = wert
Application.Run "Makro"
End Sub

Die Variable "wert" ist leer, obwohl ich im Kombinationsfeld einen Wert ausgewählt habe. Woran liegt das?
Viele Grüße,
Jochen
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Wert im Kombinationsfeld in Variable speichern
21.04.2006 12:29:43
Bertram
Hi Jochen,
anders rum: wert = Combobox1.value
gruß
Bertram
AW: Wert im Kombinationsfeld in Variable speichern
21.04.2006 19:35:13
Michael
Hallo,
ich habe auch ein Problem mit dem synchronisieren von zwei Kombinationsfeldern
Eine Referenz-Tabelle hat zwei Spalten:
Spalte 1: Vornahme Spalte 2: Nachname
in einer anderen Tabelle möchte ich aus einem Kombinationsfeld den Nachnamen heraussuchen
und mein Formular soll mir den Vornamen gleich dazu im 2.Kombi Feld anzeigen.
Die einfachste Lösung ist:
Beide Kombinationsfelder haben den gleichen Steuerelementeninhalt (Nachname)
Jedoch ist für beide Komibnationsfelder eine andere Spalte gebunden (1 und 2)
Meine Frage:
Wie schaffe ich es, dass ich den im Kombinationfeld 1 angezeigten Vornamen (aus der Referenztablle mit der Access Abfrage ermittelt) in meinen Datensatz (Hauptabelle) abspeichern kann.
Ich möchte dafür das Ereignis des 2. Kombinationsfeldes "After Update" verwenden.
Ich kann kein DAO Objekt aufrufen.
Vielen Dank für Eure Hilfe.
Viele Grüsse,
Michael
Anzeige
AW: Wert im Kombinationsfeld in Variable speichern
21.04.2006 14:27:49
Jochen
Hallo Bertram,
vielen Dank für den Tipp. Ich habe aber noch das Problem, dass die Variable "wert"
im Makro "Makro" plötzlich wieder leer ist. (laut Lokalfenster) Wie kann ich den Inhalt
der Variable in ein Modul übernehmen?
Viele Grüße,
Jochen
AW: Wert im Kombinationsfeld in Variable speichern
21.04.2006 15:24:07
Bertram
Hallo Jochen,
wenn du die Variable, bzw. den Wert darin in einer anderen Prozedur nutzen willst musst du diesen übergeben.
z.B.

Sub Makro1()
Dim wert As String
wert = 3
Call Makro2(wert)
End Sub


Sub Makro2(ByVal Wert1 As String)
MsgBox Wert1
End Sub

Gruß
Bertram
Anzeige
;
Anzeige
Anzeige

Infobox / Tutorial

Wert im Kombinationsfeld in Variable speichern


Schritt-für-Schritt-Anleitung

Um einen Wert aus einem Kombinationsfeld in einer Variable zu speichern und später zu verwenden, folge diesen Schritten:

  1. Kombinationsfeld erstellen: Stelle sicher, dass du ein Kombinationsfeld in deinem Access-Formular hast. Dies kannst du über die Toolbox hinzufügen.

  2. VBA-Editor öffnen: Gehe zu "Entwicklertools" und öffne den VBA-Editor.

  3. Code hinzufügen: Füge in das Formularmodul den folgenden Code ein:

    Private Sub CommandButton1_Click()
       Dim wert As String
       wert = Combobox1.Value
       Application.Run "Makro"
    End Sub
  4. Makro erstellen: Definiere das Makro, das den Wert weiterverarbeitet. Hier ein Beispiel:

    Sub Makro()
       MsgBox wert
    End Sub
  5. Testen: Starte das Formular und wähle einen Wert im Kombinationsfeld aus. Klicke auf den Button, um den Wert in der MessageBox anzuzeigen.


Häufige Fehler und Lösungen

Fehler: Die Variable "wert" bleibt leer, obwohl ein Wert im Kombinationsfeld ausgewählt wurde.
Lösung: Stelle sicher, dass du den Wert richtig zuweist:

wert = Combobox1.Value

Wenn du die Variable in einem anderen Modul verwenden möchtest, übergib sie als Parameter:

Sub Makro1()
    Dim wert As String
    wert = Combobox1.Value
    Call Makro2(wert)
End Sub

Alternative Methoden

Wenn du mit mehreren Kombinationsfeldern arbeitest, kannst du die Auswahl in einem nachschlagefeld access synchronisieren. Hier ein Beispiel, um den Vornamen und Nachnamen in zwei verschiedenen Kombinationsfeldern anzuzeigen:

Private Sub Kombinationsfeld1_AfterUpdate()
    Kombinationsfeld2.Value = DLookup("Nachname", "Referenztabelle", "Vornahme='" & Kombinationsfeld1.Value & "'")
End Sub

Hiermit wird der Nachname automatisch aktualisiert, wenn der Vorname im ersten Kombinationsfeld ausgewählt wird.


Praktische Beispiele

Ein einfaches Beispiel, um den Wert eines Kombinationsfeldes in einer Variable zu speichern:

Private Sub CommandButton1_Click()
    Dim wert As String
    wert = Combobox1.Value
    MsgBox "Der ausgewählte Wert ist: " & wert
End Sub

Ein weiteres Beispiel zeigt, wie du Werte aus einem nachschlagefeld access extrahieren kannst:

Private Sub Kombinationsfeld_AfterUpdate()
    Dim selectedValue As String
    selectedValue = Kombinationsfeld.Value
    MsgBox "Der ausgewählte Wert ist: " & selectedValue
End Sub

Tipps für Profis

  • Verwende Option Explicit: Füge dies am Anfang deines Moduls hinzu, um sicherzustellen, dass alle Variablen deklariert sind. Dies hilft, Fehler zu vermeiden.

  • Ereignisprozeduren nutzen: Verwende Ereignisse wie AfterUpdate, um die Auswahl im Kombinationsfeld direkt zu verarbeiten. So kannst du sofortige Rückmeldungen im Formular geben.

  • Datenvalidierung: Stelle sicher, dass die Werte im Kombinationsfeld validiert werden, bevor du sie speicherst, um unerwartete Fehler zu vermeiden.


FAQ: Häufige Fragen

1. Wie kann ich mehrere Werte aus einem Kombinationsfeld speichern?
Du kannst mehrere Variablen deklarieren und den Wert für jede Variable aus dem Kombinationsfeld extrahieren, indem du die Value-Eigenschaft mehrfach verwendest.

2. Was ist der Unterschied zwischen einem Kombinationsfeld und einem nachschlagefeld in Access?
Ein Kombinationsfeld ermöglicht die Auswahl eines Wertes aus einer Dropdown-Liste, während ein nachschlagefeld häufig verwendet wird, um Daten aus einer anderen Tabelle darzustellen.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige