Habe zwei excel Datein also zwei Arbeitsmappen. In der einen Arbeitsmappe sind die Zahlen 1-200 auf vier spalten verteilt und neben jeder zahl ist eine leere zelle. In der anderen Datei habe ich 200 Zellen mit informationen und auch dort eine leere zelle daneben.
nun möchte ich in der Arbeitsmappe mit den informationen, mir eine information raussuchen und in die leere zelle eine zahl schreiben. diese zahl soll überprüft werden ob sie in der anderen Arbeitsmappe vorkommt, wenn ja soll die information aus Arbeitsmappe 1 in Arbeitsmappe 2 geschrieben werden.neben der zelle wo sich die zahl befindet.
Hoffe das ist möglich und nicht so schwer umzusetzen für mich.
ja verstehe wie sverweis funktioniert. habe eine tabelle mit produkt und preis und kann mit sverweis produkt oder preis rausfinden.
in meinem fall habe ich aber nur eine information. in arbeitsmappe 1 habe ich eine information daneben gebe ich eine zahl ein stimmt die mit der zahl in arbeitsmappe 2 überein . soll die information aus arbeitsmappe 1in arbeitsmappe 2 geschrieben werden. wie kann mann da sverweis einsetzen?
Arbeitmappe 1 gebe ich neben der information die zahl 5 ein. jetzt soll in arbeitsmappe 2 bei der zahl 5 die information aus arbeitsmappe 1 stehen.
22.02.2016, 12:38 (Dieser Beitrag wurde zuletzt bearbeitet: 22.02.2016, 12:38 von Rabe.)
Hi,
(22.02.2016, 12:26)vandevil schrieb: Arbeitmappe 1 gebe ich neben der information die zahl 5 ein. jetzt soll in arbeitsmappe 2 bei der zahl 5 die information aus arbeitsmappe 1 stehen.
indem Du in Tabelle 2 die Formel für SVERWEIS verwendest? Mit der Zahl 5 als Suchbegriff?
Sorry das ich das noch nicht verstehe, damit das bischen verständlicher wird habe ich die datein angehängt und bilder gemacht.
Trage in die blauen Zellen nummern ein.Jetzt soll die information die dort drüber steht, in die andere liste bei der Nummer auftauchen. Beispiel: ich trage in A3 die Zahl 187 ein, nun soll die information aus A2 in die andere Liste in B4 eingetragen werden
25.02.2016, 14:01 (Dieser Beitrag wurde zuletzt bearbeitet: 25.02.2016, 14:01 von snb.)
Code:
Private Sub Worksheet_Change(ByVal Target As Range) If Target.Interior.ColorIndex = Cells(3, 1).Interior.ColorIndex Then Workbooks("Beispiel1.xls").Sheets(1).Cells.Find(Target, , , 1).Offset(, 1) = Target.Offset(-1).Value End Sub