Per Drodpown in Userform Zeilennummer ausgeben | Herbers Excel-Forum
Betrifft: Per Drodpown in Userform Zeilennummer ausgeben
von: ptonka
Geschrieben am: 08.01.2010 12:17:15
Hallo zusammen,
ich möchte mittels eines Dropdowns in einer Userform per VBA die Zeilennummer des selektierten Begriffes in eine Variable schreiben. Beispiel: Im Blatt "Januar" stehen von A9 bis A100 die Namen von Mitarbeitern.
Es wird nun eine Userform uafgerufen, in der ein Dropdown enthalten ist, dass die o.a. Namen als RowSource enthält. Wird nun ein Name ausgewählt (Max Mustermann) so möchte ich wissen, in welcher Zeile im Blatt "Januar" dieser Name steht.
Für einen Tipp wäre ich sehr dankbar.
Gruß,
Ptonka
Betrifft: AW: Per Drodpown in Userform Zeilennummer ausgeben
von: Ramses
Geschrieben am: 08.01.2010 12:23:50
Hallo
Du hast deinen RowSource Bereich ?
A1:a100
Dann ist der ListIndex der Combobox gleich der Zeilennummer.
Ansonsten musst du halt etwas rechnen
Rowsource A10 : a110
Listindex = 10
Dann Zeile = ListIndex + 10
Gruss Rainer
Betrifft: AW: Per Drodpown in Userform Zeilennummer ausgeben
von: ptonka
Geschrieben am: 08.01.2010 15:14:35
Hallo Rainer,
genau das war es. Danke für den Hinweis.
Gruß,
Ptonka
Betrifft: AW: Per Drodpown in Userform Zeilennummer ausgeben
von: ransi
Geschrieben am: 08.01.2010 12:25:49
HAllo
Das sind deine Daten.
Tabelle1
| A | B |
9 | XCXDA | 9 |
10 | BR8XQ | 10 |
11 | X3TZO | 11 |
12 | 4O7JK | 12 |
13 | 5MH9F | 13 |
14 | 14J1U | 14 |
15 | H955D | 15 |
16 | PC9A8 | 16 |
17 | N5D7F | 17 |
18 | S8F2A | 18 |
19 | V7YHO | 19 |
20 | D3S4I | 20 |
21 | E8D05 | 21 |
22 | 1ID7Y | 22 |
23 | 7S717 | 23 |
24 | FS8C5 | 24 |
25 | 1TTQJ | 25 |
26 | 2BN3E | 26 |
Excel Tabellen im Web darstellen >> Excel Jeanie HTML 4
Als RowSource nimmst du Tabelle1!A9:B100
BoundColumn der ListBox =2
Und dann einfach so:
' **********************************************************************
' Modul: UserForm1 Typ: Userform
' **********************************************************************
Option Explicit
Private Sub ListBox1_Change()
MsgBox ListBox1.Value
End Sub
ransi
Beiträge aus den Excel-Beispielen zum Thema "Per Drodpown in Userform Zeilennummer ausgeben"