VBA-Forum - Das Forum zu Microsoft VBA

Ansicht des Beitrags:

Von: ff87	Datum: 07.08.2017 14:01:22	Views: 952	Rating:	Antwort:
Thema: Bezeichnungsfeld mit Array
Hallo Gemeinde, nach etlichen Versuche, Recherchen und Kopfzerbrechen hoffe ich, ihr könnt mir weiterhelfen... Ich habe vor sehr sehr langer Zeit mal gelernt zu programmieren - anscheinend zu lange her - ich komme einfach nicht weiter, hoffentlich könnt ihr mir helfen Ich habe folgendes "Problem": Ich möchte ein Formular in Access programmieren und komme an einer Stelle nicht weiter. Das Formular "PM" enthät 24 Bezecihnungsfelder mit den Namen bit1, bit2, bit3, bit4,...bit24 In der mit dem Formular verknüpften Tabelle "P-Modus" gibt es eine Spalte mit dem Namen "bit_NR" in dem je nach Datensatz eine Zahl zwischen 1 und 24 steht... Jetzt zum eigentlichen Problem: Ich würde gerne abhängig von der in der Zelle stehenden Zahl (z.B. 12) das Bezeichnungsfeld bit12 farblich markieren. Mehr nicht... Einer meiner fehlgeschlagenen Versuche sieht so aus: Dim i As Integer Dim i_bit As Integer Dim name_feld As String Dim bit As Integer bit = Me("Bit_NR") For i = 1 To 24 If bit = i Then name_feld = "bit" & "i" Me.name_feld.FontBold = True Else End If Next i Ich bekomme es einfach nicht hin - wäre supi wenn ihr mir helfen könntet... die Variante mit 24 If-Abfragen find ich doof - das ginge sicherlich auch... Grüße, fke

Ihre Antwort

Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema:		Name:		Email:

Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen