[原]Excel(电子表格)中的大写变成小写

今天有同学打电话过来问怎么把Excel表中的大写字母变成小写，我当时偷懒就告诉查找替换26次(26个字母嘛)就可以了， 。后来在同学一再坚持下，我决定认真帮他想办法，并把方法写出来供大家参考。

方法1. 用代码来转换，这种最好，几乎无敌。方法：Alt+F11,C opy and paste this code，F5

Sub  ConvertToLowerCase() 'Author:Kennytian@msn.com
   Dim  Rng  As  Range
  Worksheets( " Sheet1 " ).UsedRange.Select  '转换Sheet1里的大写字母
   For   Each  Rng In Selection.Cells
    If  Rng.HasFormula  =   False   Then
      Rng.Value  =   LCase (Rng.Value)  ' 把字母转换为小写。如果是转换成大写，就把LCase改为UCase
    End   If
   Next  Rng
End Sub

如果您不太懂这些蚂蚁般的字母，或眼神儿不太好。我还为您支了一招儿。

方法2.
    在同一个工作薄中新建一个空白的工作表，假设原工作表为“Sheet 1”，新工作表为“Sheet 2”，在“Sheet 2”的A1单元格里输入“LOWER(Sheet1!A1)”,也就是将工作表“Sheet 1”的A1单元格内的内容转换为小写，并出现在“Sheet 2”的A1单元格中，这样可以达到一一对应的效果。除A1之外的单元格，可以通过按住鼠标左键拖拽自动填充的方式，将公式填充到整个表中，以转换全部内容。

PS：拖拽时好像只能向下、向右，为什么不能向右下角拖拽(请高手指点迷津)，匪夷所思

Keywords: Excel里转换大写为小写 Excel里转换小写为大写 将EXCEL中的小写英文字母转换成大写 将EXCEL中的小写英文字母转换成大写

转载于:https://www.cnblogs.com/Kennytian/archive/2008/01/20/1046395.html