自定义博客皮肤VIP专享

*博客头图:

格式为PNG、JPG,宽度*高度大于1920*100像素,不超过2MB,主视觉建议放在右侧,请参照线上博客头图

请上传大于1920*100像素的图片!

博客底图:

图片格式为PNG、JPG,不超过1MB,可上下左右平铺至整个背景

栏目图:

图片格式为PNG、JPG,图片宽度*高度为300*38像素,不超过0.5MB

主标题颜色:

RGB颜色,例如:#AFAFAF

Hover:

RGB颜色,例如:#AFAFAF

副标题颜色:

RGB颜色,例如:#AFAFAF

自定义博客皮肤

-+
  • 博客(12)
  • 收藏
  • 关注

原创 wps 文本框和列表框组合筛选数据

if(Range('C'+i)=="一单元"+TextEdit1.Text+"01" || Range('C'+i)=="一单元"+TextEdit1.Text+"02" || Range('C'+i)=="二单元"+TextEdit1.Text+"01" || Range('C'+i)=="二单元"+TextEdit1.Text+"02")如图,首先鼠标选中任意单元格,在文本框中输入楼层号,此时的复选框是选中状态,会显示尾号01。复选框勾选中,会显示尾号01,取消选中,会显示02。

2025-01-04 15:31:45 473

原创 WPS JS宏计算过期时间,单元格标红

对年单位,和月份判断,过期日期单元格背景设置成红色。

2024-10-05 10:21:15 268

原创 WPS JS宏Date获取系统日期

getMonth获取月,需要在getMonth后面➕1。首先new Date获取数据,用一个变量接收。getFullYear获取年。点击按钮单元格输出当前日期。getDate获取日期。

2024-10-04 09:17:36 928

原创 WPS JS宏使用正则表达式获取指定文本

使用match方法,/\d+/g。\d提取0-9其中的一位数字,+向下扩展,g是全局。对A1单元格的内容,提取数字。提取到的内容输出到E1单元格中。

2024-10-03 14:42:44 743

原创 WPS JS宏使用Range单元格数据拆分

使用Range读取数据,在E列做为判断依据。分发数据,对中文和英文分开。

2024-10-02 16:43:29 445

原创 WPS JS宏用于设置MsgBox弹窗消息样式

MsgBox弹窗样式很多种。

2024-10-01 14:50:10 611

原创 WPS JS宏插入单元格和删除单元格

如果不想插入整行,或者是删除整行,又频繁插入固定大小的单元格。可以使用ActiveCell.Row获取活动单元格所在的行号。用变量 I 接收ActiveCell.Row的返回,MsgBox做一下提示,预防误操作。if(MsgBox('确认是否在当前选中行插入一行',jsOKCancel)==1)if(MsgBox('确认是否删除当前选中行',jsOKCancel)==1)Insert括号中第一个参数是向下插入。Delete括号中的参数是向上删除。做一个快速添加和删除单元格。

2024-09-30 14:52:44 714

原创 WPS JS宏单元格双击打勾

'是' && rg.Cells!一行代码,rg.Value2=就可以实现在任意单元格里输入等号后面的内容。如果想要在表格中加入限制,在规定范围内的单元格中随意输入。rg.MergeCells == 判断是否是合并单元格。rg.Column==限制了等号后面,输入的列。rg.Cells!= 限制单元格内容。

2024-09-29 14:20:12 2415

原创 WPS JS宏Selection提取选区内容

需要注意,如果使用Range的范围超标,提取选区覆盖不上,其余部位都是#N/A填充。使用Selection提取选区内容。

2024-09-25 16:24:16 632

原创 WPS JS宏使用Insert插入单元格

JS宏编程,选择按钮,在表格中填加一个按钮控件。在代码中,Range后选择Insert。返回表格中,点击按钮,表格中的A5会向下插入一个单元格。如果在Insert前面添加EntireRow。点击按钮,A5整行插入空行。

2024-09-24 13:56:15 941

原创 WPS JS宏编程,实现指定位置双击表格打勾,区域内同一行,只有一个对号保留。

代码中,首先判断双击后,如果在第4列,或者是第5列的单元格内,就在双击位置打勾。同时,判断,相邻的内容清空。几行代码,实现在特定区域内,对单元格打勾。超出范围,双击后,没有效果。

2024-09-23 15:19:58 1220

原创 WPS使用JS宏,双击表格打勾。

进入后,工作区是这样的。点击Application后的下拉框,选择Workbook,在第二个选择框中,滚动鼠标选择SheetBeforeDoubleCLick(Sh,rg,cancel)返回表格,在任意位置双击,此时就会在鼠标双击位置的单元格中,写入✓。更改中括号中的代码, Range('A1').Value2='✓'返回表格中,双击任意地方单元格,此时就会在A列第1行写入✓。在大括号中,输入rg.Value2='✓'在导航栏中,找到工具选项。选中后,会自动生成代码。进入,选择开发工具。

2024-09-22 10:44:06 568

空空如也

空空如也

TA创建的收藏夹 TA关注的收藏夹

TA关注的人

提示
确定要删除当前文章?
取消 删除