Excel-Vlook与导入的数据

Question

In an Excel work book I have 2 tabs. 1 has imported data from another workbook. The other I am attempting to do a vlookup, to fill in some cells based on the data in the first workbook. However, the vlook up is not working, until I look at the imported data, select the cell and hit enter. The data in the first worksheet will update and change according to the workbook it references. Is there a way of making the v-look up work without manually hitting enter on the referred cells?

My Vlook up function is:

VLOOKUP(B4,CAPA!A:AU,3,FALSE)

To confirm - calculation in formulas is set to automatic.

With the additional requirement to implement 5 seconds after opening the document? I have added Private Sub Workbook_Open(), Application.OnTime Now + TimeValue("00:00:10"), "test" End Sub

However on running the code, an error displays stating the macro does not exist or macros have been disabled (to confirm macros are enabled and trusted)

Many thanks

Answer 1

Right, you might need to convert the imported data from text to columns. Bit of a shot in the dark, but if that's the case, replace the rngTargetCols below as relevant and this should work -

Sub test()

    Dim rngTargetCols As Range
    Set rngTargetCols = Sheets("sheet1").Range("A:AU")
    Dim intIndex As Integer

    For intIndex = 1 To rngTargetCols.Columns.Count
        On Error Resume Next
        TextToColumnsFix rngTargetCols.Columns(intIndex)
        On Error GoTo 0
    Next

End Sub

Sub TextToColumnsFix(r As Range)

    With r
        .TextToColumns Destination:=.Worksheet.Cells(1, .Column), DataType:=xlDelimited, _
            TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=True, _
            Semicolon:=False, Comma:=False, Space:=False, Other:=False, FieldInfo _
            :=Array(1, 1), TrailingMinusNumbers:=True
    End With

End Sub