Formular Detailbereich mit VBA ein-/ausblenden

resiro wrote:
> In einem Access-Bericht möchte ich nur nicht leere Felder drucken.
> Das eigentliche Textfeld kann ich mit "vergrößerbar" /
> "verkleinerbar" ausblenden. Was mache ich mit dem Bezeichnungsfeld?
> (bin VBA-Neuling)
>
> Donkarl schreibt: "Wenn es Bezeichnungsfelder auf gleicher Höhe gibt,
> bleiben die evtl. sichtbar und stören. Du kannst sie im Ereignis Beim
> Formatieren des Bereiches z.B. mit folgendem Code ein/ausblenden:
>
> Me!DeinBezeichnungsFeld.Visible = Not IsNull(Me!DeinTextFeld)"
>
> Unter Ereignis ist für mein Bezeichnungsfeld kein Eintrag vorhanden!
> Also kann ich dort nichts verändern.

- Du musst in den Bereich klicken, in dem sich dein Textfeld bzw.
das Bezeichnungsfeld befindet. Also entweder in die Leere neben
den Steuerelmenten oder in die Leiste auf der "Detailbereich" oder
der sonstige Bereichsname steht.

- Lass dir die Eigenschaften des Bereiches anzeigen.
Unter den Eigenschaften gibt es eine namens "Beim Formatieren".

- Klicke in die Eigenschaftenzeile. Dann siehst du am rechten Rand.
der Zeile eine kleine Schaltfläche mit 3 Punkten, auf die du klickst.

- Damit landest du im VBA-Editor. An der Stelle an der sich dort
der Cursor befindet, fügst du die o.a. Codezeile ein und änderst
natürlich die Bezeichnungen auf deine.

- Speichern und VBA-Editor schließen.

Fertig! Du bist VBA-Programmierer!
Wenn das ganze funktioniert, sogar ein guter.

--
Servus
Karl
*******
Access-FAQ: http://www.donkarl.com

Hallo Günter,



du hast in dieser Antwort Formular unterstrichen. Was verstehst du unter Formular? Eine UserForm?

Wenn du eine UserForm nutzt, arbeitest du doch sowieso mit VBA.

Wenn es ein Formular im Blatt ist, wo ist das Listenfeld, bzw. die zu jedem Listeneintrag zugehörigen Kontrollkästchen? Und welche Steuerelemente nutzt du? ActiveX- oder Formular-Steuerelemente?

Aber egal wie, du wirst es wohl über VBA machen müssen.



Mit freundlichen Grüßen

Claus

Hallo,

es tut mir leid. In den Masken oder Formularen können keine Anpassungen vorgenommen werden. Somit lassen sich die Zuordnungseinheiten auch nicht ausblenden.

Viele Grüße

Barbara

Habe nach einigen probieren Lösung gefunden:

Anstelle von "WERT" folgendes eingeben:

DLookup("FELD", "TABELLE")

Hallo!

Muss das weitere Berechnen in einer Abfrage passieren? Dort wird das nämlich ein bissel müh-und langsam. Besser wäre ein Formular oder ein Bericht. z.B.

- wenn es mehrere Tage gibt, dann ein Feld mit dem Tagesdatum ohne Uhrzeit in der o.a. Abfrage hinzufügen

- Bericht auf Basis der o.a. Abfrage erstellen

- im Berichtsfuß (oder in einem Gruppenfuß, falls es mehrere Tage gibt) ein Textfeld "Tagessumme" mit Steuerelementinhalt: =Summe(SummeVonVolumen)

- im Detailbereich ein zusätzliches Textfeld mit Steuerelementinhalt: =SummeVonVolumen/Tagessumme