=fktbestDatensatz()

Computer: Software & Programmierung Microsoft Access
#1

Hallo,

habe folgendes Problem. Mit der Funktion

Public Function fktbestDatensatz()
Dim Meldung, Antwort As String

Meldung = „Geben Sie eine Artikelnummer ein oder wählen Abbrechen“
Antwort = InputBox(Meldung, „Alle Sätze mit einer bestimmten Artikelnummer“, „“)
If Antwort „“ Then
DoCmd.OpenForm „Tabelle1“, , , „[Artikelnummer]=’“ & Antwort & "’ "
Else
DoCmd.OpenForm „Tabelle1“
DoCmd.Maximize
End If
End Function
lade ich mir das Forular mit den entsprechenden Daten. Klappt ja alles, aber in der Tabelle gibt es ein Feld Eingangsdatum und nach diesem sortiert sollen die Arttikelnummern angezeigt werden.

Wer kann helfen?

#2

Hallo,

erstell eine Abfrage (im Abfragenetwurf) auf Basis der Tabelle und sortiere dort nach dem Eingangsdatum. Diese Abfrage(namen) schreibst Du in die Form-Eigenschaft „Datenherkunft“, bzw, wählst ihn dort aus.

Du kannst die Abfrage (SQL-String) aber auch gleich durch Klick auf die 3 Pünktchen rechts neben dieser Form-Eigenschaft erzeugen. Es wird dabei auch der Abfrageentwurf geöffnet, jedoch wird der SQL-String der Abfrage in der Datenherkunft gespeichert.

[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]

#3

Hallo,

da gaebe es 2 Moeglichkeiten:

  1. Nach dem Oeffnen des Formulars mittels
    Formular.OrderBy = Eingangsdatum und Formular.OrderOn = True
  2. Die Bedinngung beim Oeffnen wegflassen, in der Entwurfansicht die des Formulars die Datenherkunft auf „“ setzen
    und dann nach dem Oeffnen mittels
    Formular.RecordSource = „Select * From myTable ORDER BY Eingangsdatum“
    das komplette SQL-Statement setzen.

Tschau
Peter

[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]