Excel Userform Listbox

Hallo,

mit Formular meine ich ein UserForm, auf das ich einen Label, eine ListBox und einen Button gepackt habe.

Im VBA-Fenster in der Projektansicht (Tree) unter dem Knoten "Formulare".

Ich habe ein Makro, das Daten in einer Excel-Tabelle prüft.

Die Fehler werden in dieses Formular in die ListBox geschrieben:

For Counter = 0 To FehlerCounter - 1

    frmPruefErgebnisse.lbxFehler.AddItem FehlerArray(Counter, 0)

Next Counter

Wenn ich mehr als 13 Einträge habe, kommt eine vertikale Bildlaufleiste.

Aber das Scrollen mit dem Mausrad ist hier nicht möglich.

Beziehen sich eure Antworten auf dieses UserForm?

Oder geht es bei einem UserForm einfacher?

Gruß

OLLI

Diese Tabelle soll bei Anklicken von A1 angezeigt werden und es soll ein Wert aus der ersten Spalte Wert in A1 übertragen werden. Wer hat eine Lösung oder wo kann ich eine finden?

Dazu braucht es eine Kombination aus mehreren Codes.

Zuerst musst Du eine Userform programmieren, diese muss mindestens eine Listbox und 2 Commandbutton haben. Die Listbox sollte Überschriften anzeigen und via RowSource mit der Tabelle verbunden sein.

Bei einem Klick auf den Ok-Button sollte dann der Wert der Listbox in A1 geschrieben werden.

Weiterhin braucht es in der Tabelle einen SelectionChanche Ereignisroutine die dann die Userform aufruft.

Ziemlich viel Aufwand... einfacher wäre eine SVERWEIS Formel und eine Datengültigkeit welche dann aber nur eine einfache Liste anzeigt.

Andreas.

Hallo Christian,

schau nochmals
hier nach der Mappe "Einblenden"

Ich habe dort nun getrennte ListBoxen für das Ein- und Ausblenden und eine Combobox um auf andere Blätter zu springen.

Du kannst den Code, um die UserForm anzuzeigen, auch in ein Standardmodul schreiben und das Makro mit einem ShortCut belegen. Dann kannst du die UserForm von jedem Blatt heraus aufrufen. Oder du löschst das Unload Me aus den Codes und behältst die UserForm
immer aktiv.

Claus

Hallo Olli,

das ist mit einer "normalen" Listbox nur bedingt machbar, so wie es einmal Nepumuk mit viel API Aufwand gemacht hat, aber dies geht in den neuen Versionen nicht mehr!

Über ein ImageControl (Combo) bzw. Listview würde es gehen nur sind diese Steuerelemente nicht wirklich vergleichbar mit den Standard Steuerelementen! Ich selber habe nur auf Wunsch diese Elemente eingebaut ohne Garantie, dass diese in den nächsten Versionen
noch lauffähig sind.

Hier noch einige Versuche mit API habe ich jetzt aber nicht getestet)

https://social.msdn.microsoft.com/F...n-userform-listbox-in-excel-2010?forum=isvvba

Nur eine einfache Einstellung um scrollen zu können gibt es nicht, bzw. wäre mir jetzt nicht bekannt.

lg

Chris

so, hier noch eine letzte Frage zu dem Thema.



Im Moment mach ich das alles ja ueber eine UserForm, sprich PopUp Window.



Wenn ich es nun diese Form Embedded haben will (also nicht nur den StartKnopf), muss ich dann alles erneut fuer jede einzelne ListBox schreiben? und wenn ja, wie mach ich dann das mit dem Initialisieren und einlesen?



Kann ich dann noch immer Me.() nutzen?