WernerMager

Hallo, ich hatte genau das gleiche Problem und habe mir eine Funktion geschrieben, mit dem das geht. Man muss nur das Mouse-Down-Event implementieren und dort die Funktion aufrufen: Private Sub Listbox1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) SortListbox Listbox1, X, Y End Sub Das Modul dazu gibts in meinem Blog: Listbox in Access per Mausklick sortieren Viel Spaß damit