我想在没有打开第二个工作簿的情况下比较2个工作簿的版本号(如果可能的话)到目前为止我已经提出了两个想法,但不是它们有效:(
If wb.BuiltinDocumentProperties("document version") = Workbooks("C:\Users\paw\Desktop\Test4\test2.xlsm").BuiltinDocumentProperties("document version") Then
和
Dim fso As Object
Dim strFilename As String
Dim abcd As String
strFilename = "C:\Users\paw\Desktop\Test4\test2.xlsm"
Set fso = CreateObject("Scripting.FileSystemObject")
abcd = fso.GetFileVersion(strFilename)
Debug.Print abcd
Set fso = Nothing
第二个代码只是使用特定路径从文件中提取版本号。
像这样的东西工作得很好btw。但我真的不想要打开第二本工作簿:
If wb.BuiltinDocumentProperties("document version") = Workbooks.Open("C:\Users\paw\Desktop\Test4\test22.xlsm").BuiltinDocumentProperties("document version") Then
请帮忙。