Office的VBA或WPS的JS编程实用命令

Office的VBA或WPS的JS编程教程，网上一大堆，都讲的不错，许多课程都是比较系统的从最基础的变量讲起，如果是专业学习，应该是不错的；但许多人用VDA/JS都是临时需要，并不是想成为专家；学习最初的动机是兴趣、目的，所以系统的学习并不适合他们；今天我们就从实用主义触发，来聊聊WPS的JS；希望能让临时起意的网友陷入，而不能自拔。

1. 打开文档

let wb1= Workbooks.Open(“C:\\test.xls”);

Let 定义了一个变量:wb1;

Workbooks.Open打开文件“C:\\test.xls”,并将该文件的权柄赋值给变量wb1;

后面就可以通过wb1来控制、检索这个文件了；

2. 读取页面

wb1.Sheets.Item("main").Cells.Item(1,1).Value2

wb1是打开文件的控制权柄，可以控制这个文件里面的所有元素；

main是文件夹里面的一个页面（sheet）名称；

(1,1)是main页面的单元格（行、列），这个Range定位比较方便；

Value2是内容属性，就是单元格的内容值；

3. 读写单元格

wb1.Cells.Item(1,1).Interior.Color=53407;

修改单元格的背景颜色

wb1.Sheets.Item("main").Cells.Item(1,1).Value2=555;

给单元格写入”555”

Let str=wb1.Sheets.Item("main").Cells.Item(1,1).Value2;

读单元格内容给变量str，让变量str=555;

可以用MsgBox(str) 或 alert(str) 显示str值;

4. 文件存档

wb1.Close();

文件打开读完了，最后用这个命令关闭；

wb1.Save();

如果写入内容，先要存档，当然系统也会提示你存档；

5. 如果你是操纵目前打开的页面，那就更简单了

ActiveSheet.Cells.Item(1,1).Value2=555;

ActiveSheet.Cells.Item(1,1).Interior.Color=53407;

6. 再学几个语句命令

if (rng1==55) {ActiveSheet.Cells.Item(1,1).Interior.Color=53407;}

当rng1=55时，改变单元格的背景颜色

for(let i=1;i<=30;i++){MsgBox(str);}

通过对话显示框，显示30次str的值；

学会上面的语句，基本上就可以完成一些基本自动话功能了，其他的需要时再临时学习，现在给说了，可能也很快忘记了，还是等用的时候再查、学更有用。

代码举例1

代码举例2