Hallo.
Ein paar Fragen zu Excel 2003. Gibt es eigentlich Veränderungen bei Visual Basic bei Excel 2007&2010?
Ich möchte ganz gerne Werte in Spalte A mit Werten in Spalte B vergleichen(in Excel 2003). In Spalte C sollen die Werte aufgelistet werden, die nur in Spalte A oder nur in Spalte B stehen und das natürlich ohne Leerzeile.
Leider habe ich von VBA keine Ahnung, bin ja nur eine Bürokauffrau………Aber Makros sind schnell und sehr hilfreich.
Kann mir jemand helfen?
Hallo Anne,
Ein paar Fragen zu Excel 2003. Gibt es eigentlich
Veränderungen bei Visual Basic bei Excel 2007&2010?
ja.
Ich möchte ganz gerne Werte in Spalte A mit Werten in Spalte
B vergleichen(in Excel 2003). In Spalte C sollen die Werte
aufgelistet werden, die nur in Spalte A oder nur in Spalte B
stehen und das natürlich ohne Leerzeile.
Wie soll das geanu geschehen, du willst erst
a1 mit B1, dann
A2 mit B2, dann
A3 mit B3, usw.
vergleichen?
Oder
A1 mit B:B,
A2 mit B;B,
usw, dann
B1 mit A.A
B2 mit A:A
vergleichen?
Gruß
Reinhard
Leider habe ich von VBA keine Ahnung,
Alle hier haben mal angefangen, also völlig normal.
bin ja nur eine Bürokauffrau
? Mach dich doch nicht so klein und werte deinen Beruf ab.
Gruß
Reinhard
Hallo und danke für deine Antwort und deinen Tipp.
Das hier trifft zu:
A1 mit B:B,
A2 mit B;B,
usw, dann
B1 mit A.A
B2 mit A:A
vergleichen?
Viele Grüße
A1 mit B:B,
A2 mit B;B,
usw, dann
B1 mit A.A
B2 mit A:A
Hallo Mutter 
,
Option Explicit
Sub ListeC()
Dim Zei As Long, ZeiC As Long
With Worksheets("Tabelle1")
For Zei = 1 To .Cells(Rows.Count, 1).End(xlUp).Row
If Application.CountIf(.Columns(2), .Cells(Zei, 1).Value) = 0 Then
ZeiC = ZeiC + 1
.Cells(ZeiC, 3).Value = .Cells(Zei, 1).Value
End If
Next Zei
For Zei = 1 To .Cells(Rows.Count, 2).End(xlUp).Row
If Application.CountIf(.Columns(1), .Cells(Zei, 2).Value) = 0 Then
ZeiC = ZeiC + 1
.Cells(ZeiC, 3).Value = .Cells(Zei, 2).Value
End If
Next Zei
End With
End Sub
Gruß
Reinhard
Vielen Dank! Ich werde es bald testen können