Neuigkeiten:

Ist euer Problem gelöst, dann bitte den Knopf "Thema gelöst" 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