Imansible get la function VLookup per funzionare

Ho due cartelle di lavoro: quella con la macro e quella con i dati. Cerco di cercare un valore nella cartella di lavoro con i dati, ma non funziona. Dopo che il codice viene raggiunto con VLookup esso si ferma e tutto non viene eseguito.

Ho controllato tutte le cose che posso pensare ma non riesco a trovare una radice di errore. Ho controllato se una cella random dalla cartella di dati può essere raggiunta: MsgBox (budgetWorkbook.Sheets("sheet 1").Range("E16").Value) , funziona bene.

  • Excel 'Dimenticato di albind l'allegato' VBA non funziona più
  • In Eclipse, posso fare l'opzione Open With In-Place Editor l'opzione predefinita?
  • trovare una string in una colonna e sostituire con un text diverso
  • Excel - Come contare il numero di righe nell'intervallo (cioè diverse colonne) che contengono una certa string?
  • Ricerca macro in un intervallo di celle
  • Esportre i dati in excel da java
  • Ho controllato se il mio valore di ricerca è uguale al valore corrispondente nella colonna A della cartella di lavoro dei dati, funziona – è msgboxes "Equals".

      Dim i As Integer Dim budgetItemSheetName As String i = 1 Dim budgetItemValue As Long MsgBox (budgetWorkbook.Sheets("sheet 1").Range("E16").Value) 'shows up If budgetItemNames(i) = budgetWorkbook.Sheets("sheet 1".Range("A16").Value) Then MsgBox("Equals") 'shows up End If budgetItemValue = Application.VLookup(budgetItemNames(i), _ budgetWorkbook.Sheets("sheet 1").Range("A:B"), _ 2, False) 'fails, but it should find the search value in A16 cell and give B16 cell's value resultArray(i) = budgetItemValue 'doesn't work MsgBox (budgetItemValue) 'doesn't show up 

    Qualcuno può dirmi che cosa sto facendo male qui?

    EDIT : Sembra che VLookup abbastanza succhia. Dovrà usare la function di ricerca personalizzata. VLookup dovrebbero bruciare nell'inferno.

  • Programma VBA per l'applicazione GIS
  • Come modificare il codice per Excel 2007 per utilizzare SaveAs
  • Argomento non facoltativo
  • Riferimento della cella in un altro foglio di lavoro
  • Ricerca / Trova intestazioni di row e colonna in base alla gamma di dati selezionata in vba
  • Deselect un intervallo
  • One Solution collect form web for “Imansible get la function VLookup per funzionare”

    Appena fatto un piccolo test con una piccola tabella di ricerca, Colonna A e Colonna B e il valore di ricerca in Cell D1:

     Public Sub TestVLookup() Dim wb As Workbook Dim rng As Range Set wb = Application.ThisWorkbook Set sht = Application.Sheets("Tabelle1") budgetItemValue = Application.VLookup(Cells.Range("D1"), sht.Range("A1:B5"), 2, False) Debug.Print "The Result is " & budgetItemValue End Sub 
    Microsoft Office Excel Spreadsheet è il miglior software di Office, Excel VBA e formule Excel rendono il foglio di calcolo più veloce.