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

2 Worksheets 2 Spalten vergleichen

Forumthread: 2 Worksheets 2 Spalten vergleichen

2 Worksheets 2 Spalten vergleichen
27.05.2003 19:58:45
Sissi
Hallo...

Wir haben 2 Worksheets(ws) mit jeweils 6 Spalten. Die Aufgabenstellung ist aus ws2 in Spalte A die Daten mit den Daten aus ws1 Spalte D zu vergleichen. Falls eine übereinstimmung aufkommen sollte, soll aus der Reihe mit der übereinstimmung in ws1 aus Spalte B das Datum in ws2 Spalte D eingetragen werden.

Wir sitzten hier schon seit 4 Stunden und bekommen nichts zustande....bitte habt Mitleid...wir freuen und über jede Anregung.


Anzeige

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

Betreff
Datum
Anwender
Anzeige
Re: 2 Worksheets 2 Spalten vergleichen
27.05.2003 20:12:33
Willie

Ich habe das so ähnlich schon mal gemacht ihr müßt nur nochmal
testen und evtl. die Namen anpassen! Hier der Code:
Private verschieben ()
Dim endrow
endrow = Sheets("Tabelle1").Cells(Rows.Count, 2).End(xlUp).Offset(0, 1).Row

Dim Name As String
Dim Kennz As String
X = 2
Y = 2
Z = 2
Do
Kennz = Sheets("Tabelle2").Cells(X, 1).Value 'Name des Mitglieds
Name = Sheets("Tabelle1").Cells(Y, 2).Value 'Name aus Gesamtliste

If Name = Kennz Then
Sheets("Tabelle2").Cells(Y, 4).Value = Sheets("Tabelle1").Cells(Y, 2).Value ' Datum übertagen
X = X + 1
Y = 2
End If
Y = Y + 1
If Y > endrow + 2 Then
Sheets("Tabelle3").Cells(Z, 1).Value = Kennz ' Daten die es nicht gibt werden nach Tabelle3 übertragen
X = X + 1
Y = 2
Z = Z + 1
End If

Loop Until Kennz = ""
End Sub


Gruß

Willie

Anzeige
Re: 2 Worksheets 2 Spalten vergleichen
27.05.2003 20:28:32
Nepumuk

Hallo Sissi,
wenn es sich um zwei Tabellen in einer Mappe handelt, dann so:

Gruß
Nepumuk

Re: 2 Worksheets 2 Spalten vergleichen
27.05.2003 21:58:42
Sissi

Vielen Vielen DANK!!!!!
Echte Lebensretter hier...hat super Funktioniert!

Danke nochmal und einen schönen Abend!!!

VLG Sissi

Re: 2 Worksheets 2 Spalten vergleichen
27.05.2003 22:00:38
Sissi

Vielen Dank auch für deine Hilfe. Das von Nepumuk hat schon geklappt, habe mich trotzdem riesig über Deine Hilfe gefreut!

DANKE!!!

VLG Sissi

Anzeige

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige