一段简单的VBA代码,让你自如操作Excel!

抛砖引玉的场景需求:将下表房屋面积中的M2平方单位中的数字2统一设置为上标。

excel vba按条件提取指定内容(一小段ExcelVBA代码020单元格区域中批量设置上标)(1)

表格示例

excel vba按条件提取指定内容(一小段ExcelVBA代码020单元格区域中批量设置上标)(2)

代码运行演示

代码示例

标准模块中加入如下代码即可实现上面的演示功能。

Sub 批量修改上标() Dim r As Long Dim T As Long For r = 2 To 5 '获取单元格文本长度 T = Len(Cells(r, "D")) '将文本最后一个字符设置上标 Cells(r, "D").Characters(T, 1).Font.Superscript = True Next End Sub

动手试一试,屏幕前的你, 复制代码运行下吧~~!

更多Excel VBA编程知识(职场牛人的必备秘技),可下载安装使用一款优秀职场人必备的工具《神奇的VBA》插件,一款嵌入进Excel Ribbon界面,打开任意Excel工作簿就能随时查阅学习VBA编程的Excel 插件。

插件下载地址戳下面链接:

《神奇的VBA》-职场牛人都在使用的Excel插件

excel vba按条件提取指定内容(一小段ExcelVBA代码020单元格区域中批量设置上标)(3)

《神奇的VBA》选项卡样式

excel vba按条件提取指定内容(一小段ExcelVBA代码020单元格区域中批量设置上标)(4)

神奇的VBA使用演示图

,