懒人办公插件(按键精灵)

想要更加的方便办公，懒人办公插件可以让你办公事半功倍，是一款标准COM插件，为了方便办公而制作的，支持OFFICE和Wps的各种功能，有需要的用户，为大家提供了懒人办公插件下载。

功能介绍

1、[EXCEL部分]
打开/关闭EXCEL
数据处理
标签页操作
全表操作
区域操作
单元格操作
行操作
列操作
表格设置
图片操作
宏操作
保存表格
其他便捷功能

2、[WORD部分]
打开/关闭WORD
WORD文本读写
光标操作
从当前光标处按下快捷键键
表格操作
图片操作
宏操作
保存文档
文档设置
其他便捷功能

3、[Access部分]
打开/关闭数据库、数据表
获取数据库所有表名
数据表改名、删除、增加
字段改名、删除、增加
获取数据表所有数据，可直接用EXCEL操作命令区域写入
获取、查找某字段所有数据
获取数据表总记录数
记录增加、删除、修改、获取
游标位置（当前操作位置）定位、移动
数据库执行SQL语句

注册方法

在按键精灵中使用时，启动主程序编写脚本时程序将自动加载目录中所有插件，因此建议直接将本插件放入按键精灵安装目录下的Plugin文件夹内，无需再自己注册插件。运行按键精灵，即可在插件命令中找到本插件，选择命令，在下方帮助框内将看到对应命令说明。编写脚本时，用按键精灵调用插件的语法直接插入插件命令，或者通过创建对象调用插件均可。
其他语言的注册参照各语言中使用COM插件的语法。

以下简要提供三种注册方法:

1、regsvr32 注册：
VBS语法下，LazyOffice.dll放在c:\test目录，可使用以下代码对插件进行注册：
Set ws = CreateObject("Wscript.Shell")
ws.run "regsvr32 ""c:\test\LazyOffice.dll"" /s"

2、通过写注册表注册：
VBS语法下，以LazyOffice.dll放在c:\test目录为例，可使用以下代码写注册表完成注册,此种方式一般不会弹出乱七八糟的提示：
Dim ws, DLLPath
DLLPath = "c:\test\LazyOffice.dll"
Set ws = CreateObject("wscript.shell")
ws.run "reg add ""HKEY_CLASSES_ROOT\Lazy.LxjExcel\Clsid"" /ve /d ""{A3A988D7-8A39-4505-83B9-9E31CCB7CB16}"" /f", 0
ws.run "reg add ""HKEY_CLASSES_ROOT\Lazy.LxjWord\Clsid"" /ve /d ""{ABB8CE32-77EE-4E4F-BB0E-DBC9568B8F00}"" /f", 0
ws.run "reg add ""HKEY_CLASSES_ROOT\Lazy.LxjAccess\Clsid"" /ve /d ""{8316739A-192A-475F-B734-32AD9460CC27}"" /f", 0
ws.run "reg add ""HKEY_CLASSES_ROOT\CLSID\{A3A988D7-8A39-4505-83B9-9E31CCB7CB16}\InprocServer32"" /ve /d " & DLLPath & " /f", 0
ws.run "reg add ""HKEY_CLASSES_ROOT\CLSID\{ABB8CE32-77EE-4E4F-BB0E-DBC9568B8F00}\InprocServer32"" /ve /d " & DLLPath & " /f", 0
ws.run "reg add ""HKEY_CLASSES_ROOT\CLSID\{8316739A-192A-475F-B734-32AD9460CC27}\InprocServer32"" /ve /d " & DLLPath & " /f", 0
MsgBox "注册完毕!"
或者自行使用其他代码将指定内容写入注册表对应位置。

3、手动注册：
以LazyOffice.dll放在c:\test目录为例，开始菜单->运行->cmd 命令提示符下，输入cd c:\test，再输入 regsvr32 LazyOffice.dll 即可，这样会提示插件已经注册到系统中。(或者直接 开始菜单->运行->输入regsvr32 c:\test\LazyOffice.dll)

使用方法

插件使用前需要注册，具体方法见上部分注册方法。
然后使用下面代码创建对象：
Dim LazyExcel,LazyWord,LazyAccess
Set LazyExcel= CreateObject("Lazy.LxjExcel")
Set LazyWord= CreateObject("Lazy.LxjWord")
Set LazyAccess= CreateObject("Lazy.LxjAccess")
或者 工程-引用-LazyOffice By QQ:215537937，然后声明新对象：
Dim LazyExcel As New Lazy.LxjExcel
Dim LazyWord As New Lazy.LxjWord
Dim LazyAccess As New Lazy.LxjAccess
完成准备工作，即可开始使用：
path = "c:\测试.xls"
Index = LazyExcel.ExcelOpen(path,1)
示例代码中将不再包括注册部分。

软件推荐

懒人办公插件支持多种语言调用，而且还支持多文件同时操作，喜欢的方便，有需要的用户欢迎下载使用。