Thema Datum  Von Nutzer Rating
Antwort
26.01.2012 08:58:27 Sino
NotSolved
26.01.2012 17:08:00 Y
NotSolved
Rot Vergleich von 2 Tabellen DRINGEND!!
 26.01.2012 17:33:04 Holger
Solved
17.06.2013 14:19:21 Dania_Hut
NotSolved

Ansicht des Beitrags:
Von:
Holger		 Datum:
26.01.2012 17:33:04		 Views:
957		 Rating:
     
Antwort:
 Nein
Thema:
Vergleich von 2 Tabellen DRINGEND!!

Hallo Sino,

ich würde das Find-Objekt verwenden:

Sub VergleichTabellen()
Application.ScreenUpdating = False
lz2 = "a1:a" + CStr(Sheets("Tabelle2").Cells(Rows.Count, 1).End(xlUp).Row)
Sheets("Tabelle2").Activate
For Zeile1 = 1 To Sheets("Tabelle1").Cells(Rows.Count, 1).End(xlUp).Row
    Set lz = Range(lz2).Find(what:=Sheets("Tabelle1").Cells(Zeile1, 1), lookat:=xlWhole)
    If Not lz Is Nothing Then Cells(lz.Row, 1).ClearContents
Next Zeile1
Application.ScreenUpdating = True
End Sub

Gruß
Holger

 

 

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
26.01.2012 08:58:27 Sino
NotSolved
26.01.2012 17:08:00 Y
NotSolved
Rot Vergleich von 2 Tabellen DRINGEND!!
 26.01.2012 17:33:04 Holger
Solved
17.06.2013 14:19:21 Dania_Hut
NotSolved