如何用excel vba 做到在表2的c1输入代码 e1和i1就出对应名称，就在表1提取数据。

推荐回答

假设“商品名称”就是“规格”。最好还是用VLOOKUP函数：在E2输入 =if(C2="","",VLOOKUP(C2,商品资料!A:B,2,0))在F2输入 =if(C2="","",VLOOKUP(C2,商品资料!A:C,3,0))如果非要用宏自动实现，请右键点工作表”产品输入“（在Sheet3旁边那个），查看代码，粘贴如下代码：Private Sub Worksheet_Change(ByVal Target As Range)On Error GoTo Line1Dim xRng As RangeSet xRng = Sheets("ÉÌÆ·×ÊÁÏ").Range("A2:C9999")If Target.Range("A1").Column = 3 ThenTarget.Range("A1").Offset(0, 2) = WorksheetFunction.VLookup(Target.Range("A1"), xRng, 2, 0)Target.Range("A1").Offset(0, 3) = WorksheetFunction.VLookup(Target.Range("A1"), xRng, 3, 0)End IfLine1: End Sub回到Excel，OK。