跟我学JavaScript in WPS

冰封气流

支持楼主~~~~~~~

wnwbaa

支持楼主，继续加油！！！

ctp_119

录制JS宏代码并修改

function Macro4()

{

        Range("A1").Select();     //选中单元格A1

        Selection.Formula = "123";       //在选中的单元格中输入123

        Range("A2").Select();      //选中单元格A2

}

注意：JS录制宏，并不是所有动作都可以录制成代码，VBA也如此，但JS更甚！！！

选中单元格区域，按DEL键删除数据录制不到代码，我试过了，用菜单里面的单元格/清除/全部可以录制出代码。

function Macro2()

{

        Range("A7:A9").Select();

        Selection.Clear();        //关键性代码

        Range("E13").Select();

}

VBA与JS表示的方法不同，代码注释也不同//或/*----*/。对象方法后面都要括号，因为JS的过程也是函数，一切都是函数。

function Macro2()     //修改后，选中那里，运行代码，就清除那里！

{

        Selection.Clear();        //保留关键性代码

}

ctp_119

后续，我们将安装这样的结构来学习JS的对象，以及对象的属性和方法

ThisWorkbook.Name    //这个工作簿的名字（只有在加载项的时候才和ActiveWorkbook.Name有区别）

var wb=Workbooks.Add();   //新建工作薄

wb.SaveAs(文件路径+文件名);   //保存工作薄

wb.Close();   //关闭工作薄，如果里面参数是true，保存改变

Workbooks.Open(文件路径+文件名)    //打开文件，注意js中的文件路径的表达

ctp_119

          昨天，我们讲了一下工作薄对象，常用的方法和属性。

          接下来重点讲工作表对象，常规来讲就是对工作表对象方法和属性的学习；
          var shn=ActiveSheet.Name;    //把激活工作表的表明赋值给变量shn
          注意下面的几种表达方式,基本和VBA差不多,学习的时候多比较.
          var shn=Worksheets("Sheet1").Name;
          var shn=Worksheets.Item(1).Name;
          var shn=Worksheets(2).Name;
          var shn=Sheets(2).Name;
          单元格或单元格,列或行操作:
          function test(){
              //        Range("A1").Select()
              //        Cells(1,1).Select()
              //        Range("A1:D5").Select()
              //        Columns("B").Select()
              //        Columns("B:D").Select()
              //        Range("E:E").Select()
              //        Range("C1").EntireColumn.Select()
              //        Range("A:A,C:C").Select()       
              //        Rows("3").Select()
              //        Rows(3).Select()
              //        Range("A3").EntireRow.Select()
              //        Rows("3:7").Select()
                        Range("3:3,5:5").Select()
             }
              单元格读取     
              function test2(){
                     var s=Range("A1").Value();
                     var s1=Range("A1").Value2;
                     var s2=Range("A1").valueOf();
                     var s3=Cells(1,1).Value();
                     var s4=Cells.Item(1,1).Value2;
              }

ctp_119

            单元格区域继续读取：

            var arr=Worksheets("原始数据").Range("A1").CurrentRegion.Value2;
            var arr=Range("A1:E999").Value();
            var arr=Range("A1").Resize(999,5).Value2;
            
            var arr=Range("A1:E"+Range("A65536").End(xlUp).Row).Value();
           注意:Value2与Value()的区别,我测试,在日期字段比较明显.




           坚持更新……请耐心等待，我白天上班，有时间还要学习，有VBA或JS的业务，也要做，赚点小钱！偷空来写帖子，同时也是为了巩固自己自学的成果。

x-xx-xx

已入坑,等大佬继续挖

LIUZHU

ctp_119 发表于 2022-5-21 13:38
单元格区域继续读取：

            var arr=Worksheets("原始数据").Range("A1").CurrentRe ...

请教楼主，VBA或JS怎么接业务？

ctp_119

              大家看过之后，一定要 亲自测试，写代码没有什么窍门，只有亲自测试了，才会加深理解，成为自己的东西！！！才能以不变应万变。不测试，一看都会，一到用处就废了！！！言归正传，继续更新。

              写入工作表中的表达：
              function test(){
                   Range("A1").Value2=123;   //不可以Range("A1").Value=123，因为Value只读
                   Range("A2:C2").Value2=[1,2,3];
                   var arr=[1,2,3]     //一维数组的表示法
                   //下面是数组一次性写入工作表中
                   Range("a3").Resize(1,arr.length).Value2=arr;     //注意Value2不要忘记了
                   Range("a4").Resize(arr.length,1).Value2=WorksheetFunction.Transpose(arr);
              }

gwjkkkkk

学习一下，谢谢楼主分享。。。