基于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 篇文章
如果覺得我的文章對您有用,請隨意打賞。你的支持將鼓勵我繼續創作!