= if error(VLOOKUP(A 11，A$1:C$7，3，0)，"")
如果用VBA電碼求解:
Sub DctFind()
Dim d作賓語，arr，brr，i & amp
set d = CreateObject(" scripting . dictionary ")
d.CompareMode = vbTextCompare
-
Load:數據源加載數組arr，查詢區域數據加載數組brr，遍歷數組arr，arr，UBound(arr)表示數組arr的最大行數。將學號作為鍵，將姓名作為條目加載到字典中。
arr = [a1:c7]
brr = [e1:f5]
對於i = 1到UBound(arr)
d(arr(i，1))，arr(i，3)
然後
-
遍歷:標題行不需要查詢，查詢值brr從第二行開始遍歷。如果字典中有測試號，則根據測試號從字典中獲取值。如果字典中不存在相關的測試號，則該值返回為空。
對於i = 2至下界(brr)
如果d .存在(brr(i，1))，則
brr(i，2) = d(brr(i，1))
其他
brr(i，2) = " "
如果…就會結束
然後
-
Write:設置文本格式避免壹些文本數值變形，將結果數組寫入單元格區域釋放字典。
使用[e1:f5]
。NumberFormat = "@ "
。價值= brr
以…結尾
MsgBox "查詢完成。"
設置d =無
' ' -
末端接頭
登錄後復制
小貼士:
1 & gt；此代碼區分大小寫，即當a和a用作查詢值時，它們不相等。如果需要區分大小寫，請取消代碼中以下語句的註釋。