Spalten vergleichen

Forumthread: Spalten vergleichen

Spalten vergleichen

22.06.2017 11:03:43

Tarek

Hallo zusammen,
ich habe mal eine knifflige Frage. Ich möchte zwei Spalten aus zwei unterschiedlichen Excel-Dateien vergleichen,
d.h. vergleiche das Datum aus Datei1 (Tabelle1) Spalte FM mit dem Datum aus Datei2 (Tabelle1)in Spalte K.
Wenn das Datum aus Datei 1 größer(bzw. älter) als in Datei 2 ist, soll das Feld von Datei2 Spalte L sich rot färben.
Vielen Dank im Voraus!

10
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Spalten vergleichen

22.06.2017 11:09:24

SF
AW: Spalten vergleichen

22.06.2017 11:24:11

Tarek
Eine Aufforderung ! owT

22.06.2017 11:25:00

Bernd
AW: Eine Aufforderung ! owT

22.06.2017 11:30:11

Tarek
AW: Eine Aufforderung ! owT

22.06.2017 11:34:17

Chris
AW: Eine Aufforderung ! owT

22.06.2017 11:35:21

Bernd
AW: Eine Aufforderung ! owT

22.06.2017 11:46:43

Tarek
AW: Eine Aufforderung ! owT

22.06.2017 11:35:30

SF
AW: Spalten vergleichen

22.06.2017 18:54:18

Piet
@ Piet

23.06.2017 04:18:34

Bernd

AW: Spalten vergleichen

22.06.2017 11:09:24

Hola,
verlinkst du bitte deine Fragen in den verschiedenen Foren untereinander?
Danke.
Gruß,
steve1da

AW: Spalten vergleichen

22.06.2017 11:24:11

Tarek

Hmmm...
Ist das jetzt eine Frage?...oder eine Aufforderung...?!?

Eine Aufforderung ! owT

22.06.2017 11:25:00

Bernd

AW: Eine Aufforderung ! owT

22.06.2017 11:30:11

Tarek

...und wie verlinke ich?!?

AW: Eine Aufforderung ! owT

22.06.2017 11:34:17

Chris

=HYPERLINK(Hyperlink_Adresse;Freundlicher_Name)
;)

AW: Eine Aufforderung ! owT

22.06.2017 11:35:21

Bernd

Hi,
öffne Deinen Beitrag im anderen Forum, kopiere die URL und füge diese hier ein.
MfG Bernd

AW: Eine Aufforderung ! owT

22.06.2017 11:35:30

Hola,
so wie ich es im anderen Forum gemacht habe.
Gruß,
steve1da

AW: Spalten vergleichen

22.06.2017 18:54:18

Piet

Hallo Tarek,
Kritik hast du genug bekommen, aber keine Lösung. Hier eine Lösung von mir.
Bei Const Wb2N mit "xxxx" must du noch den Namen von deinem Workbook2 einfügen. Dann sollte es funktionieren.
Ich hoffe ich habe es so gut kommentiert das du auch verstehen kannst wie dieser Code funktioniert.
Sollten sich die Spalten ändern einfach den Buchstaben in .Cells("L") im Code auswechseln.
mfg Piet


Const Wb2N = "xxxx"  'Hier Name von Workbook2 einfügen
Sub Datum_vergleichen()
Dim AC As Range, Datum As Date
Dim WB2Tb As Object, lz As Long
Set WB2Tb = Workbook(Wb2N).Worksheets("Tabelle1")
'alte Innenfarbe in Workbook2, Spalte L löschen
WB2Tb.Columns("L").Interior.ColorIndex = xlNone
'Datum der Tabelle in diesem Workbook
'vergleichen mit Tabelle1 in Workbook2
With ThisWorkbook.Worksheets("Tabelle1")
lz = .Cells(Rows.Count, "FM").End(xlUp).Row
'Schleife f+r alle Daten in ThisWorkbook
For Each AC In .Range("FM2:FM" & lz)
'Datum aus Worbook2 Spalte K laden
Datum = WB2Tb.Cells(AC.Row, "K")
'wenn Datum > dann Zelle L Rot färben
If Datum > CDate(AC) Then
WB2Tb.Cells(AC.Row, "L").Interior.ColorIndex = 3
End If
Next AC
End With
End Sub

@ Piet

23.06.2017 04:18:34

Bernd

Hi,
stimmt nicht, ich habe ihm eine Lösung bzgl. der URL gegeben!
MfG Bernd

Beliebteste Forumthreads (12 Monate)

Forumthread: Spalten vergleichen

10 Beiträge zum Forumthread Beiträge zu diesem Forumthread

VBA Beispiele zu diesem und ähnlichen Themen

Beliebteste Forumthreads (12 Monate)

10
Beiträge zum Forumthread

Beiträge zu diesem Forumthread