So extrahieren, ändern und ersetzen Sie Daten?

Question

Vielleicht habe ich die falsche Wendung verwendet, um zu suchen, aber ich konnte keine Lösung für die folgende Herausforderung für Excel/VBA finden:

In Sheet 1 habe ich eine Datenbank der Bestelldaten von Zellen A1 bis F10. Jede Zeile enthält Daten für eine Bestellung. Spalte A enthält die Bestellnummer.

Als erster Schritt I, in Blatt 2, wollen eine Suche auf der Bestellnummer machen und alle Daten für diesen Auftrag in Zellen A5 bis F5 abrufen in Blatt 2

Nachdem die Daten überprüft (und eine anderen Laufe Makro, um den Verkaufspreis neu zu berechnen) Ich möchte, dass die überarbeiteten Daten die ursprünglichen Daten in Blatt 1 ersetzen.

Kann mir jemand dabei helfen?

Vielen Dank im Voraus!

Answer 1

Der 1. Teil benötigt kein Makro. vlookup (fkeres magyarul) ist deine Funktion. Wenn Sie diese Funktion in A5-F5 Felder in Blatt 2, nach einer gegebenen Bestellnummer, in Sheet1 $ A $ 1: $ F $ 10, die Eingabe der erforderlichen Spalte Nummer, Frage genaue Übereinstimmung (FALSE), es funktioniert gut. Ich habe die Funktionsparameter in meinem vorherigen Satz eingegeben.

Der zweite Teil benötigt ein Makro, das Copy Paste zurücksetzt.

ODER

Suchen Sie die Zeile angefordert, um in sheet2 A5 Zelle mit MATCH (HOL.VAN magyarul) Funktion, wie = MATCH (A1; Sheet1! A1: A10; 0) und INDIREKTE setzen (Indirekt magyarul) Funktion, wie = INDIREKT ("Sheet1! B" &A5; TRUE) in B5 usw.

die Copy-Paste in diesem Fall zurück Makro (ab Sheet2):

Myorder = Range("A5").Value 
Range("B5:F5").Select ' A5 is the row number of order, not the order No 
Selection.Copy 
Application.Goto Reference:=Worksheets("Munka1").Range("A" & Myorder) 
ActiveSheet.Paste 

... oder sehr ähnlich