Access-o-Mania

Access-Forum (Deutsch/German) => Formular => Thema gestartet von: crystal am April 07, 2016, 00:22:55

Titel: Zugrif auf verschiedene Zeilen eines Ufos
Beitrag von: crystal am April 07, 2016, 00:22:55
Liebe Profis,

Wie kann ich auf Controls verschiedener Zeilen (records) in einem Endlos-Ufo zugreifen?

.recordsource geht klar nicht
.recordcount auch nicht
.recordId oder .recordNr gibts nicht

Beispiel:
In einem Ufo werden 3 Zeilen dargestellt (oben, mittig, unten), die jeweils einen record repräsentieren.
Jetzt möchte ich z.B. (über einen Button im Hfo) nur im unteren Datensatz einen Feld-Inhalt verändern oder ein bestimmtes Feld im mittleren Datensatz "blinken" lassen oder in allen 3 Ufo-Zeilen diejenigen Felder farbig darstellen, die einen veränderbaren Wert im HFo unterschreiten.

Bedingte Formatierung hilft hier wohl nicht weiter...

Ich bräuchte sowas wie
me.controls("subform").form.ROW(i).controls("txtTest") = "xyz"

oder

me.controls("subform").form.ROW(i).controls("txtTest").backcolor = vbGreen

Hat jemand eine Idee?
Titel: Re: Zugrif auf verschiedene Zeilen eines Ufos
Beitrag von: Xoar am April 07, 2016, 07:26:00
Soweit ich weiß, geht das nicht.
Es wird immer das selbe Steuerelement pro Zeile dargestellt, nur halt jede Zeile ein Datensatz deiner Datenbank.

Farbige Änderungen sollten über bedingte Formatierung mit einem Ausdruck möglich sein z.B. [SteuerelementUfo] < Formulare![FormularName]![Steuerelement]

Hab ich jetzt nicht getestet, aber in dieser Art könnte es gehen
Titel: Re: Zugrif auf verschiedene Zeilen eines Ufos
Beitrag von: MaggieMay am April 07, 2016, 09:38:28
Hallo,

die Zeile kannst du anhand eines eindeutigen Keys ansprechen, du könntest bspw. in der Abfrage eine lfd. Nummer erzeugen.
Titel: Re: Zugrif auf verschiedene Zeilen eines Ufos
Beitrag von: crystal am April 07, 2016, 11:27:14
Hallo MaggieMay,

eine eindeutige Nummer hab ich in der Abfrage schon drin. Aber wie geht's dann weiter??? Kannst du vielleich ein zwei Zeilen 'pseudo-code' schreiben, damit ich weiter komme?

Danke im Voraus!
Titel: Re: Zugrif auf verschiedene Zeilen eines Ufos
Beitrag von: MaggieMay am April 07, 2016, 11:42:07
Wenn dir die Nummern der Datensätze bekannt sind, kannst du bspw. mit der FindFirst-Methode auf den Datensatz springen und Werte per Zuweisung zu den Steuerelementen setzen.

Beispiel:
Me!subform.Form.Recordset.FindFirst "NR=1"
Me!subform.Form!feldxy = "abc-123"
Titel: Re: Zugrif auf verschiedene Zeilen eines Ufos
Beitrag von: crystal am April 07, 2016, 11:45:36
Wow, das ist der Durchbruch! Mein gordischer Knoten ist gelöst.

Vielen Dank, MaggieMay.