2017-10-12 56 views
1

我在空白单元格上查找功能时遇到问题。仅在空白单元格上查找宏查询

我有2列A和B B是列我将适用VLOOKUP上,并与“查找值”列中的内容

表阵列范围为d2:E7

我的宏:

Sub a() 
    Dim x As Range 
    Set x = Range("b2:b7").SpecialCells(xlCellTypeBlanks) 
    x = Application.VLookup(Range("a2:a7"), Range("d2:e7"), 2, False) 
End Sub 

我试着运行这段代码很多次,但总是出错。你们能帮我吗?

Screenshot: Sample Data

+0

有你的一列的区域没有空格。所有显示的值都具有匹配的查找值。奇怪的是,你有'e'作为许多不同查找值的返回值。 – QHarr

+0

你不能像这样做数组类型的公式。或者遍历范围并逐个放入值,或者在@QHarr中显示公式。 –

+0

嗨@ScottCraner,你可以告诉我如何遍历范围,我试过类似“为每一个下一个”,但结果并不漂亮 –

回答

0

您是否仅仅意味着

Sub a() 
     ActiveSheet.Range("B2:B7").FormulaR1C1 = "=VLOOKUP(RC[-1],R2C4:R7C5,2,FALSE)" 
End Sub 
+0

谢谢QHarr,但你可以使用vba vlookup应用程序 –