基于VBA技巧一键节制选区内容鄙人标形态和常规形态之间切换。
本教程以下列数据为例。
插入一个切换按钮,找不到号令的话,可以参考以下链接:
33插入控件技巧
选好号令后,按住鼠标左键不松,拖动鼠标绘制按钮,绘制好后,松开鼠标左键即可。
右键菜单,选择查看代码。
在弹出的窗口中,复制粘贴一下代码(直接笼盖粘贴):
Private Sub ToggleButton1_Click()
Dim rng As Range
Set rng = Selection
For Each rng In Selection
If ToggleButton1 Then
rng.Font.Subscript = True
Else
rng.Font.Subscript = False
End If
Next
End Sub
封闭VBA界面,返回Excel窗口。
框选区域,按下按钮,选区内容酿成下标形式;再次点击按钮(即弹起按钮),所选内容又变回常规形式。
0 篇文章
如果觉得我的文章对您有用,请随意打赏。你的支持将鼓励我继续创作!