Excel VBA 2016-多个工作簿之间的交叉引用

时间:2018-10-13 23:09:42

标签: excel excel-vba excel-2016

当我在StackOverflow上提问时,除了成功我什么都没有,所以我还有一个,

我在“ Main”工作簿的单元格A54中有一个字符串,我想将其交叉引用到其他“ .CSV”文件中的“ 1”,“ 2”和“ 3”,以查看该字符串是否已存在于这些文件中文件。我希望它循环播放,以便它创建一个新字符串,直到在其他任何CSV文件中都不存在为止。我正在考虑的基本语法如下:

'1.csv, 2.csv and 3.csv are already open, and Main.xlsm is currently active

Do Until Workbooks("1.csv").Application.WorksheetFunction.VLookup(Workbooks("Main.xlsm").Range("A54").Value, Workbooks("1.csv").Range("B:B"), 1, False) = False And _
        Workbooks("2.csv").Application.WorksheetFunction.VLookup(Workbooks("Main.xlsm").Range("A54").Value, Workbooks("2.csv").Range("B:B"), 1, False) = False And _
        Workbooks("3.csv").Application.WorksheetFunction.VLookup(Workbooks("Main.xlsm").Range("A54").Value, Workbooks("1.csv").Range("B:B"), 1, False) = False

        Range("J2").ClearContents # Basically like pressing F9 to randomize the formulas I have in the workbooks

        Loop

“ ClearContents”是在工作簿中生成一个新字符串的过程,这很简单,但是此语法不起作用,而且我对如何在多个工作簿中工作不太熟悉。

关于如何交叉引用一个工作簿中的字符串以查看其他3个已打开的CSV文件中是否存在字符串的想法?非常感谢!

0 个答案:

没有答案