Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit

Abhängiges Unterformular

Frage Microsoft Microsoft Office

Mitglied: viewpoint

viewpoint (Level 1) - Jetzt verbinden

30.10.2008, aktualisiert 25.11.2008, 2771 Aufrufe, 1 Kommentar

Detailsuche über mehrere Kombifelder

Hallo!

Ich habe in einer DB 5 Tabellen die mit 1:n Verbindungen voneinander abhängen.
In einem Formular (ohne Datensatzherkunft) habe ich 4 Kombinationsfelder mit dem Inhalt der ersten 4 Tabellen.
Wähle ich aus dem Ersten Kombifeld etwas aus, aktualisiert sich der Inhalt des 2. Kombifeldes und es können nur noch Einträge ausgewählt werden, die in Verbindung zum
Ersten Kombifeld richtig sind.
Das funktioniert auch sehr gut und schnell.

Wenn ich nun beim 4. Kombifeld etwas auswähle, sollen sich darunter befindliche Textfelder mit dem jeweiligen Inhalt aktualisieren. Ich probierte es mit einem Unterformular,
allerdings schaff ich das irgendwie nicht.

Hier mal der Code zum Aktualisieren:
01.
Option Compare Database 
02.
 
03.
Private Sub se1_AfterUpdate() 
04.
Me!se2.Enabled = True 
05.
Me!se2.RowSource = "Select tblSegment2.se2ID, tblSegment2.se2Beschreibung " _ 
06.
& "from tblSegment2 " _ 
07.
& "where (((tblSegment2.se1ID) = " & Me.ActiveControl & "));" 
08.
Me!se2.Requery 
09.
End Sub 
10.
 
11.
Private Sub se2_AfterUpdate() 
12.
Me!se3.Enabled = True 
13.
Me!se3.RowSource = "Select tblSegment3.se3ID, tblSegment3.se3Beschreibung " _ 
14.
& "from tblSegment3 " _ 
15.
& "where (((tblSegment3.se2ID) = " & Me.ActiveControl & "));" 
16.
Me!se3.Requery 
17.
End Sub 
18.
 
19.
Private Sub se3_AfterUpdate() 
20.
Me!se4.Enabled = True 
21.
Me!se4.RowSource = "Select tblSegment4.se4ID, tblSegment4.se4Beschreibung " _ 
22.
& "from tblSegment4 " _ 
23.
& "where (((tblSegment4.se3ID) = " & Me.ActiveControl & "));" 
24.
Me!se4.Requery 
25.
End Sub
Mitglied: NetWolf
25.11.2008 um 16:07 Uhr
Hi,

wenn ich dich richtig verstanden habe, willst du die Werte der Kombifelder in andere Textfelder schreiben?

Beispiel:
Me.NeuFeld1 = me.se1
Me.NeuFeld2 = me.se2
Me.NeuFeld3 = me.se3
Me.NeuFeld4 = me.se4

Me.NeuFeld_ALLE = me.se1 & " " & me.se2 .... usw.

ggf. noch das Requery pro Feld ausführen:

Me.NeuFeld1.requery
Me.NeuFeld2.requery
Me.NeuFeld3.requery
Me.NeuFeld4.requery

oder über das ganze Formular:
Me.requery


Grüße aus Schönberg (Lübeck)
Wolfgang
(Netwolf)
Bitte warten ..
Neuester Wissensbeitrag
Heiß diskutierte Inhalte
Switche und Hubs
LAG zwischen Cisco SG300 und Dlink DGS1100 herstellen - wie? (14)

Frage von White-Rabbit2 zum Thema Switche und Hubs ...

Hardware
Lenovo Yoga 500 über angeschlossene USB Tastatur booten (13)

Frage von thomasreischer zum Thema Hardware ...

CPU, RAM, Mainboards
Hardware Fragen (12)

Frage von xaver-2 zum Thema CPU, RAM, Mainboards ...

Viren und Trojaner
Wie werde ich den Mist "fanli90" wieder los? (12)

Frage von Taumel zum Thema Viren und Trojaner ...