Spalten vergleichen

Forumthread: Spalten vergleichen
3 Beiträge zu diesem Forumthread
Anzeige
VBA Beispiele zu verwandten Themen

Forumthread: Spalten vergleichen

Spalten vergleichen

12.05.2004 13:03:08

Fritz

wer kann mir helfen ?
ich habe z.B. Spalten A und B
einige Werte stimmen überein andere nicht.
In Spalte C hätte ich gern, dass Werte die in A und B vorkommen
nebeneinander in gleicher Zeile stehen. Werte die in A vorkommen, aber nicht in B soll eine leere Zelle sein.
so könnte das Ergebnis aussehen:
Spalte A B C
1 5 1
2 1 2
3 7
4 4 4
5 2 5
gibt's denn da 'ne schöne Formel?
Danke

3
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Spalten vergleichen

12.05.2004 13:14:55

Frank
AW: Spalten vergleichen

Fritz
AW: Spalten vergleichen

12.05.2004 13:25:49

Frank

AW: Spalten vergleichen

12.05.2004 13:14:55

Frank

Hallo Fritz,
probier mal folgendes:


Sub vgl()
i=1
do while activesheet.cells(i,"A")<> ""    'letzte Zeile finden
i=i+1
loop
for j=1 to i
if worksheets("NAME").cells(j,"A") = worksheets("NAME").cells(j,"B") THEN
worksheets("NAME").cells(j,"C") = worksheets("NAME").cells(j,"B")
end if
next
End Sub

Mfg Frank

AW: Spalten vergleichen

Fritz

Danke, aber soll ich dies alles in jede Zelle kopieren?

AW: Spalten vergleichen

12.05.2004 13:25:49

Frank

Nein geh auf extras - Macro - VisualBasic Editor
dann Markiere im linken Fenster das dickgeschriebene VBProjekt -
dann rechtsklick - einfügen - Modul - doppelklcik auf das Modul
- den Code reinkopieren -
vor Sub vgl() noch:
Public i as integer
Public j as integer
und dann kannst du in der Excel Tabelle ein button machen und über eigenschaften des buttons auf das modul verweisen.
Mfg Frank