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

Nachname und Vorname in Listbox anzeigen

Forumthread: Nachname und Vorname in Listbox anzeigen

Nachname und Vorname in Listbox anzeigen
12.07.2016 23:18:38
Benny
Hallo Zusammen,
ich habe eine kleine Userform als Dateneingabe für Kontakte. In der Userform befindet sich eine Listbox in der der Nachname angezeigt wird. Ist es denn machbar, dass auch der Vorname mit angezeigt wird in folgender Form?: Nachname, Vorname
Wie stelle ich das am besten an, bin dankbar für nen Tipp. Die Mappe ist angehängt.
Grüße Benny

Die Datei https://www.herber.de/bbs/user/106974.xls wurde aus Datenschutzgründen gelöscht


Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Nachname und Vorname in Listbox anzeigen
12.07.2016 23:32:35
Daniel
Hi
das geht mit zwei kleinen, ganz einfachen erweitereungen:
1. Vor und Nachnamen in der ArrayList mit aufnehmen.
2. Bevor du die Zeilennummer in die zweite Spalte er ArrayList schreibst, einfach Namen und Vornamen in die erste Spalte zusammenschreiben:
Private Sub UserForm_Initialize()
Dim lzeile As Long, arrList
With Tabelle1
arrList = .Range(.Cells(2, 1), .Cells(.Rows.Count, 2).End(xlUp))
End With
For lzeile = 1 To UBound(arrList)
arrList(lzeile, 1) = arrList(lzeile, 2) & ", " & arrList(lzeile, 1)
arrList(lzeile, 2) = lzeile + 1
Next
ListBox1.List = arrList
ListBox1.Selected(0) = True
End Sub

Anzeige

Forumthreads zu verwandten Themen

mehreren Zellen in einer Zelle mit Absätzen
Christian

1. Ist es möglich, die markierten Zeilen von Screenshot 1 per Formel/Makro so zu übernehmen, das diese wie in Screenshot 2 übernommen werden? Solche Felder kommen aber öfters und auch mit einzelnen Zeilen dazwischen vor. Die Formatierung (bei Zahlen mit ,00 soll ein langer Strich stehen) sollte...
28.11.2008 15:53:49
Thread-ID: 1028725
3 Beiträge
mehrere Zellen in einer Zelle mit Absätzen II
Christian

Hi
Wir brauchen etwas ähnliches wie in diesem Script von Daniel (der uns schon sehr weitergeholfen hat!):
https://www.herber.de/bbs/user/57225.xls
Zeilen sollen zusammengefasst werden, wenn die Bezeichnung in Spalte A und B gleich sind (siehe Screenshots).
https://www.herber.de...
05.12.2008 15:47:00
Thread-ID: 1030485
7 Beiträge
Vor und Nachnamen trennen
Thorsten_Z

Moin liebes Forum,
stehe im Moment auf dem Schlauch...
In A1 steht ein Name. Nehmen wir mal Hans Herber
in B1 soll nun der Vorname und
in C1 der Nachname stehen.
Wie bekomme ich das hin? Die Formel für Name aus Email von excelformeln.de hat mir fast weiter geholfen. aber eb...
15.02.2009 15:18:00
Thread-ID: 1050889
6 Beiträge
Max.Wert mehrerer Werte in einer Zelle
Peter

Hallo Forum,
wer kann helfen?
In einer Zelle sind (5 numer. Werte) gespeichert und duch ein
Semikolon getrennt. Die Zelle kann auch Leerstrings enthalten.
z.B. 4;33;;52;12
Ich möchte den max. Wert an die Textbox 'TxtAltKWo1'
übergeben.
Danke Peter
'Zellinhalt (5...
07.11.2009 20:59:50
Thread-ID: 1115285
3 Beiträge
Inhalt von mehreren Textboxen in einer Zelle speic
mehreren

