Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.04.2024 12:23:24
Wenn-Formel anpassen
19.04.2024 12:09:19
Unique (Application.WorksheetFunction.Unique)
19.04.2024 11:51:37
Nächsten identischen Treffer suchen
19.04.2024 11:45:34
Feld im SAP auslesen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
864to868
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
864to868
864to868
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

2 Spalten vergleichen und daten uebertragen

2 Spalten vergleichen und daten uebertragen
26.04.2007 16:16:00
Maty
hallo Ihr,
ich habe folgendes Problem:
ich moechte 2 spalten in 2 verschiedenen sheets vergleichen, und die nicht matchenden zeilen in ein extra sheet schreiben.
jedoch sollen die zeilen aus sheet A, die nicht vorhanden sind in Sheet A2 geschrieben werden und die zeilen aus sheet B in B2.
dies wuerde ich gern ueber ein makro laufen lassen.
ich poste euch mal ein ausschnitt aus meiner datei.
https://www.herber.de/bbs/user/42045.xls
hoffe einer von euch kann mir helfen
vielen Dank
Gruss
Maty

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: 2 Spalten vergleichen und daten uebertragen
ransi
Hallo Maty
Schubs mal diesen Code an:
Option Explicit


Public Sub test()
Dim zelle As Range
Dim wohin As Long
Dim bereich As Range
Dim L As Long
L = Sheets("LCAG").Range("g65536").End(xlUp).Row
wohin = 2
Set bereich = Sheets("LCAG").Range("g2:G" & L)
For Each zelle In Tabelle1.Range("D4:D1000")
    If WorksheetFunction.CountIf(bereich, zelle) = 0 Then
        Sheets("JFK Rolf").Rows(zelle.Row).Copy Tabelle3.Rows(wohin)
        wohin = wohin + 1
    End If
Next
L = Sheets("JFK Rolf").Range("d65536").End(xlUp).Row
wohin = 2
L = Sheets("JFK Rolf").Range("d65536").End(xlUp).Row
Set bereich = Sheets("JFK Rolf").Range("D4:D" & L)
For Each zelle In Sheets("LCAG").Range("G2:G1000")
    If WorksheetFunction.CountIf(bereich, zelle) = 0 Then
        Sheets("LCAG").Rows(zelle.Row).Copy Tabelle4.Rows(wohin)
        wohin = wohin + 1
    End If
Next
End Sub


ransi

Anzeige
AW: 2 Spalten vergleichen und daten uebertragen
27.04.2007 17:51:00
Maty
hi ransi,
danke aber der code funktioniert nicht.
mein excel zeigt mir andauern fehler an.
kannst du mir da evtl weiter helfen.
habe ein englisches excel 2003 falls es relevant ist.
gruss
Maty

307 Forumthreads zu ähnlichen Themen

Zwei Werte Vergleichen....
chrissey

Hallo Leut,
hätte ne easy Frage:
Habe in Zelle A1 einen Wert, sagen wir mal "HANS", stehen und möchte nun eine Mtrix nach diesen Wert absuchen
sagen wir mal die Zellen
B10 bis B100 (gefüllt mit Namen: PETER; DIETER; ...... ; HANS; usw.)
wie mach ich des? Vergleich gibt mir...
10.10.2008 15:09:52
Thread-ID: 1015606
3 Beiträge
Anzeige
2 Zellen, gleicher Inhalt, egal welche ausgefüllt
Peter

Hallo zusammen,
folgende Frage: ich habe eine Datei mit mehreren Tabellenblättern. Dabei kommen teilweise die gleichen Daten auf verschiedenen Tabellenblättern vor.
Ich möchte die Daten nur einmal eingeben. Nun habe ich es so gelöst, dass man die Daten in die Zelle eingeben muss, die ma...
20.11.2008 11:19:31
Thread-ID: 1026347
3 Beiträge
Doppelte über zwei Spalten - vergleichen
Wolfgang

Hallo,
in einer Mappe befinden sich zwei Tabellenblätter. Gibt es eine Chance, beide Tabellenblätter abzugleichen, ob Datensätze doppelt vorkommen? - Schwierigkeit dabei mag aber sein, dass für die Suche sowohl die Spalte D, als auch Spalte E zu Grunde zu legen wären. Nur also, wenn die Dat...
09.01.2009 17:26:12
Thread-ID: 1038283
5 Beiträge
Anzeige
zum 2 ten werte vergleichen
juergen

Hallo
Habe immer noch das Problem:
mit https://www.herber.de/forum/messages/1056145.html
konnte Ich das Problem doch nicht lösen.
Also mein Prob. besteht darin das ich in einer Zeile ( Bspl. A1-J7 dürfen nur Unterschiedliche Werte haben damit die Tabelle weiter rechnet sonst...
05.03.2009 11:43:14
Thread-ID: 1056745
9 Beiträge
Spalten vergleichen und Nummern ausgeben ?
Günther

Hallo zusammen,
kann mir bitte jemand hierbei helfen:
in Spalte E geb ich Nummern ein, diese sollen mit denen aus Spalte AA verglichen werden.
Bei Übereinstimmung soll die Nummer aus AB in L ausgegeben werden.
E---- L--- AA-- AB
15-- 2--- 10-- 1
30-- 5--- 15-- 2
1...
12.03.2009 15:49:14
Thread-ID: 1059522
5 Beiträge
Werte aus 2 Spalten vergleichen??
stefan

Hallo,
ich habe in 2 Spalten Werte. Wie kann ich prüfen, ob die werte in der einen spalte enthalten sind. WEnn sie enthalten sind, soll in einer 3.spalte ein text ausgegeben werden.
wie mach ich das am besten?
danke euch?
13.03.2009 16:57:19
Thread-ID: 1059944
4 Beiträge
Daten vergleichen und übernehmen/zusammenführen
pemoe

Hallo,
ich habe folgendes, für Excel-Profis sicher leicht zu lösendes Problem. Es geht um eine Auswertung von Laboruntersuchungen, in Datei 1 steht in Spalte A jeweils die Anzahl und in Spalte B die Bezeichnung für die Untersuchungen. In Datei 2 steht zusätzlich für jede Untersuchungsbezeic...
14.05.2009 14:37:02
Thread-ID: 1075170
5 Beiträge
Zwei Werte vergleichen
Lutz

Grüße Euch,
ich habe eine Liefertabelle mit - gob gesagt - drei interessanten Spalten:
In der ersten Spalte steht eine Materialnummer, in der zweiten das Datum der letzten Lieferung und in der dritten Spalte das Landeskürzel des Bestellers.
Matno LiefDat Kürzel
1234 1...
14.09.2009 12:34:19
Thread-ID: 1102587
6 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
2
4
2
4
3
8
4
3
4
5
10
4
12
4
11
6
1
3
5
2
3
1
5
3
4