判断指定的WORD文档是否被打开的函数代码如下

Function WordDocIsOpen(ByVal strDocName As String) As Boolean
Dim objWordApp As Object
Dim objWordDoc As Object

On Error Resume Next '此句不能少

strDocName = UCase$(strDocName)
Set objWordApp = GetObject(, "Word.Application")
For Each objWordDoc In objWordApp.Documents
If UCase$(objWordDoc.FullName) = strDocName Then
WordDocIsOpen = True
Exit For
End If
Next
Set objWordDoc = Nothing
Set objWordApp = Nothing
End Function

调用:

Private Sub main()
If WordDocIsOpen("e:/2.doc") Then
MsgBox "该文档已被打开"
Else
MsgBox "该文档未被打开"
End If
End Sub

读者只要稍加留意,可能早已注意到,其实只要把以前代码中的Word.Application改为Excel.Application,就可以判断指定的Excel文档是否被打开了。

摘自:网络整理


VB部分相关文章推荐:


※VB 释放资源文件到指定目录函数

※VB 读取资源文件里面的字符串

※VB中资源文件.res的使用方法详解

※VB6.0中创建和使用文本资源文件

※VB WindowsMediaPlayer 播放

※vb中WindowsMediaPlayer的常用属性和方法

※VB Environ系统环境变量函数大全

※VB 去除文本框粘贴功能

※VB LISTBOX

※VB 删除数组中的重复元素

※VB数组快速排序算法

※关于三个概念:ActiveX、OLE和COM

※VB 获得磁盘的文件系统

※VB中用API实现文件拖放

※加密算法-MD5算法

※VB中使用MD5算法

※VB 全局热键HOOK (不占系统资源版本)

※VB 小技巧自定义TextBox文本框右键菜单

※VB 写下载者代码

※VB 一行代码的诀窍

※VBS教程-wscript对象

※vb枚举进程

※在VB中如何让线程或进程在指定的CPU上运行

※VB判断指定的WORD文档是否被打开

※VB如何读取快捷方式的目标路径

※VB用API控制输入法状态

※为系统加载右键注册控件选项【VB 注册控件】

※VB如何根据窗口标题获得进程名称

※VB快速查找大型文件中包含的字符串

※VB实现可执行文件运行时自删除

※VB 打开txt,bat,jpg 任意后缀程序

※VB 写文件关联程序

※VB 自启动建立右键菜单

※VB 判断IP能否ping通

※VB FTP操作类(可上传、下载、创建文件夹等等)

※VB部分文件汇总B

※Vb 求素数最经典的方法也是最快的方法

※vb用数组方式快速导出MSFlexGrid表格数据到Excel表格中

※VB中MsFlexGrid控件的使用细则

※点击MSFlexGrid数据控件的标题进行数据排序

※VB 获取鼠标坐标

※VB中NEW的用法(申请内存空间)

※VB CreateObject函数

※VB中的New 与 CreateObject的区别

※VB ListBox 添加不重复的值

※VB 单击ListView控件某列表头进行排序

※VB 简单实现简体与繁体互转

※VB 阿拉伯数字转换为中文大写数值函数

※VB 获取Textbox文本框中的行数函数


更多精彩>>>

