Question

我有以下VBA代码：

mainFile = ActiveWorkbook.Name
'select all excel files in this folder
fname = Dir(FPath & "\*.xls")

'go through all excel files in this folder
Do While fname <> ""
    If (fname <> mainFile & fname <> uploadFile) Then
        Debug.Print (mainFile & ":" & uploadFile & ":" & fname)

出于某种原因，fname＆lt;＆gt; mainFile没有阻止它进入循环，我从Debug.Print语句中得到以下内容： functions.xls：UPLOADME.xls：functions.xls

然后代码就停止执行......没有错误......什么都没有（我在循环之后有一个Debug.Print被忽略了一切）

我没有正确比较它们吗？

Answer 1

应该是：fname <> mainFile And fname <> uploadFile

在VBA中，&运算符用于连接字符串，而不是执行逻辑AND ...＆＃34;和＆＃34;是我正在寻找的运营商。

使用逻辑AND比较两个文件名

1 个答案: