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

Forumthread: Daten aus Tabelle1 in Tabelle2 übertragen

Daten aus Tabelle1 in Tabelle2 übertragen
20.02.2013 12:43:16
Hans
Hallo zusammen,
meine Excel-Datei besteht aus mehreren Tabellen. Nun soll die Spalte E der Tabelle1 nach einem bestimmten Word durchsucht werden (z.B. Briefkasten). Sofern dieses Word gefunden wird, sollen die Spalten E:M aus dieser Zeile in Tabelle2 in eine bestimmte Zeile wiedergegeben werden.
Das Word "Briefkasten" kommt jedoch häufier vor (z.B. Briefkasten grau, Briefkasten silber, etc.) und somit sollen auch mehrere Zeilen übertragen werden.
Gibt es hierzu ein Makro?
Vielen Dank für eure Hilfe
Hans

Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
das Wort, die Wörter
20.02.2013 12:59:54
Rudi
Hallo,
filtere doch nach Briefkasten*
Gruß
Rudi

AW: das Wort, die Wörter
20.02.2013 13:12:59
Hans
Hallo Rudi,
jedoch gibt es nicht nur das Wort Briefkasten sondern noch ca. 50 weitere, welche ebenfalls übertragen werden sollen. Daher ist ein Autofilter hierfür nicht geeignet.
Gibt es eine andere Möglichkeit?
MfG
Hans

Anzeige
AW: Daten aus Tabelle1 in Tabelle2 übertragen
20.02.2013 14:09:29
JoWE
Hallo Hans,
hier mal ein Grundgerüst.
Was meinst Du mit bestimmte Zeile?
(Der Code sucht die nächste freie Zeile in Spalte A der Tabelle2)
Sub finden_kopieren_schreiben()
Dim sb As String
Dim shMain As Worksheet
Dim shSlave As Worksheet
Dim r As Long
Set shMain = ThisWorkbook.Sheets("Tabelle1")
Set shSlave = ThisWorkbook.Sheets("Tabelle2")
sb = InputBox("Suchbegriff eingeben", "Abfrage Suchbegriff")
r = shMain.Cells.Find(sb).Row
shMain.Range("E" & r & ":M" & r).Copy Destination:= _
shSlave.Range("A" & shSlave.Cells(shSlave.Rows. _
Count, 1).End(xlUp).Row + 1)
End Sub

Gruß
Jochen

Anzeige
AW: Daten aus Tabelle1 in Tabelle2 übertragen
20.02.2013 14:57:09
Hans
vielen Dank
;

Forumthreads zu verwandten Themen

Anzeige
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