In Userform 3 ListBoxen synchronisieren :: Office-Hilfe.com - Wir lösen Ihre Probleme mit Microsoft Office

Einloggen, um private Nachrichten zu lesen

Downloads

[Excel 2002] In Userform 3 ListBoxen synchronisieren

Office-Hilfe.com - Wir lösen Ihre Probleme mit Microsoft Office Foren-Übersicht » Microsoft Excel Hilfe

Autor

Nachricht

timi
User mit gefährlichem Halbwissen

Anmeldedatum: 12.03.2008
Beiträge: 107
Wohnort: 67742 Lauterecken

Verfasst am: 18.05.2008, 22:04

Hallo, habe wieder mal ein Problem.
Habe in meiner UserForm 3 ListBoxen eingefügt, welche alle 3 synchron / parallel laufen sollen. Ändere ich in irgendeiner ListBox mit Up/Down den Inhalt, so soll dieser sich parallel in den anderen 2 auch ändern.

ListBox2 = RowSource: Startseite!$U$2:$U$1000
ListBox1 = RowSource: Startseite!$Q$2:$Q$1000
ListBox3 = RowSource: Startseite!$V$2:$V$1000

Alle drei Listboxen stehen quasi immer im Verhältnis zueinander.

Im Tabellenblatt kann ich diesen Listenfeldern eine Zellverknüpfung zuweisen, an der sie sich orientieren können.
Geht dies auch in einer Userform?

Gruß Timi

schatzi
Moderator

Anmeldedatum: 09.12.2006
Beiträge: 5729

Verfasst am: 19.05.2008, 10:52

Hallo!

Die Position des Eintrags kannst du mit der Eigenschaft ListIndex auslesen und einlesen.
Der erste Eintrag hat den Index 0, der zweite den Index 1, usw.

Also kannst du die Listboxen wechselseitig verknüpfen, z.B. so:

Code:

Private Sub ListBox1_Click()
ListBox2.ListIndex = ListBox1.ListIndex
End Sub

Private Sub ListBox2_Click()
ListBox1.ListIndex = ListBox2.ListIndex
End Sub

_________________

Viele Grüße vom Schatzi
------------------------
Ich bin nur noch sporadisch erreichbar!
Bitte hofft nicht auf eine schnelle Beantwortung einer Rückfrage meinerseits!
Jeder andere Helfer darf Rückfragen gerne übernehmen und hilft sicher gerne weiter!

timi
User mit gefährlichem Halbwissen

Anmeldedatum: 12.03.2008
Beiträge: 107
Wohnort: 67742 Lauterecken

Verfasst am: 19.05.2008, 13:18

Vielen Dank, klappt super!

Sieht bei mir so aus:

Private Sub ListBox1_Click()
ListBox2.ListIndex = ListBox1.ListIndex
ListBox3.ListIndex = ListBox1.ListIndex
End Sub

Private Sub ListBox2_Click()
ListBox1.ListIndex = ListBox2.ListIndex
ListBox3.ListIndex = ListBox2.ListIndex
End Sub

Private Sub ListBox3_Click()
ListBox1.ListIndex = ListBox3.ListIndex
ListBox2.ListIndex = ListBox3.ListIndex
End Sub

Gruß Timi

Office-Hilfe.com - Wir lösen Ihre Probleme mit Microsoft Office Foren-Übersicht » Microsoft Excel Hilfe

Thema		Autor	Forum	Antworten	Verfasst am
Ähnliche Beiträge
	2 Tabellenblätter synchronisieren ode...	Totti15485	Microsoft Excel Hilfe	3	21.09.2008, 14:23
	Userform Befehlsfläsche funktioniert ...	Posaune	Microsoft Excel Hilfe	2	17.09.2008, 23:28
	Hyperlinks in Userform	correx	Microsoft Excel Hilfe	10	08.08.2008, 14:12
	Aufgaben synchronisieren (z.B. Google)	woerli	Microsoft Outlook Hilfe	0	01.07.2008, 11:16
	Ordner zwischen Laptop und Netzwerk s...	Illov	Microsoft Windows Hilfe	0	25.06.2008, 10:05

Gehe zu:

Du kannst keine Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum nicht antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum posten
Du kannst Dateien in diesem Forum herunterladen

Powered by phpBB © 2001, 2002 phpBB Group :: FI Theme :: Alle Zeiten sind GMT + 1 Stunde
Deutsche Übersetzung von phpBB.de