Excel新增按鈕快速更改大小寫高手進階

經常用Word的朋友都知道, 在Word中可以方便地更改英文字符的“大寫”、“小寫”、“句首字母大寫”和“詞首字母大寫” 。
但這些功能Excel沒有, 如果想在Excel中使用這些功能就必須手動修改或者用復雜的公式來進行轉換 。 其實我們可以編寫相關的宏, 一勞永逸地解決這個問題 。
首先繪制四個命令按鈕, 將按鈕上的文字更改為“全部大寫”、“全部小寫”、“句首字母大寫”和“詞首字母大寫” 。 接著分別為每個按鈕編寫相應的宏代碼 。
比如“全部大寫”按鈕, 輸入代碼:
【Excel新增按鈕快速更改大小寫高手進階】 代碼片段:
Sub 全部大寫()
Dim itarget As Range
Set itarget = Selection
For Each ran In itarget
'將單元格內容轉換為大寫形式
ran.value = http://www.jslnfj.com/dnbaike/28866/UCase(ran)
Next
End Sub
右擊“全部小寫”按鈕, 輸入代碼:
Sub 全部小寫()
Dim itarget As Range
Set itarget = Selection
For Each ran In itarget
'將單元格內容轉換為小寫形式
ran.value = http://www.jslnfj.com/dnbaike/28866/LCase(ran)
Next
End Sub
完成以上操作后按鈕就可以使用了 。 選中目標單元格區域, 單擊相應的轉換按鈕, 被選中的英文字符就立即轉換成我們想要的大小寫了 。

    推薦閱讀