經(jīng)常用Word的朋友都知道，在Word中可以方便地更改英文字符的“大寫”、“小寫”、“句首字母大寫”和“詞首字母大寫”。
但這些功能Excel沒有，如果想在Excel中使用這些功能就必須手動(dòng)修改或者用復(fù)雜的公式來進(jìn)行轉(zhuǎn)換。其實(shí)我們可以編寫相關(guān)的宏，一勞永逸地解決這個(gè)問題。
首先繪制四個(gè)命令按鈕，將按鈕上的文字更改為“全部大寫”、“全部小寫”、“句首字母大寫”和“詞首字母大寫”。接著分別為每個(gè)按鈕編寫相應(yīng)的宏代碼。
比如“全部大寫”按鈕，輸入代碼：
代碼片段：
| 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 |
Sub 全部大寫（） Dim itarget As Range Set itarget = Selection For Each ran In itarget '將單元格內(nèi)容轉(zhuǎn)換為大寫形式 ran.value = UCase（ran） Next End Sub |
右擊“全部小寫”按鈕，輸入代碼：
| 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 |
Sub 全部小寫（） Dim itarget As Range Set itarget = Selection For Each ran In itarget '將單元格內(nèi)容轉(zhuǎn)換為小寫形式 ran.value = LCase（ran） Next End Sub |
新聞熱點(diǎn)
疑難解答
圖片精選
