Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Formular in Datenblattansicht:Zeilenweise optisch hinterlegt
zurück: Formular schließen weiter: Kontrollkästen Werte 0 und -1 als "Nein" und " Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Antwort Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
achulio
Gast


Verfasst am:
17. Mai 2007, 13:36
Rufname:

Formular in Datenblattansicht:Zeilenweise optisch hinterlegt - Formular in Datenblattansicht:Zeilenweise optisch hinterlegt

Nach oben
       Version: Office 2k (2000)

Hallo,
ich habe ein großes Formular in der Datenblattansicht, mit dem wir arbeiten. Ist es auf einfache Weise möglich, die gesamte Zeilendarstellung so einzustellen, dass aufeinanderfolgende Zeilen dunkel - hell - dunkel - hell - ... hinterlegt sind? Dies soll einfach einer besseren Übersicht dienen...
Danke für Tips!
JörgG
Access-Team


Verfasst am:
17. Mai 2007, 15:58
Rufname:
Wohnort: b. Dresden


AW: Formular in Datenblattansicht:Zeilenweise optisch hinter - AW: Formular in Datenblattansicht:Zeilenweise optisch hinter

Nach oben
       Version: Office 2k (2000)

Hallo,

auf einfache Weise . . . wieviel ist für Dich einfach? Very Happy

In einer Abfrage lässt sich ein DS-weise wechselndes Feld nicht ohne weiteres bewerkstelligen da hier die Sortierung der Abfrage und des Formulares eine Rolle spielt, ausserdem ist die Datenblattansicht für viele Dinge einfach Mi... Embarassed

Wenn es nicht tausende von DS sind, lässt sich das mit ein bisschen VBA so lösen, hänge an Deine Tabelle noch ein Kontrollkästchen-Feld an, Name = Farbe. Das Feld nimmst Du mit in Dein Formular auf. Im Formularentwurf - [F4] Eigenschaftsfenster - Register Ereignis - "beim Öffnen" - [Ereignisprozedur] - klick rechts auf die "..."
Code:
Private Sub Form_Open(Cancel As Integer)
    Call FktFarbe
    Me!Farbe.ColumnHidden = True  'Spalte ausblenden
End Sub
darunter kopierst Du diese Funktion:
Code:
Private Function FktFarbe()
    Dim Rst As DAO.Recordset, i As Boolean
   
    Set Rst = Me.RecordsetClone  'in A2k evtl Me.Recordset.Clone
    Do While Not Rst.EOF
        Rst.Edit
        Rst!Farbe = Not i
        Rst.Update
        i = Not i
        Rst.MoveNext
    Loop
    Rst.Close: Set Rst = Nothing
End Function
Edit: im Codefenster - Menüleiste - Extras - Verweise - "Microsoft DAO3.6 Object Library" - Häkchen setzen

Zurück in den Formularentwurf, markiere ein Textfeld - Menüleiste - Format - bedingte Formatierung:
    Bedingung1: Ausdruck ist: [Farbe]=0 --> Hintergrundfarbe setzen

das wiederholst Du für alle relevanten Textfelder.

Idea Das funktioniert solange die Sortierung nicht verändert wird, sollte das der Fall sein, muss die Funktion FktFarbe noch mal angeschoben werden.

Edit: für den Fall einer Neusortierung, ganz oben im Kopf des Formularmoduls wird eine Variable deklariert:
Code:
Private strMerke As String

das Öffnen-Ereignis des Formulares wird erweitert:
Code:
Private Sub Form_Open(Cancel As Integer)
    Call FktFarbe
    Me!DS.ColumnHidden = True
    Me.OrderBy = ""
    strMerke = Me.OrderBy
End Sub
und im Ereignis "beim Anzeigen" lässt sich die Neusortierung abfangen und die Funktion erneut aufrufen:
Code:
Private Sub Form_Current()
    If strMerke <> Me.OrderBy Then
        Call FktFarbe
        strMerke = Me.OrderBy
    End If
End Sub

_________________
MfG, Jörg Very Happy

Bitte das Feedback nicht vergessen.
Neues Thema eröffnen   Neue Antwort erstellen Alle Zeiten sind
GMT + 1 Stunde

Diese Seite Freunden empfehlen

Seite 1 von 1
Gehe zu:  
Du kannst Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum nicht posten
Du kannst Dateien in diesem Forum herunterladen

Verwandte Themen
Forum / Themen   Antworten   Autor   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Access Tabellen & Abfragen: Aus Abfrage auf ein Feld im Formular zugreifen 5 Olsen 1646 11. Jul 2005, 12:34
Willi Wipp Aus Abfrage auf ein Feld im Formular zugreifen
Keine neuen Beiträge Access Tabellen & Abfragen: Parameter fuer SQL-Statement aus Formular 1 kuni 824 04. Jul 2005, 10:22
jens05 Parameter fuer SQL-Statement aus Formular
Keine neuen Beiträge Access Tabellen & Abfragen: Abfrage von Formular zu mehreren Tabellen gleichzeitig 5 Friedel 1237 22. Mai 2005, 11:06
jens05 Abfrage von Formular zu mehreren Tabellen gleichzeitig
Keine neuen Beiträge Access Tabellen & Abfragen: Formular --> Tabelle ? 6 AlexisM 835 27. Apr 2005, 10:56
AlexisM Formular --> Tabelle ?
Keine neuen Beiträge Access Tabellen & Abfragen: Formular: Groesse? 1 Gast 732 24. März 2005, 13:35
Sanne Formular: Groesse?
Keine neuen Beiträge Access Tabellen & Abfragen: Feld wird nicht in Formular angezeigt 1 Chef_1 528 12. März 2005, 21:27
stpimi Feld wird nicht in Formular angezeigt
Keine neuen Beiträge Access Tabellen & Abfragen: Automatische Aktualisierung von generiertem Wert im Formular 9 GandalfTCM 1041 09. Feb 2005, 17:40
lothi Automatische Aktualisierung von generiertem Wert im Formular
Keine neuen Beiträge Access Tabellen & Abfragen: Wert übernehmen von einem Formular in das andere 2 mactoolz 1244 03. Feb 2005, 17:46
ralphkr Wert übernehmen von einem Formular in das andere
Keine neuen Beiträge Access Tabellen & Abfragen: Abfragefeld über ein Kombifeld aus Formular ändern 3 ggazarog 1148 31. Dez 2004, 15:34
mapet Abfragefeld über ein Kombifeld aus Formular ändern
Keine neuen Beiträge Access Tabellen & Abfragen: Daten für Aktualisierung aus Formular auslesen 1 Ulf 1155 03. Dez 2004, 11:19
lothi Daten für Aktualisierung aus Formular auslesen
Keine neuen Beiträge Access Tabellen & Abfragen: Formular für mehrere Abfragen benutzen 2 Oli aus Bonn 1262 21. Nov 2004, 01:30
Oli aus Bonn Formular für mehrere Abfragen benutzen
Keine neuen Beiträge Access Tabellen & Abfragen: Suchen in Formular 1 Sumo_Racer 1092 28. Mai 2004, 21:59
lothi Suchen in Formular
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: PHP JavaScript