如何提取,更改和替换数据?

时间:2016-06-06 07:19:37

标签: excel vba replace macros data-retrieval

也许我使用了错误的词组进行搜索,但我无法找到以下Excel / VBA挑战的解决方案:

在Sheet 1中,我有一个从单元格A1到F10的订单数据数据库。每行包含一个订单的数据。 A列包含订单号。

作为第一步,在表2中,希望搜索订单号并将该订单的所有数据检索到表2中的单元格A5到F5。

在审核数据(并运行另一个宏以重新计算销售价格)后,我希望修改后的数据替换第1页中的原始数据。

任何人都可以帮我吗?

提前谢谢!

1 个答案:

答案 0 :(得分:0)

第一部分不需要宏。 vlookup(fkeres magyarul)是你的功能。如果您将此功能放在表2中的A5-F5字段中,查找给定的订单号,在Sheet1 $ A $ 1:$ F $ 10中输入所需的列号,询问完全匹配(FALSE),它可以很好地工作。我在上一句中输入了函数参数。

第二部分需要宏来复制粘贴。

OR

使用MATCH(HOL.VAN magyarul)函数在sheet2 A5单元格中查找请求的订单行,如= MATCH(A1; Sheet1!A1:A10; 0) 并在B5中输入INDIRECT(INDIREKT magyarul)函数,如= INDIRECT(“Sheet1!B”& A5; TRUE)

在这种情况下,Copy-Paste后退宏是(从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

......或非常相似