Hallo Forum,
ich möchte per VBA den Inhalt von mehreren Textboxen in einer Zelle speichern.
(mit Semikolon getrennt)
Da gibt es bestimmt eine bessere Lösung als:
Wer kann helfen?
Cells(1,1).value=TextBox1.text & „;“ & TextBox2.Text……….
Danke Peter
08.11.2009 19:48:16
Thread-ID: 1115412
2 Beiträge
Inhalt mehrerer Zellen in einer Zelle vereinen
flo

Hallo zusammen,
ich habe folgendes Problem:
Ich habe in einer Spalte viele Zellen mit Text. Die gesamten Zellen möchte ich nun in einer Zelle vereinen.
Weiß zufällig jemand wie ich das mache? Wenn ich die Zellen nur verbinde klappt das nicht, da die Inhalte dann gelöscht werden?!
01.02.2010 15:43:48
Thread-ID: 1134874
6 Beiträge
Anzeige
String Pfad Name und Dateiname trennen
chris

Hallo VBA Profis,
bitte um Hilfe.
Ich brings einfach nicht alleine hin ;(
Ich bekomme mit unten gezeigter anweißung in cb den String mit Dateinamen und Pfad.
Wie kann ich diesen jetzt trennen einmal msgbox path und einmal msgbox Dateiname
cb = Application.GetOpenFilename
...
08.04.2010 14:27:21
Thread-ID: 1150669
2 Beiträge
Anzeige
Straßennamen und Nr. trennen
RoB

Moin moin liebe Leute!
Ich habe ich einer Spalte etliche Straßennamen samt Hausnr. aufgelistet. Wie aus dem Betreff schon zu entnehmen ist, möchte ich nun die Str.namen und die Nr. jeweils in zwei Spalten sortieren. Klar dachte ich da an die klassische Lösung:
=LINKS(A14;SUCHEN(" ";A14;...
10.06.2010 14:16:03
Thread-ID: 1161252
7 Beiträge
Mehrere kriterien in einer Zelle
Gallier1

Hallo
habe folgendes problem:
A1 =WENN(UND(A8=O$1;T8<=10000;U8<=10000;<b>C8="C"oder"B"oder"A</b>");O$3;"")
Der Fett dargestellte Bereich stimmt nicht in meiner Formel. Ohne diesem Bereich funktioniert sie problemlos (Dank des UMFANGREICHEN Forums) In C8 gibt es...
11.08.2010 16:15:53
Thread-ID: 1171752
11 Beiträge
Vorname und Nachname trennen
Klaus W.

Hallo,habe folgendes Problem. Ich habe eine Namensliste mit folgender Schreibweise: Mustermann, Hans oder Schlosser, Robert .....
Diese Namen stehen in der Spalte "A". Ich möchte nun, dass Nachname und Vorname getrennt in den Spalten "B" und "C" stehen. Wie kann ich das automatisieren?Für Hi...
03.05.2002 12:22:25
Thread-ID: 118177
4 Beiträge
mehrere werte in einer Zelle
knab

Hallo,
ich würde gerne in einer Zelle Ergebnisse aus mehreren zellen zusammenfassen.
Beispiel:
a1 = 30
a2= 40
a3 = 50
Ziel ist jetzt a4. Hier soll stehen 30,40,50
geht das und kann mir jemand die Formel hierfür geben.
Vielen Dank
16.09.2010 10:44:09
Thread-ID: 1178021
4 Beiträge
Anzeige
Mehrere Code in einer Zelle
Gregor

Hoi zäme
Folgender Code hat mir Rudi zum löschen von Zeilen zugestellt, wenn in Zellen Code nicht vorhanden:
AnfangInput = 1600
EndeInput = 1800
For z = 10 To intLastRow - 1
Set rngW = Union(Range(Cells(z, 18), Cells(z, 21)), Range(Cells(z, 23), Cells(z, 27)))
If Applica...
11.10.2011 11:45:52
Thread-ID: 1233309
5 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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