![]() |
![]() |
|
![]() |
![]() |
|
Programmierung Rat & Tat für Programmierer |
|
Themen-Optionen | Ansicht |
![]() |
#10 |
Veteran
![]() Registriert seit: 10.01.2001
Beiträge: 478
|
![]() @ LLR: Hat ein wenig gedauert aber ich hatte heute ziemlich zu tun.
Zu "Events von Microsoft": ------------------------------- Jepp, bin ich dabei! Den Office-Launch habe ich schon seit einiger Zeit mit Spannung erwartet. Mal sehen wie die Sache mit .NET zusammenspielt. Ich geb' mir die Aktion am 18.11.2003 im Grazer Congress. Zu Gruppierung / Sortierung: ------------------------------- Die Sortierung ist kein Problem. Public Sub DOWN() Sort "repMy", "fldMy", False End Sub Public Sub UP() Sort "repMy", "fldMy" End Sub Public Sub Sort(strReport As String, strFieldList As String, Optional Ascending) Dim strSort As String strSort = "ASC" If Not IsMissing(Ascending) Then If Not Ascending Then strSort = "DESC" End If End If DoCmd.OpenReport strReport, acViewDesign With Reports.Item(strReport) .OrderByOn = False .OrderBy = strFieldList & " " & strSort .OrderByOn = True End With DoCmd.Close acReport, strReport, acSaveYes End Sub Was die Gruppierung betrifft, so macht die ja ohne Anpassung des Layouts ja ohnehin nicht viel Sinn, oder? Wenn es dir nur darum geht die Speicherabfrage zu umgehen, dann kannst du ja das Open Event verwenden. Das wird ausgelöst, wenn du aus der Design- in die Preview-Ansicht wechselst. Allerdings ist das (wie du selbst bemerkt hast) wahrscheinlich auch nicht besonders clever. Immerhin hat ja so eine Abfrage auch ihren Sinn. ![]() Falls du allerdings die Gruppierung wirklich per Code ändern willst, so funktioniert das natürlich nach dem selben Schema, wie das ändern der Sortierung. Zum Thema STRG+I: ------------------------------- Such' mal in der Hilfe nach "Shortcuts für das Code-Fenster" ![]() |
![]() |
![]() |
Aktive Benutzer in diesem Thema: 1 (Registrierte Benutzer: 0, Gäste: 1) | |
|
|