VBA CountIf外部文件

从我以前的问题 ,我现在正在努力创build一个工作Application.CountIf函数。 我正在使用下面的代码来访问该文件为“xl0”:

'DATABASE ACCESS Dim xl0 As New Excel.Application Dim xlw As New Excel.Workbook Dim db_directory As String db_directory = "R:\New Quality Management System\xls\Supplier\Non-Conformance\Supplier Non-Conformance Database.xlsm" Set xlw = xl0.Workbooks.Open(db_directory) 

我可以创build一个function来search相同的打开的文件没有问题…

 Test = Application.CountIf(Range("B:B"), Report_ID) MsgBox (Test) 

…但我已经试过在后台打开的文档中search的方法都没有工作…

 Test = Application.CountIf(xlw.Sheets("SNCR Log").Range("B:B"), Report_ID) 

…和…

 Test = xlw.Sheets("SNCR Log").Application.CountIf(Range("B:B"), Report_ID) 

我错过了什么?

只是一个猜测,没有testing,但作为应用程序指的是你目前的开放式应用程序,你想在xl0应用程序内search尝试

 xl0.CountIf(...) 

看看是否有帮助