国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 辦公 > Excel > 正文

Excel新增按鈕快速更改大小寫的方法

2019-12-13 15:42:49
字體:
來源:轉載
供稿:網友

經常用Word的朋友都知道,在Word中可以方便地更改英文字符的“大寫”、“小寫”、“句首字母大寫”和“詞首字母大寫”。  

但這些功能Excel沒有,如果想在Excel中使用這些功能就必須手動修改或者用復雜的公式來進行轉換。其實我們可以編寫相關的宏,一勞永逸地解決這個問題。  

首先繪制四個命令按鈕,將按鈕上的文字更改為“全部大寫”、“全部小寫”、“句首字母大寫”和“詞首字母大寫”。接著分別為每個按鈕編寫相應的宏代碼。  

比如“全部大寫”按鈕,輸入代碼:  

代碼片段:  

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 
      
  '將單元格內容轉換為大寫形式 
      
  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 
      
 '將單元格內容轉換為小寫形式 
      
 ran.value = LCase(ran) 
      
 Next 
      
 End Sub

   完成以上操作后按鈕就可以使用了。選中目標單元格區域,單擊相應的轉換按鈕,被選中的英文字符就立即轉換成我們想要的大小寫了。

發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板: 镶黄旗| 绥棱县| 娱乐| 眉山市| 永昌县| 扶绥县| 岢岚县| 丹阳市| 竹溪县| 广德县| 米易县| 武山县| 保靖县| 江西省| 南昌县| 新乡县| 儋州市| 如皋市| 台中市| 聂荣县| 湄潭县| 阿拉善右旗| 银川市| 兴山县| 旌德县| 凉城县| 墨脱县| 嫩江县| 蒙山县| 吴忠市| 西盟| 洪泽县| 文成县| 新丰县| 嘉兴市| 阜城县| 琼海市| 乌鲁木齐县| 隆昌县| 土默特右旗| 南城县|