VB判断指定的WORD文档是否被打开相关推荐

  1. Word控件Spire.Doc 【页眉页脚】教程(1):用C#/VB.NET:在 Word 文档中添加页眉和页脚

    Spire.Doc for .NET是一款专门对 Word 文档进行操作的 .NET 类库.在于帮助开发人员无需安装 Microsoft Word情况下,轻松快捷高效地创建.编辑.转换和打印 Micr ...

  2. Word控件Spire.Doc 【页面背景】教程(9) ;C#/VB.NET:从 Word 文档中删除文本或图像水印

    可以将水印添加到 Word 文档中,以告知其他人文档的所有权或状态.有时,您可能希望删除 Word 文档中的现有水印.本文将演示如何使用Spire.Doc for .NET从 C# 和 VB.NET ...

  3. 判断pdf、word文档、图片等文件类型(格式)、大小的简便方法

    判断pdf.word文档.图片等文件类型(格式).大小的简便方法 很久没发文了,今天有时间就写一下吧. 关于上传文件,通常我们都需要对其进行判断,限制上传的类型,如果是上传图片,我们甚至会把图片转化成 ...

  4. html 去除表格选中状态,表格右边空白怎么去掉 首先选中Word文档,双击打开

    excel表格右边很多空行该怎么删除滚动条变得好细 但是后面都没有内容的 先选中K列,注意是一整列 即点一下列标K 再按下ctrl+shift+键盘上向右的箭头 此时选中了K到最后一列,删除列操作 然 ...

  5. html打开一个存在的word文档,html怎么打开本地的Word文档

    1 回答 2021-03-19 浏览:0 分类:办公入门 回答:1. 有关PDF: PDF(Portable Document Format的简称,意为"便携式文档格式"),是由A ...

  6. office 打开wps乱_为什么word文档用wps打开,格式乱了

    出现乱码的原因如下: 1. 版本不同,往往高版本能打开低版本的,但低版本打开高版本就会出错 2. 文档损坏  解决办法是直接重新下载该文件,再次打开,如果还是乱码则可以排除这种可能: 3. 低版本打开 ...

  7. jacob解决freemaker下载的word文档手机无法打开问题

    java使用freemaker下载word的流程如下: 1.新建一个word模板 2.另存为xml格式 3.将xml后缀的文件后缀改成.ftl 4.将ftl中需要替换的内容使用freemaker js ...

  8. word文档设置了打开密码如何破解

    自己之前设置了打开密码时间久了忘记了,或者在网上下载的word文档有密码,不知道密码没有办法打开该怎么办 ? 如果你想要破解word文件的打开密码,你需要用到解密工具 打开软件,点击进入[找回密码] ...

  9. html实现打开word文档,用javascript打开word文档的方法

    用javascript打开word文档的方法 首先我们新建一个html文件,并且写一个FileUpLoad以及button控件. 代码如下: 复制代码 代码如下: fileUpload 然后,在写一个 ...

最新文章

  1. Filter(过滤器)
  2. Dispatcher与UI线程交互
  3. Excel百万数据导入oracle,excel表数据导入oracle的方法!(超级有用)
  4. CentOS6.5下Nginx1.7.4安装记录
  5. Linux启动重启停止DNS,ubuntu怎么开机停止启动smbd
  6. qt中的update()
  7. 调用非.net系统的Webservice的探索 ( 三 ) -WCF
  8. 启动/关闭数据库、实例及服务
  9. 解决webstorm中vue语法没有提示
  10. java day61【 SpringMVC 的基本概念 、 SpringMVC 的入门 、 请求参数的绑定 、常用注解 】...
  11. opencv数字图像处理(3)- 图像平滑与锐化
  12. 小程序学习笔记(1)-基本了解
  13. 第十篇 requests模块
  14. r语言degseq2_第二次RNA-seq实战总结(3)-用DESeq2进行基因表达差异分析
  15. etf基金代码大全_主要高股息ETF基金汇总
  16. 【第115期】零基础学做游戏制作_搭环境Unity hub
  17. DC-1详解(绝对的详细!)
  18. 项目管理:名词解释、区别联系、案例分析
  19. linux环境下写的C,一元二次方程示例
  20. 异常-Exception

热门文章

  1. 第二届字节跳动夏令营启动全球报名,图灵奖得主授课
  2. 微软将取缔 8 亿 Windows 10 用户的密码!
  3. 滴滴司机毒打投资人;华为回应自研系统;微信回应被删聊天记录可提取 | 一周业界事...
  4. linux进程僵停状态,Linux操作系统中进程的七种状态
  5. weiphp看版本_安装WeiPHP
  6. 怎样取消苹果手机x的静音设置_安卓不仿苹果静音键?千万别小瞧“静音键”, 功能竟如此强悍!...
  7. linux sd卡空间,充分利用树莓派中的SD卡空间
  8. c语言中声明外部函数需要添加的关键字,C语言中声明和定义的区别——分析extern关键词。...
  9. ctk介绍、安装、使用详细说明pdf文档(中文).rar_Minio 安装和使用详解,还有对.net api进行了二次封装...
  10. python重定向反爬虫_高效实用http爬虫代理ip之盘点一些网站的反爬虫机制