Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Anzeige
Inhaltsverzeichnis

zeilennummer in textbox

Forumthread: zeilennummer in textbox

zeilennummer in textbox
25.03.2016 17:36:55
Thomas
Hallo excelfreunde,
ich wünsche euch allen erstmal ein ruhiges Osterfest.
bei mir ist es so ruhig das ich mal etwas ausprobieren möchte jedoch gelingt es einfach nicht.
ich versuche gerade krampfhaft die Zeilennummer des selektierten Datensatzes in die Textbox zu schreiben.
kann sich dies mal jemand anschauen
https://www.herber.de/bbs/user/104607.xlsm
schon mal besten dank für das interesse.
liebe grüsse thomas

Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: zeilennummer in textbox
25.03.2016 22:18:27
Peter
Hallo Thomas,
versuche es so:
Private Sub zelle_markieren_neu()
' zeilen markieren neues modul
Dim n&
Dim c As Range
Dim rZelle  As Range
' erste spalte in textbox schreiben ab hier
Me("markierungsbox" & 1) = ListView2.SelectedItem
' erste spalte in textbox schreiben bis hier
'  ab hier spaltenindex schreiben
'Me("markierungsbox" & 2) = Me.ListView2.SelectedItem.Line
With ThisWorkbook.Worksheets("Tabelle1").Columns(1)
Set rZelle = .Find(What:=ListView2.SelectedItem, LookIn:=xlValues, LookAt:=xlWhole)
If Not rZelle Is Nothing Then
Me("markierungsbox" & 2) = rZelle.Row
Else
MsgBox "Der gesuchte Wert  """ & ListView2.SelectedItem & """  wurde nicht gefunden.", _
48, "   Hinweis für " & Application.UserName
End If
End With
'Set c = Range("A" & markierungsbox2)
Sheets("Tabelle1").Activate
'Range(c.Address).Select
'Set c = Nothing
End Sub

Gruß Peter

Anzeige
AW: zeilennummer in textbox
26.03.2016 00:33:22
Thomas
Hallo Peter,
super das du dir dies mal angeschaut hast.
Es funktioniert auch klasse.
hab recht vielen dank für deine mühe ich wünsch dir noch ein ruhiges Osterfest.
vielen dank
liebe grüsse thomas

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige