Neuigkeiten:

Wenn ihr euch für eine gute Antwort bedanken möchtet, im entsprechenden Posting einfach den Knopf "sag Danke" drücken!

Mobiles Hauptmenü

Felder anspringen per Variablen

Begonnen von HDM, September 27, 2017, 07:31:50

⏪ vorheriges - nächstes ⏩

HDM

Hallo, kann man Felder auch "anspringen" einen Wert geben, wenn man den Namen des Feldes mit einer Variablen kombinieren will?

Also Me.Feld1 = "123"  ersetzen durch
Me.Variable = "123"

geht das, weil bei mir macht er da nix :=(


DF6GL

Viele Grüße vom Bodensee
Franz, DF6GL

Hilfestellung:  http://www.access-o-mania.de/forum/index.php?topic=6969.msg118738#msg118738

Links und Tipps:
1.   http://v.hdm-stuttgart.de/~riekert/lehre/db-kelz/
1a. http://www.tinohempel.de/info/info/datenbank/normalisierung.htm
1b. https://support.office.com/de-de/article/Grundlagen-des-Datenbankentwurfs-eb2159cf-1e30-401a-8084-bd4f9c9ca1f5#bmterms
2.   http://www.donkarl.com
3.   https://web.archive.org/web/20201201233522/http://www.dbwiki.net/
4.   http://www.access-tutorial.de/
5.   http://www.tty1.net/smart-questions_de.htm
6.   http://access.joposol.com/accept

Last but not least:   < F1 > für Hilfe
;) Learning by doing not by spoon-feed ;)

Tipp: Find and Replace for Access

HDM

Hallo Franz,

klappt irgendwie nicht siehe Anhang

Hier mein Code

     Dim db As DAO.Database
     Dim rst As DAO.Recordset
     Dim a As Integer
     Set db = CurrentDb
     Dim wert As String
     Dim Bezeichner As String

     
     
     
     
     Set rst = db.OpenRecordset("tblSchulung", dbOpenDynaset)
     a = 1
     
         Do While Not rst.EOF
         wert = rst!Schulungsbezeichnung
         Bezeichner = "B" & a
           Me(Bezeichner) = wert
           rst.MoveNext
         a = a + 1
     Loop




Danke

HDH

HDM

Sorry erledigt.

Mache seit längerem mehr .net und somit Me(Variable).caption = "123" und nicht .Text

Sorry
HDH