vba 怎样判断文件夹是否打开

如题所述

试试下面的代码:

For Each Wb In WorkBooks
    If Wb.Name="ABC.xls" Then  '如果存在,表示已经打开   
   Else'不存在,表示没有打开,则可以用WorkBook.Open打开此文件
      Set Wb1=Workbooks.Open "C:\ABC.xls"
   End If
    '打开后执行的操作语句
Next

温馨提示:答案为网友推荐,仅供参考
第1个回答  2017-08-08
if dir(dPath,vbDirectory)<>"" then msgbox "存在" end if

相关了解……

你可能感兴趣的内容

本站内容来自于网友发表,不代表本站立场,仅表示其个人看法,不对其真实性、正确性、有效性作任何的担保
相关事宜请发邮件给我们
© 非常风气网