Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
424to428
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
424to428
424to428
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Spalten vergleichen

Spalten vergleichen
12.05.2004 11: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
Anzeige
AW: Spalten vergleichen
12.05.2004 11: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 11: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
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige