Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Daten aus anderer Datei abgleichen
11.01.2018 11:55:04
René
Hallo zusammen,
und zwar geht es um folgendes:
MeineDatei = Dort steht die Seriennummer in E22:E9999 der jeweiligen Maschinen
in meiner Datei soll dann eben in G22:G9999 zur jeweiligen Maschine ein Nein eingetragen werden wenn diese in Datei_zum_ablgiech im Tabellenblatt Delivered 2017, Deliviered 2018 usw. später mal gefunden werden dort stehen die Seriennummern in der Spalte F2:F9999 welche ja mit meiner E verglichen werden sollte ob da die Seriennummer auch vorhanden ist.
Anbei ein link zu den zwei demo Dateien. Leider zu groß für einen upload hier, habe sie auf meinen Webserver gelegt:
http://download.eg-multigaming.de/Test.zip
Dieser Code funktioniert nicht so wie es sollte :(
Sub JaNein()
Dim TB, Pfad As String, Datei As String, Jahr As Integer
Dim Blatt As String, Ext As String, RNG As Range
'Anpassen
Set TB = ThisWorkbook.Sheets("Tabelle1")
Pfad = "X:\Temp\Test\" ' mit \ am Ende
Datei = "Datei2.xlsx"
Jahr = InputBox("welches Jahr", "Delivered im Jahr", Year(Date))
Blatt = "Delivered " & Jahr
Set RNG = TB.Range("G22:G999")
'Anpassen Ende
On Error Resume Next ' wenn Blatt fehlt
'Formel setzen
RNG.FormulaR1C1 = _
"=IF(RC[-2]"""",IF(ISNUMBER(MATCH(RC[-2],'" & Pfad & _
"[" & Datei & "]" & Blatt & "'!C6,0)),""Nein"",""Ja""),"""")"
'Formel in Werte
RNG.Value = RNG.Value
End Sub

Grüße René

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: keine Zip, kein filehoster owT
11.01.2018 12:21:36
JustForFun
AW: keine Zip, kein filehoster owT
15.01.2018 09:00:15
René
Hallo,
es ist kein Filehoster es ist mein eigener Server.
Leider ist meine Excel Datei zu groß um sie hier direkt hochzuladen.
Anzeige

327 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige