Warning: file_get_contents(/data/phpspider/zhask/data//catemap/5/excel/27.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Excel 根据条件将一列替换为另一列_Excel_Excel Formula_Vba - Fatal编程技术网

Excel 根据条件将一列替换为另一列

Excel 根据条件将一列替换为另一列,excel,excel-formula,vba,Excel,Excel Formula,Vba,我想用表1第1列的相应值替换表2第1列中与表1第2列相同的值 SHEET 1 SHEET 2 RESULT SET Col 1 Col 2 Col 1 Col 1 Row 1 A 1 Row 1 1 Row 1 A Row 2 B 2 Row 2 2 Row 2 B Row 3 C 3 Row 3

我想用表1第1列的相应值替换表2第1列中与表1第2列相同的值

SHEET 1             SHEET 2         RESULT SET  
    Col 1   Col 2           Col 1           Col 1
Row 1   A   1       Row 1   1       Row 1   A
Row 2   B   2       Row 2   2       Row 2   B
Row 3   C   3       Row 3   3       Row 3   C
Row 4   D   4       Row 4   4       Row 4   D
Row 5   E   5       Row 5   5       Row 5   E
希望我的问题不是荒谬的
提前感谢`

我使用了宏记录器,然后稍微调整了代码。如果您有不同的行数,这将适应。希望这有帮助!如果不是你的意思,请告诉我

Sub Macro1()
Dim Count As Double

Count = 1

While Range("A" & CStr(Count)) <> ""
    Count = Count + 1
Wend

Sheet1.Range("A1:A" & CStr(Count - 1)).Copy
Sheets("Sheet2").Select
Range("A1").Select
ActiveSheet.Paste

End Sub

你能告诉我们你试过做什么吗?我不确定我完全理解你想做什么,但是你不能用一个简单的vlookup来做这个吗?