Inhalt einer Listbox sortieren
22.07.2003 10:22:00
frebert
ich habe 2 kleine aufgaben für euch:
1. Mit dem folgenden Code fülle ich eine Listbox mit den Namen aller sheets in meinem workbook, in der ich später Auswahlen treffe:
Private Sub UserForm_Initialize()
Dim name As String
Dim i As Integer
Application.ScreenUpdating = False
For i = 1 To Sheets.Count
name = Sheets(i).name
With ListBox1
.AddItem name
End With
Next
Application.ScreenUpdating = True
End Sub
Meine Frage: Wie lässt sich der Inhalt der ListBox am besten alphabetisch sortieren? (Übersichtshalber)
2. Ich möchte ein Menü mit einem Rechten Maus click öffnen. Wie kann ich verhindern, dass nach dem Schließen des Menüs, das normale rechte Mausclick menü erscheint?? Also das von Excel standartmässig vorgesehene Menü für die rechte Maustaste??
Recht herzlichen Dank im Voraus!
Grüße
Da Frebert