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

Forumthread: Suchen und eintragen

Suchen und eintragen
10.06.2004 13:18:58
Gerald
Hallo
Ich habe zwei Tabellenblätter. Im Tabellenblatt2 stehen ca. 1000 Artikel. In Tabellenblatt1 (wird aus einem Textfile ausgelesen) ca. 50 Artikel Spalte A und die Anzahl Spalte B. Nun soll aus Tabelle1 die Artikelanzahl in Tabelle2 Spalte B eingetragen werden. Dafür bräuchte ich eine Makrolösung.
Wäre schön, wenn mir jemand helfen könnte. Im Voraus vielen Dank
Gerald
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Suchen und eintragen
Beni
Hallo Gerald,
Gruss Beni

Sub Suchen_und_eintragen()
Dim i As Integer
Dim Wert As Variant
Dim c As Range
Sheets("Tabelle1").Select
For i = 1 To Cells(65536, 1).End(xlUp).Row
Wert = Cells(i, 1).Value
With Sheets("Tabelle2").Columns(1)
Set c = .Find(Wert, LookIn:=xlValues, LookAt:=xlWhole)
If Not c Is Nothing Then c(1, 2) = Cells(i, 2).Value
End With
Next i
End Sub

Anzeige
AW: Suchen und eintragen
10.06.2004 23:45:47
Gerald
Hallo Beni
Tausend Dank. Danach habe ich schon Tage gesucht.
Schönen Abend noch Gerald
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige