Excel 如何判断一个excel 文件是否打开

1、直接法。

直接打开文件，羡物如果已经打开，文件会提示已打开。如下：

2、大多数情况下可能会用到VBA判定，使用更普遍。

ALT+F11

增加如下代码

运行即可

本例中设定其名称兄辩液灶锋为"aaa.xlsx"，可根据实际情况作以更改。

Sub a()

Dim myWork As Workbook

For Each myWork In Application.Workbooks

 

If myWork.Name = "aaab.xlsx" Then

MsgBox "aaa.xlsx" & "已打开"

Exit Sub

End If

 

Next

MsgBox "aaa.xlsx" & "未打开"

End Sub

try

{

File.Move("文件慎孝路径", "文件路径")

/宽梁稿/走渣吵到下面没报错就是未打开

}

catch (Exception)

{

//这里是抛异常了，证明已经在开了

}

用_access函数判断，再次打开时的情况要看你第一次的打开方式侍槐核了，如果上次用的是非独占打开，那没问题，如果是独占打开，会老掘打开失败

Example

/* ACCESS.C: This example uses _access to check the

* file named "ACCESS.C" to see if it exists and if

* writing is allowed.

*/

#include <io.h>

#include <stdio.h>

#include <明孙stdlib.h>

void main( void )

{

/* Check for existence */

if( (_access( "ACCESS.C", 0 )) != -1 )

{

printf( "File ACCESS.C exists\n" )

/* Check for write permission */

if( (_access( "ACCESS.C", 2 )) != -1 )

printf( "File ACCESS.C has write permission\n" )

}

}

---