Jörg Lorenz: VBA-Hilfe

Beitrag lesen

Hallo Phil,

Es ist so, dass die Daten normal in Excel vorhanden sind, sprich Spalte A der Autor, Spalte B der Buchtitel, etc.

Dazu kannst Du eine Textbox anlegen, in die der Suchbegriff eingegeben werden kann.

Mit der Find-Methode kannst Du dann danach suchen lassen. Ungetestet:

set irgendwas = columns(2).find(textbox1.text, lookat:=xlpart)

In der Variablen irgendwas stecken dann alle erforderlichen Angaben, die Du benötigst, z. B.:

z = irgendwas.row

Um Fehler zu vermeiden, solltest Du aber prüfen, ob wirklich etwas gefunden wurde, das könnte so aussehen:

set irgendwas = columns(2).find(textbox1.text, lookat:=xlpart)
if not irgendwas is nothing then

Deine Anweisungen

end if

Die Find-Methode ist in der Hilfe gut erklärt.

Viele Grüße

Jörg