怎样可以通过给一个excel单元格赋值(例如:aa),另外一个单元格可以直接引用第三个单元格的值
给你写个简单的自动完成的宏,Excel文件名叫"自动完成.xls", 用宏的好处就是在SHEET2里,不管在什么位置只要你输入SHEET1里要自动完成的代码,就能自动完成填写,不要在SHEET2填写任何公式。
只要你将需要自动完成的内容放在A1附近,不管是横向还是竖向,位置随意,但注意只要保持各个值不要完全被空格隔开就行,如下图
在Sheet2按Alt+F11,按Ctrl+R打开资源管理器,双击Sheet2. 贴上如下代码:
Private Sub Worksheet_Change(ByVal Target As Range)
Cells(Target.Row, Target.Column + 1).Value = ThisWorkbook.Findvalue(Target.Value)
Worksheets("Sheet2").Activate
End Sub
在资源管理器双击ThisWorkbook,贴上如下代码:
Public Function Findvalue(Inputvalue As String) As String
Workbooks("自动完成.xls").Activate
Worksheets("Sheet1").Activate
Range("A1").Activate
For Each C In ActiveCell.CurrentRegion.Cells
If C.Value = Inputvalue Then
Findvalue = Cells(C.Row, C.Column + 1).Value
Exit For
End If
Next
End Function
上面的 Workbooks("自动完成.xls").Activate中的文件名要用你EXCEL的文件名
具体为 SHEET2 B1单元格写公式
=VLOOKUP(A1,Sheet1!A:B,2,FALSE),就可以了
的B10内写公式
=vlookup(A10,sheet1!$A$1:$B$3,2,false)