Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1704to1708
1704to1708
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Wenn Nummer dann komplette Zeile kopieren

Forumthread: Wenn Nummer dann komplette Zeile kopieren

Wenn Nummer dann komplette Zeile kopieren
05.08.2019 19:46:47
Marion
Hallo,
nachdem ich eine Woche lang gesucht und "gefummelt" habe, habe ich ein Problem lösen können. Beim zweiten Problem hoffe ich auf Eure Hilfe.
Ich möchte in einer Tabelle (namens Konto) in der Spalte B eine Auftragsnummer eingeben, welche in einer komplett andere Tabelle (namens Aufträge) in Spalte B gesucht werden muss. Wenn die Nummer übereinstimmt, soll die komplette Zeile (A bis O) kopiert werden.
Habt Ihr eine Lösung für mich?
Gruß
Marion
Anzeige

11
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Wenn Nummer dann komplette Zeile kopieren
05.08.2019 20:05:21
Werner
Hallo Marion,
ich will dir ja nicht zu nahe treten aber bei VBA gut sollte das z.B. mit .Find kein Problem sein.
Ansonsten fehlen mir da ein paar Infos:
Aus welchem Blatt soll wohin kopiert werden?
Am besten mal eine kleineBeispielmappe hochladen, dannweiß man auch wie deine Auftragsnummern aussehen.
Gruß Werner
Anzeige
AW: Wenn Nummer dann komplette Zeile kopieren
05.08.2019 20:15:29
Marion
Hallo,
erst einmal vielen Dank für die schnelle Rückantwort.
Tolle Bohne, wer lesen kann ist klar im Vorteil. Excel gut - VBA kein Plan...
Ich habe hier die Datei hochgeladen. Es handelt sich um zwei verschieden Tabellen, welche vom Aufbau aber gleich sind.
https://www.herber.de/bbs/user/131277.xlsm
Anzeige
AW: Wenn Nummer dann komplette Zeile kopieren
05.08.2019 20:45:03
Werner
Hallo Marion,
Fragen willst du nicht beantworten?
So wie du schreibst kommen für mich weitere Unklarheiten dazu.
1. was meinst du mit zwei verschiedene Tabellen?
-meinst du zwei verschiedene Mappen?
-wenn ja, sind die beide geöffnet?
-oder meinst du zwei verschiedene Blätter in derselben Mappe
2. ich weiß immer noch nicht von wo nach wo kopiert werden soll
-so wie es aussieht von Aufträge nach Konto
-aber wohin dort, so ein Blatt hat ein paar Millionen Zellen.
Gruß Werner
Anzeige
AW: Wenn Nummer dann komplette Zeile kopieren
05.08.2019 20:53:44
Marion
Hallo,
dachte ich hätte alle beantwortet - Entschuldigung.
1.
- zwei verschiedene Mappen, welche im gleichen Ordner liegen
- ja, es sind beide offen
- wenn es sich vermeiden lässt, würde ich es vermeiden wollen, die Aufträge in das "Konto" zu integrieren, da es mehrere Konten gibt und ich nicht in allen alles aktualisieren möchte
2.
- das ist korrekt, in der Tabelle sind alle Aufträge so aufgelistet, wie sie in der hochgeladenen Tabelle sind
- das Konto sieht genanuso aus wie die Aufträge und die gleichen Zeilen sollen dort eingefügt werden, wenn die Auftragsnummer - welche ich in der Spalte B manuell eintragen wollte -, mit der in den Aufträgen übereinstimmt. Die Aufträge müssen sich sogenommen im Konto wiederspiegeln...
Ich hoffe, dass es so verständlich ist...
Anzeige
AW: Wenn Nummer dann komplette Zeile kopieren
05.08.2019 21:41:59
Werner
Hallo Marion,
der Code gehört ins Codemodul des Blattes Konto(Zielblatt).
Rechtsklick auf den Tabellenblattreiter - Code anzeigen - Code rechts ins Codefenster kopieren.
Der Code startet automatisch, sobald du in Konto in Spalte B etwas eingibst. 
Private Sub Worksheet_Change(ByVal Target As Range)
Dim strSuch As String, raFund As Range
If Target.Column  2 Or Target.Row  1 Then Exit Sub
strSuch = Target
'Name der Datei und del Blattes anpassen
With Workbooks("Aufträge").Worksheets("Aufträge").Columns(2)
Set raFund = .Find(what:=strSuch, LookIn:=xlValues, lookat:=xlWhole)
If Not raFund Is Nothing Then
raFund.Offset(, -1).Resize(, 15).Copy _
Target.Offset(, -1)
Else
MsgBox "Die Auftragsnummer " & Target & " ist nicht vorhanden."
End If
End With
Set raFund = Nothing
End Sub
Gruß Werner
Anzeige
AW: Wenn Nummer dann komplette Zeile kopieren
05.08.2019 21:53:57
Marion
Du bist ein Schatz, vielen vielen vielen Dank... Funzt Bombe... Ich könnt Dich knuddeln...
Als in Gedanken geknuddelt :) :) :)
Freudentanz
Gerne u. Danke für die Rückmeldung. o.w.T.
05.08.2019 22:19:09
Werner
AW: Wenn Nummer dann komplette Zeile kopieren
05.08.2019 20:07:38
Hajo_Zi
Hallo Marion,
starte den VBA Editor (Alt+F11), Bild sollte zweigeteilt sein ansonsten Strg+R, Doppelklick auf Deine Datei, Doppelklick auf Deine Tabelle, Code ins rechte Fenster kopieren, VBA Editor schließen.
Das Makro wird automatisch gestartet.
Der Code wirkt nur in dieser Tabelle. 
Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
Dim RaFound As Range
If Target.Column = 2 And Target  "" Then
With Worksheets("Aufträge")
Set RaFound = .Columns(2).Find(Target, .Range("B" & Rows.Count), xlFormulas, _
xlWhole, , xlNext)
If Not RaFound Is Nothing Then
Range(Cells(Target.Row, 1), Cells(Target.Row, 15)).Copy .Cells(RaFound.Row, 1)
End If
End With
End If
End Sub

