使用多個條件與VLOOKUP

-4

   TYPE A   
VARIABLES A1 A2 A3 
VAR 1   
VAR 2   
VAR 3   
VAR 4 


       TYPEB  
VARIABLES A1 A2 A3 
VAR 1     
VAR 3   
VAR 4

我想創建一個VBA代碼，以便將VLOOKUP和按以下格式填充數據：

   TYPE A  TYPE B 
VARIABLES A1 A2 A3 A1 A3 
VAR 1     
VAR 2     
VAR 3     
VAR 4

我可以使用具有單一標準的vlookup vba代碼並填充表格。但是我們能否擁有可以用多種標準來完成的代碼。

我試圖爲每個表格執行以下代碼。但是這很麻煩，因爲我必須爲每個表格修改代碼。如果表的數量很大，那麼它非常麻煩。我試圖看看互聯網上是否有任何例子，但不幸的是沒有得到任何例子。

Sub VlookUpExample() 

Dim rw As Long 
For rw = 2 To 4 
    Sheets("Sheet2").Cells(rw, 2) = Application.VLookup(Sheets("Sheet2").Cells(rw, 1), _ 
    Sheets("Pivot").Columns("B:I"), 2, False) 
    Sheets("Sheet2").Cells(rw, 3) = Application.VLookup(Sheets("Sheet2").Cells(rw, 1), _ 
    Sheets("Pivot").Columns("B:I"), 3, False) 
    Sheets("Sheet2").Cells(rw, 4) = Application.VLookup(Sheets("Sheet2").Cells(rw, 1), _ 
    Sheets("Pivot").Columns("B:I"), 4, False) 

Next 
End Sub

謝謝。

來源

2013-08-04 Beta

我讀到與索引匹配，我可以做這種工作。但沒有得到任何VBA代碼索引匹配的例子。如果有人能給我一個很好的參考。 – Beta

您可以使用簡單的「if then」來制定許多標準。如果您想添加其他條件，只需在「其他」下面輸入「if then」。

If *some condition* Then 
    *do something* 

    Else 
    *do something else* 

End If

來源

2013-08-05 07:19:33 lowak

謝謝Iowak！我會嘗試你的提示。 – Beta

使用多個條件與VLOOKUP

回答

相關問題