一段简单的VBA代码,让你自如操作Excel!
抛砖引玉的场景需求:将下表房屋面积中的M2平方单位中的数字2统一设置为上标。
表格示例
代码运行演示
代码示例
在标准模块中加入如下代码即可实现上面的演示功能。
Sub 批量修改上标()Dim r As LongDim T As LongFor r = 2 To 5 '获取单元格文本长度 T = Len(Cells(r, "D")) '将文本最后一个字符设置上标 Cells(r, "D").Characters(T, 1).Font.Superscript = TrueNextEnd Sub
动手试一试,屏幕前的你, 复制代码运行下吧~~!
更多Excel VBA编程知识(职场牛人的必备秘技),可下载安装使用一款优秀职场人必备的工具《神奇的VBA》插件,一款嵌入进Excel Ribbon界面,打开任意Excel工作簿就能随时查阅学习VBA编程的Excel 插件。
插件下载地址戳下面链接:
《神奇的VBA》-职场牛人都在使用的Excel插件
《神奇的VBA》选项卡样式
神奇的VBA使用演示图