Berechnung im Ufo

[crystal]

Hallo,
ich bin neu hier und leider habe ich wenig Erfahrund mit Access.
Mein Problem:
Ich habe ein Ufo, in dem ich mit VBA aus zwei Feldern ein drittes berecnen möchte.
Das Ufo ist nur eine Zeile hoch, damit ich möglichst viele Datensätze anzeigen kann.

Problem: wenn ich in der ersten Zeile die Berechnung mache, erscheint das Ergebnis auch in allen anderen Zeilen.
Meine Berechnung mache ich in Form_current. Ich hb auch andere Sacheen probiert (aktuell, load usw.) aber immer das gleiche Ergebnis.
Wie kann ich es schaffen, das meine Berechnung sich nur auf eine Zeile bezieht und die andren in Ruhe läßt?

[DF6GL]

Hallo,


ich nehme an, es handelt sich um ein Endlos-Formular...
Schreib die Formel (Berechnung) in die Eigenschaft "Steuerelementinhalt" des 3. Textfeldes:


z. B.:

=Textfeld1 * Textfeld2

[MzKlMu]

Hallo,
oder rechne in der Abfrage:

NeuesFeld: Textfeld1 * Textfeld2

Als Eintrag in der 1.Zeile einer leeren Spalte der Abfrage.
Das Formularfeld bindest Du an das "NeueFeld" aus der Abfrage.

VBA wird in keinem Fall benötigt, bzw. ist auch der falsche Weg.

[crystal]

Danke für eure Antworten.
Meine Frage oder das Beispiel war wahrscheinlich zu ungenau.

Genau geht es darum:
Im Ufo hab ich zwei Felder, Startzeit und Endezeit. diese Zeitspanne will ich jetzt als Balken anzeigen. Der Zeitbalken fängt immer bei 7 Uhr an und hört bei 23 Uhr auf. Wie kann ich njetzt zB 9-15Uhr in dem Balken anzeigen. Ich hab den Balken schon in 25-Minuten-Teile aufgeteilt. Aber immerwenn ich ein Feld des Balken verändere , zB die Hintergrundfarbe ändere, werden alle zeilen in meinm Ufo auch geändert.

[MzKlMu]

Hallo,
welche Auflösung würde Dir reichen, 15 Minuten ?

[crystal]

Ja, 15 Minuten sind voll OK.

[MzKlMu]

Hallo,
im Anhang ein ganz einfaches Beispiel für einen Zeitbalken, ohne einen einzigen Buchstaben VBA. In der Abfrage wird der Abstand des Balkens von vorn und die Dauer (=Länge) des Balkens errechnet. Die Auflösung beträgt 10 Minuten.

[crystal]

Wow - coole Sache. Vielen Dank.
Kannst du noch erkläre, was da genau passiert?

=String(Nz([Abstand];0);" ") & String(Nz([Dauer];0);ChrW(9608))

[crystal]

Könnte man die Farbe des Balkens auch noch für jede Zeile einstellen?

[MzKlMu]

Hallo,
das mit der wechselnden Farbe musst Du mal genauer erklären, unter welcher Bedingung soll sich die Farbe ändern ?

Die Funktion String erzeugt eine Folge bestimmter Zeichen. Als Abstand Leerzeichen und als Dauer das Zeichen 9608 (Rechteck, gefüllt)
String kannst Du in der VBA Hilfe nachschlagen.

[crystal]

Oh ja, hätte ich auch selbst nachschlagen können. Aber manchmal steht man auf dem Schlauch und braucht nen guten Tip. Danke dafür.
Das mit drn Farben ist so: jede Zeile hat noch ein Feld Mitarbeiter-Farbe, long-integer. Jetzt soll dies Farbe benutzt werden um den Balken entsprechend einzufärben.

[MzKlMu]

Hallo,
warum muss man denn immer alles scheibchenweise erfragen ?

Wie viele Mitarbeiter hast Du ?
Du kannst ja nicht beliebig viele Farben vergeben.

[crystal]

Tut mir leid, also ich habe höchstens 50 Miarbeiter. Jeder hat seine eigene Farbe.

[MzKlMu]

Hallo,
das geht nicht. Das müsste mit der bedingten Formatierung gemacht werden.
Und die kann meines Wissen keine 50. Aber ich weiß es nicht genau, da ich nur Access2003 habe und da gehen nur 4 Farben (3+1).

Abgesehen davon, scheint es mir schwierig 50 unterschiedliche Farben definieren zu können, die das Auge auch erkennt.

[crystal]

OK. Danke für deine Antworten. Hat mir sehr geholfen!