ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

搜索
EH技术汇-专业的职场技能充电站 妙哉!函数段子手趣味讲函数 Excel服务器-会Excel,做管理系统 效率神器,一键搞定繁琐工作
HR薪酬管理数字化实战 Excel 2021函数公式学习大典 Excel数据透视表实战秘技 打造核心竞争力的职场宝典
让更多数据处理,一键完成 数据工作者的案头书 免费直播课集锦 ExcelHome出品 - VBA代码宝免费下载
用ChatGPT与VBA一键搞定Excel WPS表格从入门到精通 Excel VBA经典代码实践指南
查看: 2137|回复: 3

[分享] JS宏练习(一个没有接触过JS语言的菜鸟)

[复制链接]

TA的精华主题

TA的得分主题

发表于 2021-11-12 11:29 | 显示全部楼层 |阅读模式
一,JS过程的调用、打开其他表格,在单元格写入内容
  1. function openfile(filepath)
  2. {
  3.        
  4.         let wb=Application.Workbooks.Open(filepath)
  5.         let ws=wb.Worksheets(1)

  6.         ws.Cells(1,1).Value2="数据库"
  7. }
  8. function test()
  9. {
  10.         var filepath="C:/Users/Administrator/Desktop/数据已完成.xlsx"
  11.         openfile(filepath)
  12. }
复制代码
二、把工作表数据装入数组,数组输出
  1. function myarr()
  2. {
  3.     var arr=new Array() //定义一个数组
  4.     arr=Worksheets(2).Range("A1:B12").Value2 //将工作表的数据装入数组,必须加Value2
  5.     for(j=0;j<2;j++)
  6.    {
  7.           for(i=0;i<12;i++)
  8.          {
  9.             Debug.Print(arr[i][j])
  10.          }
  11.     }
  12. }
复制代码
三、字典
  1. function dic()
  2. {
  3.      var d=new Map() //定义一个字典
  4.      d.set("张三",18) //给字典添加key和item
  5.      d.set("李四",19)
  6.      d.set("张三",d.get("张三")+6) //修改指定key的item
  7.      if(!d.has("张三"))  //这里需要注意,这个map和VBA的字典不一样,他允许添加重复的key.所以先要做个判断
  8.      // 感叹号!相当于VBA的not,这个条件语句的意思是:如果张三不在字典中
  9. {
  10.        d.set("张三",9)
  11.     }
  12.     Debug.Print(d.get("张三"))
  13. }
复制代码


评分

6

查看全部评分

TA的精华主题

TA的得分主题

 楼主| 发表于 2021-11-12 17:24 | 显示全部楼层
JS路径中的斜杠"/"和VBA的斜杠"\"是反的这点需要注意,或者可以使用两个斜杠"\\"。
有人建议我要系统的学习一下JS语言,但我感觉没必要,哈哈。用到哪百度到哪,VBA也是这样过来的。
感觉学会数组+字典,对于JS宏问题应该不大

TA的精华主题

TA的得分主题

发表于 2021-11-21 10:55 | 显示全部楼层
目前不完善不是很好用,console.log不能执行,必须Console.log,目前的编辑器还不能自动大小写。

TA的精华主题

TA的得分主题

发表于 2024-8-30 07:59 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
通过
for (let [key, value] of d) {
  console.log(key)
}
测试,和vba一样的,没有重复的key
您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

手机版|关于我们|联系我们|ExcelHome

GMT+8, 2024-12-25 15:38 , Processed in 0.026443 second(s), 10 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

沪公网安备 31011702000001号 沪ICP备11019229号-2

本论坛言论纯属发表者个人意见,任何违反国家相关法律的言论,本站将协助国家相关部门追究发言者责任!     本站特聘法律顾问:李志群律师

快速回复 返回顶部 返回列表