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, 2766 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
Microsoft

Lizenzwiederverkauf und seine Tücken

(5)

Erfahrungsbericht von DerWoWusste zum Thema Microsoft ...

Ähnliche Inhalte
Heiß diskutierte Inhalte
Windows Server
Outlook Verbindungsversuch mit Exchange (15)

Frage von xbast1x zum Thema Windows Server ...

Microsoft Office
Keine Updates für Office 2016 (13)

Frage von Motte990 zum Thema Microsoft Office ...

Grafikkarten & Monitore
Tonprobleme bei Fernseher mit angeschlossenem Laptop über HDMI (11)

Frage von Y3shix zum Thema Grafikkarten & Monitore ...