File 服务器上关闭文件中的变量vlookup VBA

我一直在寻找一段时间，现在无法找到一个工作的解决方案，为我的确切情况

    VLOOKUP(Data!B4,'\\server\Log\[file - 2013.xls]1206'!$B:$F,3,FALSE)

此函数用于查找单元格中已关闭文件中的信息，但希望将工作表“1206”变为日期代码MMDD。也许让文件也变了，还不确定

我的目标是：创建一个查找功能，从服务器上搜索一个已关闭文件中的多个文件，并告诉我它在哪个页面上找到了这个单词

    datecode = "1206"
    :find
    If "VLOOKUP(Data!B4,'\\server\Log\[file - 2013.xls]" & datecode & "'!$B:$F,3,FALSE)" > 0
    'Is NOT an ERROR
    MsgBox datecode
    else
    datecode = (datecode + 1)
    Goto find 
    End if

我遇到了一些问题： “”在正确的时间出错或出现/未出现 '在文件名开始处出错

我对VBA非常陌生，不完全理解字符串、Dim、公式1C1和我的公式 想要学习一个我可以使用和编辑/理解的代码。 谢谢你抽出时间。

---

在

上也有人问我这个问题，我不是100%确定你们想要实现什么

如果您是VBA新手，我假设您希望模仿某些excel行为，并使用公式来确定是否存在某些内容。如果是这种情况，我建议您将公式生成到单元格中，因为VBA本身不是为计算公式而设计的（即使您有计算或模块工作表函数之类的方法）。这将类似于：

datecode = "1206"
find:
with Thisworkbook.Sheets("TestSheet").Cells(1,1)
    .Formula = "=VLOOKUP(Data!B4,'\\server\Log\[file - 2013.xls]" & datecode & "'!$B:$F,3,FALSE)" > 0
    If Vba.IsError(.Value) then
        datecode = (datecode + 1)
        Goto find 
    End If
end with

---

试试看。这不是最好的解决方案，但至少应该有效…

因为OP希望从服务器在一个关闭的文件中搜索多个文件*