WPS中EXCEL 获取中文首字母缩写

2023-12-23 17:40| 来源: 网络整理| 查看: 265

1. 下载WPS2019VB插件

如果不下载的话，VB编辑器一栏会显示灰色不可用链接：https://pan.baidu.com/s/1PV_p3ngP9zUaszQs70-kSA 提取码：pghg

2. 打开VB编辑器

【开发工具】->【VB编辑器】

3. 自定义函数

打开【开发工具】菜单，点击【VB编辑器】,弹出代码窗口，

在窗口左侧空白处，点击右键，选择【插入】->【模块】。窗口右侧出现一个白色背景框。

复制粘贴如下内容到右侧框中：

Function getpychar(char) tmp = 65536 + Asc(char) If (tmp >= 45217 And tmp = 45253 And tmp = 45761 And tmp = 46318 And tmp = 46826 And tmp = 47010 And tmp = 47297 And tmp = 47614 And tmp = 48119 And tmp = 49062 And tmp = 49324 And tmp = 49896 And tmp = 50371 And tmp = 50614 And tmp = 50622 And tmp = 50906 And tmp = 51387 And tmp = 51446 And tmp = 52218 And tmp = 52698 And tmp = 52980 And tmp = 53679 And tmp = 54481 And tmp

【本文地址】

公司简介

联系我们