Beiträge von Werner, Luc, robert, J.O.Maximo und folgende lese ich nicht.
Die Beiträge werden auch ignoriert, es erfolgt keine Antwort.
Anzeige
AW: Wenn Nummer dann komplette Zeile kopieren
05.08.2019 20:27:52
Hajo_Zi
Hallo Marion,
meine Lösung hat also nicht gefallen.
Ich bin dann raus.
Viel Erfolg noch.
Gruß Hajo
Mir gefällt sie auch nicht...
05.08.2019 21:39:45
{Boris}
Hi Hajo,
...denn es ist offensichtlich, dass andersherum kopiert werden soll.
Du bist echt ne Diva...
VG, Boris
Anzeige
AW: Wenn Nummer dann komplette Zeile kopieren
05.08.2019 20:29:06
Marion
Hallo Hajo,
vielen Dank für die schnelle Antwort.
Die Auftragsnummer wechselt mit jedem Auftrag. Bekommt man es hin, dass ich in der Spalte B die Nummer eintrage und er sich die dann zieht? Ich denke die einfachste Lösung in diesem Fall wäre dann, wenn die Gesamtaufstellung der Aufträge in der gleichen Exceltabelle (auf einem Extrablatt) ist, oder?
Gruß Marion
PS: ich habe gerade auf den Anderen Link geantwortet... Bin am Schauen :(
Anzeige

Forumthreads zu verwandten Themen

Löschen von Zeilen unter 1 Bedingung
Zeilen

Hallo,
ich habe in einer Excel Liste Produkte geführt, die den aktuellen Lagerbestand anzeigen.
Dort werden auch die Produkte aufgeführt, deren Produkte einen Lagerbestand von 0 haben.
Der Lagerbestand wird in Spalte B aufgeführt, die Produkte stehen in Spalte A. Der Datenbereich b...
08.08.2008 20:15:00
Thread-ID: 1000407
5 Beiträge
Matrix-formel via VB-Skript in die Zelle einfügen
Wladimir

Hallo zusammen,
ich soll via VB-Skript eine
Excel-Matrix-formel in die Zelle der
geschlossenen Datei einfügen.
Ich habe die Formel entsprechend
angepasst und versuchte sie mit
FormulaArray in die Zelle einzufügen,
aber erfolglos. Es kommt die Meldung:
"Die For...
01.09.2008 12:08:24
Thread-ID: 1006391
14 Beiträge
Formel immer nur in bestimmter Zelle
Katrin

Hallo Zusammen!
Folgendes Problem würde ich gerne lösen, weiß aber nicht wie :)
Ich habe in Spalte A in jeder Zeile Uhrzeiten stehen:
00:15:00
00:30:00
00:45:00
01:00:00
01:15:00
01:30:00
01:45:00
02:00:00
02:15:00
02:30:00
02:45:00
...
02.09.2008 10:30:00
Thread-ID: 1006672
3 Beiträge
Anzeige
Zeile ausblenden, wenn in einer Zelle ein bestimmt
Jakob

