Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1384to1388
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Suchen und markieren
12.10.2014 12:35:14
fritz-frank@gmx.at
Schönen Tag
kann mir bitte wer weiterhelfen
ich ,öchte über eine Textbox welche sich in der Userform 1 befindet(TextBox1) die Spalte A in Tabelle1 durchsuchen. wenn der wert gefunden wird sollen die drrei Zellen daneben markiert werden
danke für eure Hilfe

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

Betreff
Datum
Anwender
Anzeige
AW: Suchen und markieren
12.10.2014 13:06:33
Crazy
Hallo
das könnte so gehen
Option Explicit
Private Sub CommandButton1_Click()
Dim Suchergebnis As Range
With Columns(1)
Set Suchergebnis = .Find(TextBox1.Value, LookIn:=xlValues, lookat:=xlWhole)
If Not Suchergebnis Is Nothing Then
Range(Cells(Suchergebnis.Row, "B"), Cells(Suchergebnis.Row, "D")).Select
Else
MsgBox "nix gefunden"
End If
End With
End Sub

MfG Tom

AW: Suchen und markieren
12.10.2014 13:29:32
fritz-frank@gmx.at
Vielen Dank Tom
hat super funktioniert
schönen sonntag noch
lg fri
Anzeige

305 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige