Verfasst am: 06. Mai 2008, 15:51 Rufname:
so, hab die db reduziert...
der befehl ist in Private Sub btn_datensatz_an_Click() zu finden
wrd mich auch interessieren was ihr dazu sagt... =)
Beschreibung:
Access 2007 (Edit by Willi Wipp! ) Download
Dateiname:
Dateigre:
151. 95 KB
Heruntergeladen:
13 mal
Verfasst am: 06. Mai 2008, 15:57 Rufname: 1337 R0xx0R
Zitat: Nicht erkennbares Datenbankformat:
oder ist etwa ein offizielles Datenbankformat was von meinem access nicht erkannt wird?! Verfasst am: 06. Mai 2008, 16:12 Rufname:
ist access 2007
Verfasst am: 06. Access vba dlookup beispiel download. Mai 2008, 22:30 Rufname:
und wo bitte ist in deinem Code das Hochkomma? Im Uebrigen funktioniert bei mir der folgende Code ohne Problem. Code: Private Sub btn_datensatz_an_Click()
Set rs = Recordset("tblPrfungsplaninhalttemp", dbOpenDynaset)
With rs! Prfungsplan_ID = DLookup("Prfungsplan_ID", "tblPrfungsplantemp", _
"Bezeichnung = '" & _
Me! txt_bezeichnung & "'")! Vorlesung_ID = Me! kbf_vorlesung! Semester_ID = Me! kbf_semester
End With
Set rs = Nothing
Me!
Access Vba Dlookup Beispiel Download
Wie gesagt, bekomme ich im Textfeld "Test" die UNR angezeigt. Es fehlt praktisch nur der Eintrag des Usernamen in das Feld "Ersteller". Access vba dlookup beispiel. Wie bekomme ich dass nun hin? Einen einfachen Abgleich der UNR aus dem Formular mit der Tabelle User, damit im Formular der Username angezeigt wird.... Ich bekomme es einfach nicht hin...
Hallo, zeige bitte den aktuell verwendeten Code/Formel. Und denke daran, den Namen auch in der Tabelle zu speichern ist in jedem Fall überflüssig. Wie leist Du die UNR aus zur Anzeige in Test?
Access Vba Dlookup Beispiel Tutorial
18. 06. 2014, 09:28
# 1
MOF User
Registrierung: 29. 02. 2008
Karma:
Acc2013 - Mit dlookup auf bestimmten Datensatz zugreifen
Hallo! Kann man mit dlookup (VBA) auf eine bestimmte Datensatzzeile (zB. Zeile 2) zugreifen? Danke im Voraus! 18. 2014, 09:33
# 2
MOF Guru
Registrierung: 21. 05. 2008
Hallo,
welches Kriterium ist denn für die Reihenfolge der Datensätze in der Tabelle verantwortlich? __________________
Viele Grüße von Maxel Nie aufhören anzufangen,
nie anfangen aufzuhören! 18. 2014, 09:36
# 3
Threadstarter
Ich habe bei 2 Spalten unter "Sortierung:" absteigend genommen. 18. 2014, 09:45
# 4
Registrierung: 21. 2001
Zitat: von romae
Das ist kein Kriterium! Schau bitte in der VBA-Hilfe mal unter DLookup nach, dort wird weitergeholfen. 19. 2014, 20:50
# 5
Wie kann man mit DLookup zb den zweit- dritt- oder vierthöchsten datensatz (soll von 2 Kriterien) abhängig sein? Donkarls Access-Seiten. Derzeit rufe ich den Wert mit folgender dLookup-Abfrage auf:
Me! Textfeld = DLookup("[Abfrage_Spalte]", "Abfrage", "[Abfragespalte] = " & [Abfragespalte] + 0)
Kann man den Ziffernwert der Navigationsschaltfläche (vom Formular) abfragen?
Access Vba Dlookup Beispiel Software
und an den umlauten kanns ja auch nicht liegen, sonst wrds ja mit dem textfeld auch nicht funktionieren. ziemlich komisch das ganze
kann es sein dass es am typ der variablen liegt? integer oder string? gru
Verfasst am: 06. Mai 2008, 15:23 Rufname: 1337 R0xx0R
Zitat: doch, genau so funktionierts =) Das glaube ich jetzt nicht wirklich aber du das sagst
Am Datentyp kann es liegen, ja! Falls nach einem String gesucht wird brauchst du die Hochkommas. Bei Zahlenwerten nicht. Hast du denn einen Zahlenwert der gesucht wird? Wenn ja:
"Bezeichnung = " & bez) klappts? Wieso willst du die Umlaute nicht entfernen? Wie gesagt, falls mal einer auf die DB zugreift mit nicht-deutschem Office funzt sonst garnix mehr.... Verfasst am: 06. Mai 2008, 15:27 Rufname:
mich wuerde auch der beweis interessieren, das Deine Varinate mit txt_bezeichnung ' funktioniert. DLookUp mit Variable? - - - - - - - - - - - Office-Loesung.de. Kannst Du eventuell eine kleine auf das Wesentliche reduzierte Beispiel-DB
mit vollstaendig anonymisierten und repraesentativen Demo-Daten online stellen und das zu belegen?
OpenRecordset(strSQL, dbOpenForwardOnly)(0)
Else
ReDim retArr(ExpressionCounter)
With DBEngine(0)(0). OpenRecordset(strSQL, dbOpenForwardOnly)
For i = 0 To ExpressionCounter
retArr(i) = (i)
Next i
End With
DSLookup = retArr
End If
End Function
Die Parameter sollten selbsterklärend sein, sind die selben wie bei der Eingebauten DLookup() Funktion. Der Rückgabewert ist jetzt vom Typ Variant, d. H. es können einzelne Werte als auch ganze Arrays zurückgegeben werden. Der Beginn ist noch ziemlich einfach gehalten, es wird ein Abfragestring in der Variable strSQL gebildet, und je nach dem ob der optionale Parameter "Criteria" angegeben wurde wird auch eine Where-Klausel angehängt mit diesem Parameter. Je nach dem ob in Expression ein einzelnes Tabellenfeld oder eine Kommaliste an Tabellenfeldern steht wird danach unterschieden. Acc2013 - Mit dlookup auf bestimmten Datensatz zugreifen - MS-Office-Forum. ExpressionCounter ermittelt über die Split()-Funktion die Anzahl der Tabellenfelder. Bei einem einzelnen Feld ist der Wert 0, und es wird die Methode OpenRecordset auf das Datenbankobjekt mit der entsprechenden Abfrage angewendet.