Office: (Office 2010) Bild sichtbar aktualisierung

Hallo,

die Anweisung gehört allerhöchstens in das Beim Laden Ereignis. Weiterhin lässt sich ein Formular auch so öffnen, dass direkt ein neuer Datensatz angezeigt wird. Code:

Und das Schließen (oder das Verstecken) des Steuerformulars sollte auch in das Beim Laden Ereignis ausgelagert werden. Code-Leichen sind zu entfernen. In jedem Modul ist idealerweise oben eine Zeile Option Explicit vorhanden. Objektnamen enthalten keine Sonder- und Leerzeichen, wie z. Bsp. bei AS4 SE plus GE

BTW: mit Verlaub, die Projekt-Tabelle kommt mir wie ein großer Datenhaufen vor.
Tipp: Ziel(e) für die Datenbank definieren, ein ordentliches Datenmodell dafür aufsetzen, danach dann Formulare und Berichte gestalten.

 

Hi,

dann kann man das Formular aber nicht mehr filtern bzw. nach vorhandenen Datensätzen suchen.

 

Hallo,
also wenn ich alle Projekte lösche. Einfach in der Tabelle Projekte und dann neue anlege, dann funktioniert immer beim ersten Projekt das mit den Bild anzeigen nicht.
Wenn ich im Formular test jeweils zu jedem Projekt ein Bild und die Werte zuordne und abspeichere, dann funktioniert alles außer das erste Bild beim ersten Projekt.

 

Das ist richtig - so tief habe ich mich nicht in das Formular hineinversetzt. *Smilie

 

Hallo,
danke aber so ganz einfach ist es für mich nicht ich bin froh das bisher alles soweit funktioniert :-).
Wenn ich folgenden Code beim Öfnnen weglasse, dann öffnet das Formular immer mit einem Datensatz, auch wenn ich beim Laden den vorgeschlagenen Code eingebe.
Private Sub Form_Open(Cancel As Integer)
DoCmd.GoToRecord Record:=acNewRec
End Sub

 

Hallo,

verwende diese Anweisung. Code:

 

Danke, so funktioniert es auch mit dem leeren Datensätzen. Das 1 Projekt funktioniert trotzdem egal was ich versucht habe nicht. Wenn ich also einfach so ein Datensatz als Testprojekt an den Anfang setze dann werden die weiteren funktionieren.

 

Wie schaffe ich es im folgenden Code nochmal mehr Bilder einzubauen.

Dim i as long
For i = 1 to 5
Me("Bild" & i).Visible = nz(Me.speichernbild,0) = i
Next i

Und zwar habe ich nun Bilder 1 bis 10. Und ich möchte jeweils das gleiche Bild bei speichernbild 1 und 6 , 2 und 7 , 3 und 8, 4 und 9, 5 und 10 anzeigen lassen.
Also eigentlich möchte ich das gleiche Bild auf beiden Registerseiten anzeigen lassen, doch das klappt nicht weil wenn ich das Bild auf eine neue Seite kopiere, bekommt es einen anderen Namen. Und das ganze wollte ich so umgehen, das ich jeweils das gleiche bild für 1 und 6 usw... benutze und so auf beiden Registerseiten auf der gleichen Position anzeigen lasse.

 

Dann belasse es bei den Zahlen 1 bis 5 für "speichernbild" (also bei Bild 6 bleibt 1, bei Bild 7 2 usw., und passe den Code so an:
Code:

maike

 

Hallo,

ich kann das immer noch nicht nachvollziehen.

Folgendermaßen bin ich vorgegangen, um den "Fehler" zu reproduzieren:
- Datensätze in Tabelle "Projekte" gelöscht
- Formular "Projekt_Anlegen" geöffnet und zwei neue Projekte eingetragen
- Formular Test geöffnet, über die Kombifelder die neuen Projekte einzeln nacheinander ausgewählt und ein Bild zugeordnet
Wo genau ist das Problem dabei?

Natürlich git es bei der ersten Anzeige noch kein Bild, weil noch keins zugeordnet wurde. Das betrifft aber nicht nur den ersten Datensatz, sondern alle über das Eingabeformular neu angelegten Projekte.

 

Hallo,

an maikek: Danke das hat so soweit funktioniert, nur auf der 2 Registerseite werden die Bilder erst nach dem Speichern angezeigt während auf der ersten Registerseite durch den Klick der Schaltfläche sich das Bild sofort ändert. Kann dort irgendwie ein automatisches speichern und Aktualisierung eingestellt werden?

an MaggieMay: ja das funktioniert ja, aber wenn du dann das Test Formular schließt und neu aufrufst und beide Projekte mal testest wirst du sehen das bei dem 2 und allen weiteren Projekten das richtige Bild erscheint während beim ersten Bild nichts erscheint.

Und nochmal eine Frage bevor ich dafür einen neues Thema aufmache. Ich habe auf der 2 Registerseite einige berechnete Felder. Ist das so der richtige Weg oder sollten diese in eine Art Abfrage errechnet werden? Denn wenn ich egal welches Feld in dem ich eine Zahl eintrage am ende in einem Bericht oder Formular die Summe dieses Feldes aus allen Projekten anzeigen möchte funktioniert das nicht.

 

So, jetzt hab ich's endlich!

Das Current-Ereignis wird beim Wechsel auf den ersten Eintrag in Kombifeld-3 nicht ausgelöst - warum auch immer!

Ich bin da zunächst nicht drauf gekommen, weil ich durch meine Dateneingabe dort jeweils nur einen Eintrag zur Auswahl hatte.


Ich würde zunächst mal hergehen und die Makros in VBA-Code umsetzen, dann wird die Sache vielleicht schon transparenter.

 

Also wenn ich 2 neue Projekte anlege ganz neu nachdem alles gelöscht worden ist. projekt 1 und 2. Und dann wähle ich Projekt 1 aus und ordne den das Bild zu und klicke auf speichern und neues Projekt und dann vergebe ich den Projekt 2 das Bild Nummer 3 als beispiel und dann klicke ich auf Speichern und Schließen. Dann öffne ich wieder das Formular test und wähle mich über die Auswahlfelder zum Projekt 1 dann Lädt das Projekt aber es kommt kein Bild. Wenn ich zuerst Projekt 2 wähle erscheint das Bild. Wenn ich dann das Projekt 1 wähle bleibt das Bild vom vorherigen Projekt sichtbar.

 

Ich bin inzwischen auch drauf gekommen --> siehe oben.

Verwende anstelle der SuchenNachDatensatz-Aktion die FindFirst in Verbindung mit dem Recordset.

 

und das funktioniert wie :-) Diese Codes sagen mir viele noch gar nichts.