Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Wert aus Textbox suchen und in zelle Wert anzeigen

Wert aus Textbox suchen und in zelle Wert anzeigen
18.01.2018 12:06:34
Philip
Hallo
Ich habe eine Userform in dieser habe ich zwei Textboxen, den Text aus Textbox1 möchte ich in der Spalte A suchen und wenn gefunden soll der Text aus Textbox2 In Spalte M auf der selben Zeile eingetragen werden.
Gruss Philip

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

Betreff
Datum
Anwender
Anzeige
AW: Wert aus Textbox suchen und in zelle Wert anzeigen
18.01.2018 12:29:02
Peter(silie)
Hallo,
schau dir folgende Sachen an:
Range.Find
https://msdn.microsoft.com/de-de/vba/excel-vba/articles/range-find-method-excel
Application.Match
https://msdn.microsoft.com/de-de/vba/excel-vba/articles/worksheetfunction-match-method-excel
AW: Wert aus Textbox suchen und in zelle Wert anzeigen
18.01.2018 12:47:12
Werner
Hallo Philip,
so:
Private Sub CommandButton1_Click()
Dim strSuch As String, raFund As Range
strSuch = Me.TextBox1
If Len(Me.TextBox1) > 0 Then
'Blattnamen anpassen
Set raFund = Worksheets("Tabelle1").Range("A:A").Find(strSuch, LookIn:=xlValues, LookAt:= _
xlWhole)
If Not raFund Is Nothing Then
raFund.Offset(, 12) = Me.TextBox2
Else
MsgBox "Suchbegriff " & Me.TextBox1 & " in Spalte A nicht vorhanden."
End If
End If
Set raFund = Nothing
End Sub
Gruß Werner
Anzeige
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge