VBA - ListBox, ausgewähltes Wort ausgeben - MS-Office-Forum

JanBam · 12.04.2018, 14:43

Hallo,

ich habe eine ListBox (Formularsteuerelement) und möchte nun beim Klicken eines Buttons ein Wort in eine String Variable speichern und dieses Wort dan ausgeben.

Klingt ziemlich einfach, wenn ich aber folgendes ausführe bekomme ich nur den "Index" meines ausgewählten Wortes und nicht das Wort selber.

Wenn meine ListBox also folgendes enthält:
München
Stuttgart
Hannover
Berlin

Und ich wähle München aus, wird nicht München ausgegeben, sondern der Index, also in dem Fall: 1

Was muss ich ändern damit mir das Wort angezeigt wird?

Danke

Meine ListBox ist bei "V16"

Dim SWort As String
Range("V16").Select
SWort = ActiveCell.Value

MsgBox SWort

Hajo_Zi · 12.04.2018, 15:55

benutze ein ActiveXSteuerelement.

Im Forum kann der Beitrag als erledigt markiert werden. Also mache es unten links mit Klick auf den Schalter "als erledigt setzen", falls Problem gelöst.
Der Zustand des Beitrages wird dann in der Übersicht angezeigt und man braucht sich diese Beiträge nicht mehr ansehen.

Grußformel

drambeldier · 12.04.2018, 17:51

Moin,

Kontetxmenü, Steuerelement formatieren. Auswahl landet in "Zellverknüpfung".

Per VBA kann nicht sinnvoll auf Formularsteuerelemente zugegriffen werden.

JanBam · 16.04.2018, 11:43

Danke.

Mit einem ActiveXSteuerelement funktioniert es.

Sheets("MeinSheet").ListBox1.Value

12.04.2018, 14:43	#1
JanBam Neuer Benutzer Registrierung: 01.03.2018 Beiträge: 19 Karma: Modifikator: 1	VBA - ListBox, ausgewähltes Wort ausgeben Hallo, ich habe eine ListBox (Formularsteuerelement) und möchte nun beim Klicken eines Buttons ein Wort in eine String Variable speichern und dieses Wort dan ausgeben. Klingt ziemlich einfach, wenn ich aber folgendes ausführe bekomme ich nur den "Index" meines ausgewählten Wortes und nicht das Wort selber. Wenn meine ListBox also folgendes enthält: München Stuttgart Hannover Berlin Und ich wähle München aus, wird nicht München ausgegeben, sondern der Index, also in dem Fall: 1 Was muss ich ändern damit mir das Wort angezeigt wird? Danke Meine ListBox ist bei "V16" Dim SWort As String Range("V16").Select SWort = ActiveCell.Value MsgBox SWort Geändert von JanBam (12.04.2018 um 14:47 Uhr).

12.04.2018, 15:55	#2
Hajo_Zi MOF Guru Registrierung: 17.05.2008 Ort: Straubing Beiträge: 15.434 Karma: Modifikator: 29	benutze ein ActiveXSteuerelement. Im Forum kann der Beitrag als erledigt markiert werden. Also mache es unten links mit Klick auf den Schalter "als erledigt setzen", falls Problem gelöst. Der Zustand des Beitrages wird dann in der Übersicht angezeigt und man braucht sich diese Beiträge nicht mehr ansehen. __________________ Signatur in jedem Beitrag m Forum kann der Beitrag als erledigt markiert werden. Also mache es unten links mit Klick auf den Schalter "als erledigt setzen", falls Problem gelöst. Der Zustand des Beitrages wird dann in der Übersicht angezeigt und man braucht sich diese Beiträge nicht mehr ansehen. Bitte Version angeben. Bei keiner Angabe gehe ich von meinen Angaben aus. Betriebssystem: Windows 10 - 64 Bit, Office 2016 - 32 Bit.

12.04.2018, 17:51	#3
drambeldier MOF Koryphäe Registrierung: 02.02.2016 Beiträge: 1.698 Karma: Modifikator: 4	Moin, Kontetxmenü, Steuerelement formatieren. Auswahl landet in "Zellverknüpfung". Per VBA kann nicht sinnvoll auf Formularsteuerelemente zugegriffen werden. __________________ Gruß Ralf Geändert von drambeldier (12.04.2018 um 17:54 Uhr).

Themen-Optionen
Druckbare Version zeigen Diese Seite per E-Mail verschicken
Ansicht
Linear-Darstellung Zur Hybrid-Darstellung wechseln Zur Baum-Darstellung wechseln

16.04.2018, 11:43	#4
JanBam Threadstarter Neuer Benutzer Registrierung: 01.03.2018 Beiträge: 19 Karma: Modifikator: 1	Danke. Mit einem ActiveXSteuerelement funktioniert es. Sheets("MeinSheet").ListBox1.Value

Aktive Benutzer in diesem Thema: 1 (Registrierte Benutzer: 0, Besucher: 1)