Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
Einen Wert suchen und Zeile auf einem separaten Tabellenblatt abspeichern |
24.10.2018 15:24:58 |
Natalie |
|
|
|
24.10.2018 15:48:53 |
Gast6071 |
|
|
|
24.10.2018 18:10:27 |
Ulrich |
|
|
Von:
Natalie |
Datum:
24.10.2018 15:24:58 |
Views:
877 |
Rating:
|
Antwort:
|
Thema:
Einen Wert suchen und Zeile auf einem separaten Tabellenblatt abspeichern |
Hallo Forum,
Ich habe eine Excel-Datei mit mehreren Reitern, in welchen Wert aus TextBox9.Value in Spalte C vorkommen kann.
Nun möchte ich alle Zeilen in Spalte C in allen Tabellenblättern meiner Datei durchsuchen und wenn dieser Wert gefunden wird,
dann sollten die Werte A:C von dieser Zeile auf das Tabellenblatt "Tabelle2" kopiert werden.
Mit meinem jetzigen Code wird nur einmal ein Eintrag kopiert und nicht weiter.
Könnte mir jemand bitte helfen?
LG
Natalie
Dim ws As Worksheet
Dim rng As Range
For Each ws In ActiveWorkbook.Worksheets
Set rng = Range("C:C").Find(What:=TextBox9.Value, LookAt:=xlWhole)
rng.EntireRow.Copy
Worksheets("Tabelle2").Range("A:C").PasteSpecial Paste:=xlPasteAll
Next 'ws
|
- Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
- Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
- Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
- Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
- Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei
Antworten auf Ihren Beitrag zu benachrichtigen
Bitte geben Sie ein aussagekräftiges Thema an.
Bitte geben Sie eine gültige Email Adresse ein!
- Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
- Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
- Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
- Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
- Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei
Antworten auf Ihren Beitrag zu benachrichtigen
Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
Einen Wert suchen und Zeile auf einem separaten Tabellenblatt abspeichern |
24.10.2018 15:24:58 |
Natalie |
|
|
|
24.10.2018 15:48:53 |
Gast6071 |
|
|
|
24.10.2018 18:10:27 |
Ulrich |
|
|