Hallo,
Ich habe folgendes Problem:
Ich möchte in den Tabellenblatt "Form3" die zeilen 39-50 ausblenden wenn die Zelle A37 ungleich "Pentax" und "Ciclox" ist. Der Wert der Zelle A37 kommt aus der Eingabe im Tabellenblatt "Eingabemaske" (B7).
Wie müßte der entsprechende VBA-Code ausse...
03.09.2008 17:24:21
Thread-ID: 1007176
6 Beiträge
wenn > Spalte I, dann neue Zeile
Dennis

Hallo Leute,
ich benötige einmal Hilfe eines Experten, da ich noch in den Anfängen stecke.
Ich habe folgendes Problem:
Ich habe eine Liste mit Datensätzen (jeder Datensatz steht für eine Person). Die Datensätze sind unterschiedlich lang. Grds. sind die Datensätze von Spalte A - Spal...
04.09.2008 16:41:00
Thread-ID: 1007458
8 Beiträge
Anzeige
Zeilen ausblenden wenn...
Andreas

Hi,
ich habe ein kleines Problem. Auf meinem Excel-Blatt sind von B4:B200 Datumswerte im Format TT.MM.JJJJ eingetragen. In der Zelle A1 gebe ich nun beispielsweise Januar ein. Ich will nun, dass alle Zeilen ausgeblendet werden, die nicht in der Spalte B ein Januar-Datum eingetragen haben. D...
04.09.2008 20:18:36
Thread-ID: 1007507
10 Beiträge
in einer Spaöte leere Zellen ausblenden
medion53

Hallo, vielleicht kann mir jemand helfen...
Ich habe eine Tabelle A, gefüllt mit Werten bzw Formeln, die Tabelle A verwende ich als Liste für Datengültigkeit. leider bekomme ich die Leerzellen nicht weg...habe gegoogelt und eine Formel gefunden.
http://www.excelformeln.de/formeln.html...
05.09.2008 10:40:00
Thread-ID: 1007607
7 Beiträge
bestimmte Zeilen per Makro ausblenden
Fritz_W

Hallo Forumsbesucher,
ich bitte die VBA-Kundigen unter euch um Hilfe.
Mit welchem Makro kann ich in einer geöffneten Tabelle alle Zeilen ausblenden, in denen in Spalte B ein Datumseintrag steht, der vor dem jeweils heutigen Tag liegt?
Vielen Dank für eure Hilfe
mfg
Fritz
05.09.2008 10:57:00
Thread-ID: 1007611
3 Beiträge
Formel in Zelle per VBA einfügen
Werner

Wie kann ich Statistikformeln (Mittelwert, Maximum, Minimum, Standardabweichung) per VBA in eine Zelle einfügen?
Der zu berechnende Bereich geht von "$J$1" bis "$J$n" wobei n mit ActiveCell.Row-2 zuvor berechnet wird.
Gruß Werner.
10.09.2008 14:17:46
Thread-ID: 1008801
5 Beiträge
Fehler bei Formel per Makro in Zelle eintragen
Born

Hallo Forum,
ich habe folgendes Problem:
Ich schreibe per Makro in Zellen eine Formel. Als Ergebnis bekomme ich jedoch nur die Fehlermeldung #NAME?. Wenn ich dann mit F2 in den Bearbeiten-Modus gehe und Enter drücke, kommt das richtige Ergebnis. Meine Formel scheint also richtig zu sein...
23.10.2008 10:15:00
Thread-ID: 1018538
11 Beiträge
Zeilen ausblenden, außer wenn in Zelle ...?
Selma

Hallo Leute,
ich möchte mit einem CommandButton ab Zeile 4 die Zeilen wie folgt ausblenden:
- wenn in Spalte M die Zelle diesen "plt" Inhalt hat, dann soll die Zeile nicht ausgeblendet werden
- wenn in Spalte M die Zelle die Füllfarbe 15 hat., dann soll die Zeile nicht ausgeblendet...
27.10.2008 18:13:00
Thread-ID: 1019700
10 Beiträge
Anzeige
Spalte ausblenden, wenn in Zeile 7 der Zelleninhal
Selma

Hallo Leute,
wie kann ich die Spalten ausblenden, die in Zeile 7 als Zelleninhalt "x" oder "D" haben?
Vielen Dank im Voraus !
Liebe Grüße,
Selma
29.10.2008 15:41:00
Thread-ID: 1020332
4 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige