国产探花免费观看_亚洲丰满少妇自慰呻吟_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

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

發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板: 太仆寺旗| 吉水县| 广西| 女性| 宁强县| 贡觉县| 平舆县| 丹凤县| 龙口市| 德阳市| 永嘉县| 德昌县| 开远市| 青海省| 南投县| 任丘市| 芜湖县| 成武县| 丽水市| 万全县| 威信县| 绩溪县| 贵州省| 无棣县| 施甸县| 镇巴县| 堆龙德庆县| 福安市| 临泽县| 深泽县| 古田县| 嘉义市| 太谷县| 延庆县| 汾阳市| 青州市| 柳江县| 山丹县| 炉霍县| 贵州省| 三门峡市|