Excel打开就出现请检查文件名的拼写,并检查文件位置是否正确。如果你正试图从“文件”菜单上最近使用的

Excel打开就出现请检查文件名的拼写,并检查文件位置是否正确。如果你正试图从“文件”菜单上最近使用的,第1张

解决的具体步骤如下:

1、这里以win7系统为例,首先在电脑的开始页面点如凯击圆橡迟【控制面板】。

2、进入到控制面橘李板页面以后,然后点击【程序与功能】。

3、在程序中找到Microsoft Office软件,然后鼠标右击并且点击【更改】。

4、最后在d出来的页面,点击【修复】与继续,然后系统就会自动修复Microsoft Office软件了。

软件设置已经出现了错误,可以将其进行修复,修复后会恢复为刚安装时的状态,各项设置也会恢复。

工具:电脑。

1、点击电脑桌面左下角的并搭开始图标。

2、埋蔽者点击菜单右边的控制面板。

3、在当前界面点击列表下方的程序。

4、点击界面左上角的程序和功能。

5、在列表中选中office软件,弯薯点击鼠标右键选择上面的更改。

6、使用鼠标左键选中修复。

7、等待几分钟即可自动修复完成。

以下VBA代码将尝试以读写方式打开同一路径下的test.xls,如果结果Excel以“只读”方式打开该文件,则认为该文件正在被使用,附件可下载参考:

Sub testExcel()

Dim EApp As Object, WB As Workbook

Set EApp = CreateObject("Excel.Application")

EApp.Visible = True

On Error GoTo FileNotExist

Set WB = EApp.Workbooks.Open( _

    Filename:=ThisWorkbook.Path & "\test.xls", _

    IgnoreReadOnlyRecommended:=True, _

    Notify:=True)

On Error GoTo 0

If InStr(EApp.Caption, "只读") > 0 Then

    MsgBox "test.xls 正在使用"

Else

    MsgBox "test.xls 未使用"

End If

GoTo CloseEnv

FileNotExist:

    MsgBox "test.xls不存在"

CloseEnv:

    WB.Close: EApp.Quit

End Sub


欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/tougao/12143059.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-05-21
下一篇 2023-05-21

发表评论

登录后才能评论

评论列表(0条)

保存