ActiveDocument.Path返回的是一个空字符串。
创始人
2024-07-24 07:01:30
0

当ActiveDocument.Path返回一个空字符串时,可能是因为文档尚未保存或已经被另存为未命名的文件。在这种情况下,可以使用以下代码来获取文件的路径:

Dim filePath As String

If ActiveDocument.Path = "" Then
    ' 如果文档路径为空,则需要进行保存操作
    ActiveDocument.Save
    filePath = ActiveDocument.Path
Else
    ' 如果文档路径不为空,则直接获取路径
    filePath = ActiveDocument.Path
End If

MsgBox "文件路径:" & filePath

上述代码首先检查ActiveDocument.Path是否为空。如果为空,则使用ActiveDocument.Save保存文档,并将路径赋值给filePath变量。如果ActiveDocument.Path不为空,则直接将路径赋值给filePath变量。

最后,通过MsgBox显示文件路径。这样就可以确保获取到正确的文件路径。

相关内容

热门资讯

安装了Anaconda之后找不... 在安装Anaconda后,如果找不到Jupyter Notebook,可以尝试以下解决方法:检查环境...
安卓系统怎么连不上carlif... 安卓系统无法连接CarLife的原因及解决方法随着智能手机的普及,CarLife这一车载互联功能为驾...
iwatch怎么连接安卓系统,... 你有没有想过,那款时尚又实用的iWatch,竟然只能和iPhone好上好?别急,今天就来给你揭秘,怎...
oppo手机安卓系统换成苹果系... OPPO手机安卓系统换成苹果系统:现实吗?如何操作?随着智能手机市场的不断发展,用户对于手机系统的需...
安卓平板改windows 系统... 你有没有想过,你的安卓平板电脑是不是也能变身成Windows系统的超级英雄呢?想象在同一个设备上,你...
安卓系统连接耳机模式,蓝牙、有... 亲爱的手机控们,你们有没有遇到过这种情况:手机突然变成了“耳机模式”,明明耳机没插,声音却只从耳机孔...
iphone系统与安卓系统更新... 最近是不是你也遇到了这样的烦恼?手机更新系统总是失败,急得你团团转。别急,今天就来给你揭秘为什么iP...
避免在粘贴双引号时向VS 20... 在粘贴双引号时向VS 2022添加反斜杠的问题通常是由于编辑器的自动转义功能引起的。为了避免这个问题...
安装安卓应用时出现“Play ... 在安装安卓应用时出现“Play Protect 警告弹窗”的原因是Google Play Prote...
vivo安卓系统取消更新系统,... 亲爱的vivo手机用户们,你们是不是也遇到了这样的烦恼:手机里突然冒出一个更新提示,点开一看,哇,新...