WPS如何快速输入重复内容
在WPS表格介绍中,小编教了大家很多使用WPS表格的小技巧,都能有效提高效率。下面小编就再为大家来讲讲另一个小窍门。相信小伙伴们都会遇到在录入文字的时候,有时会遇到很多重复的字符,但是都只是重复再编写,现在就说说如何提供重复字符的编辑速度。
假设需要输入以下内容,因没有连接功能,只好将重复的字符重复的输入,无疑降低了工作效率。
选择性粘贴
客户地址:
广东省东莞市全兴有限公司。
广东省东莞市宏运有限公司。
广东省东莞市中天有限公司。
广东省东莞市月满楼有限公司。
广东省东莞市兴又盛有限公式。
解决思路:
用VBA为WPS表格2005增设一个“选择性粘贴——连接”的功能,置于右键菜单方便调用。
步骤1.建立“选择性粘贴——连接”的功能的宏。
本例假设你的WPS已具备VBA环境;
1.新建工作簿;
2.用快捷键ALT+F11打开VBE环境;
3.单击菜单【插入】【模块】,在模块中输入以下代码:
Sub选择性粘贴__连接() DimrngAsString,NewShtAsString,OldShtAsString,texts,iAsByte,ansAsByte IfActiveSheet.ProtectContentsThenMsgBox"工作表已保护,本程序拒绝执行!",64,"提示":ExitSub OnErrorGoToendd rng=Selection.Address OldSht=ActiveSheet.Name Application.DisplayAlerts=False Worksheets.Add NemSht=ActiveSheet.Name Range("a1").Select ActiveSheet.Paste IfActiveSheet.UsedRange.Count>1Then MsgBox"只能连接单个单元格的值。",64,"andysky" GoToendd EndIf texts=Selection.Text Application.ScreenUpdating=True Sheets(OldSht).Select ans=InputBox("请选择连接于目标前还是连接于目标后。"&Chr(10)&"1:连接于目标之前;"_ &Chr(10)&"2:连接于目标之后。","连接方式",1) Fori=1ToSelection.Count If--ans=1ThenSelection(i)=textsSelection(i) If--ans=2ThenSelection(i)=Selection(i)texts Next endd: Worksheets(NemSht).Delete EndSub
步骤2.将宏功能加入右键菜单中
1.用快捷键CTLR+R打开“工程资源管理器”,在左边的窗格中找到“ThisWorkbook”并双击;
2.在右边的代码窗口输入以代码(两段代码:第一段为将工能加到右键菜单,另一段为关闭EXCEL时恢复右键):
PrivateSubWorkbook_Open() WithApplication.CommandBars("cell").Controls.Add(Type:=msoControlButton,before:=4,Temporary:=True) .Caption="选择性粘贴__连接(&Paste)" .OnAction="选择性粘贴__连接" EndWith EndSub PrivateSubWorkbook_BeforeClose(CancelAsBoolean) Application.CommandBars("CELL").Reset EndSub
步骤3.将工作簿另存为默认模板
1.关闭VBE窗口返回工作表;
2.单击菜单【文件】【另存为】,在保存类型处选择“WPS表格模板文件”。
步骤4.测试效果
1.选择菜单【文件】【本机上的模板】,在列表中选择刚才存放的模板;
2.在工作表中输入以下数据,然后复制A9,然后选择A2:A7,单击右键,选择菜单中的“选择性粘贴__连接”;
3.此时程序弹出对话框,在里面输入1表示连接于前。单击确定后最后结果。
以上就是对WPS表格中重复字符的快速编写的方法。方法很简单,主要是要经过VBE环境,来对模块进行调整,代码就可以复制上面小编提供的内容,当然,具体内容就需要自行更改下,之后保存模板文件就可以了。接下来就是用选择性粘贴来录入文字。
文章标题:WPS如何快速输入重复内容
文章链接:http://xiazai.zol.com.cn/jiqiao/44708.html
为给用户提供更多有价值信息,ZOL下载站整理发布,如果有侵权请联系删除,转载请保留出处。
- 上一问:WPS当中如何将表格窗口结冻
- 下一问:WPS表格中冻结窗格的妙处
相关软件推荐
其他类似技巧
- 2024-02-09 10:19:59WPS手写签名功能怎么用?WPSOffice设置手写签名方法
- 2024-01-09 11:57:00wps2016个人版怎么下载安装-wps2016个人版下载安装的方法
- 2024-01-04 17:23:29wps怎么定位单元格位置?wps打开定位条件步骤介绍
- 2023-12-28 11:37:49探索最新一代dps文件处理技术的发展历程
- 2023-12-28 11:37:49您需要了解的dps软件选择指南
- 2023-12-28 11:37:48精选免费的DPS文件软件,让你轻松处理文档
- 2023-12-13 14:05:15解锁DOC文件内容的专业级应用程序
- 2023-12-13 14:05:14市场口碑佳:受欢迎的DOC文件阅读器名单
- 2023-12-13 14:05:14DOC格式文档完美呈现,免费工具推荐
- 2023-12-13 14:05:14DOC格式文档无须付费,这些免费工具让你轻松打开
金山WPS Office软件简介
wps office 2013是一款文件管理软件,在这款软件中能满足用户在电脑中各种办公需求;软件有着十分丰富的文件格式让用户选择,不管是表格、演示还是文字展示都可以一键使用,并且有着许多素材模板让用户直接套用,十分的方便;软件还可以在多种设备中同时进行编辑,实时同步最新的文档内容,让用户随时进行编辑。WPS Office... 详细介绍»