Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
596to600
596to600
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Besondere Listbox

Forumthread: Besondere Listbox

Besondere Listbox
09.04.2005 19:18:26
Herbert
Hallo zusammen,
nachdem mir vorhin durch Nepumuk so toll geholfen wurde gleich noch eine Frage.
Ich habe in einer Userform eine besondere Listbox, heißt Listview1.
Wie das funktioniert habe ich im web gefunden. Nun hätte ich gern, dass die
Sortierfunktion nur durch mich benutzt werden kann. Kann man die irgendwie
mit einem Passwort oder einem geheimen Schalter freischalten?
Danke für Hilfe
Grüße Herbert(HH)
Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Besondere Listbox
09.04.2005 22:29:44
paula
hallo herbert
Baue diese Zeilen im Ereignis-Makro deiner Listbox

Private Sub ListBox1_Click()
Dim Zugriff_Name
Dim wert
Zugriff_Name = "Herbert"
Do
wert = InputBox("Zugriffname eingeben !", "Zugriff")
If wert <> Zugriff_Name Then
wert = ""
MsgBox "Nicht berechtigt!"
Else
' hier dein Code
End If
Loop Until (wert <> "")
End Sub

Anzeige
AW: Besondere Listbox
10.04.2005 00:28:14
Herbert
Hallo,
danke für deinen Vorschlag, aber das ist keinen normale Listbox sondern
ein Listview1.
Grüße Herbert
AW: Besondere Listbox offen
10.04.2005 00:29:11
Herbert
H(HH)
AW: Besondere Listbox offen
10.04.2005 15:10:11
K.Rola
Hallo,
setzt beim Start des userforms die Eigenschaft sorted auf false.
ListView1.Sorted = False
Beim Mousedown auf ein kleines transparentes Label, dessen Position nur dir bekannt ist,
sorted auf True setzen.
Wenn du Mousedown noch mit einer Tastenkombination versiehst, z.B. alt + umsch + rechte Mausetaste, wird kaum jemand dahintersteigen.
Gruß K.Rola
Anzeige
AW: Besondere Listbox , danke oT
10.04.2005 15:50:15
Herbert
oT
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige