通過VBA

Question

這似乎是一個簡單的項目選擇從表中特定的值 - 但我無法找到任何東西（可能是腦細胞不能正常觸發）

我有一個Excel工作表與裏面有一張桌子，裏面有桌子。表名是Parms。它有兩列'鑰匙'和'價值'。我想要做什麼提供了一個關鍵，並獲得相應的價值。如果桌子上有鑰匙：阿爾法，布拉沃，查理和相應的值是10,25和75.我要求布拉沃=我想回到25。

可能看起來像：

X = oSht.ListObjects（ 「參數」）範圍（ 「[ '布拉沃'，[值]]」）值

任何想法將不勝感激。 。

Answer 1

我可以想到兩種可能的解決方案。第一：

假設密鑰是A列中，行1到6中，值在列B，關鍵，我們尋找在C2，那麼這應該做的伎倆：

=IF(IFERROR(MATCH(C2;A1:A6;0);0);OFFSET(A1;MATCH(C2;A1:A6;0)-1;1;1;1);"") 

其次，代碼解決方案：

Option Explicit 

Sub Test() 
Dim i, j As Integer 
Dim key As String 
Dim answer As Integer 
Dim ws As Worksheet 

Set ws = ActiveWorkbook.ActiveSheet 
key = "Bravo" 

For i = 1 To ws.UsedRange.Rows.Count - 1 
    If ws.Cells(i, 1).Value = key Then 
     answer = ws.Cells(i, 2).Value 
     Exit For 
    End If 
Next i 

End Sub