Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
400to404
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
400to404
400to404
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Spalten vergleichen und Ausgabe
Ralf
Hi,
leider habe ich garkeine Ahnung von VBA.
Mein Problem sind 2 Spalten (A und B) mit über 3000 Einträgen.
Sie gleichen sich fast völlig.
Ich würde gerne ein Makro haben, welches jeden einzelnen Wert aus Spalte 1 mit Saplte 2 vergleicht.
Ist in Spalte 1 ein Wert, der in Spalte 2 nicht gefunden wird, sollen diese Werte aus Saplte 1 zum Beispiel untereinander in Spalte E aufgeführt werden.
Kann mir da jemand mit dem Quellcode helfen?
wäre super.
Vielen Dank
Ralf

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

Betreff
Benutzer
Anzeige
AW: Spalten vergleichen und Ausgabe
Bert
Machs mit bedingter Formatierung.
bezogen auf Zelle B1:
Die Formel ist:
=ZÄHLENWENN(A1:A3000;B1)=0
Format auswählen und mit dem Formatpinsel soweit wie nötig nach unten
übertragen. Alle Werte, die in Spalte A nicht vorkommen, werden in
dem von dir gewählten Format markiert.
Bert
AW: Spalten vergleichen und Ausgabe
Daniel
Hi,
füge einfach folgenden Quellcode zu einem Button hinzu:

Private Sub CommandButton1_Click()
Dim i As Integer, j As Integer
j = 1
For i = 1 To 3000 Step 1
If Cells(i, 1) > Cells(i, 2) Then
Cells(j, 5) = Cells(i, 1)
j = j + 1
End If
Next i
End Sub

Er trägt die nicht übereinstimmenden Werte in Spalte E ein.
mfg Daniel
Anzeige
AW: Spalten vergleichen und Ausgabe
Ralf
danke, du hast mir weiter geholfen.
Ciao Ralf

306 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige