Question

Excel中怎么设置输入的字母全部自动变大写

Answer 1

UPPER
将文本转换成大写形式。
语法
UPPER(text)
Text 为需要转换成大写形式的文本。Text 可以为引用或文本字符串。

如A1单元格是要转换的单元格,B1单元格输入 =UPPER(A1)

PROPER
将文本字符串的首字母及任何非字母字符之后的首字母转换成大写。将其余的字母转换成小写。
语法
PROPER(text)
Text 包括在一组双引号中的文本字符串、返回文本值的公式或是对包含文本的单元格的引用。

如A1单元格是要转换的单元格,B1单元格输入 =PROPER(A1)

LOWER
将一个文本字符串中的所有大写字母转换为小写字母。
语法
LOWER(text)
Text 是要转换为小写字母的文本。函数 LOWER 不改变文本中的非字母的字符。

如A1单元格是要转换的单元格,B1单元格输入 =LOWER(A1)

追问

我在单元格里输入=PROPER(A1)没点用啊，这是为什么？

追答

你的内容是否在A1单元格,
没用指的是什么没用

Answer 2

按Alt+F11，打开VBA编辑器，从左上角“工程”栏内【双击】需要设置此功能的工作表名，在右侧编辑区域内粘贴下面的代码。

'工作表激活事件  
Private Sub Worksheet_Activate()    
   Call getRC    '取得当前单元格位置，存入变量rc
End Sub

'选中单元格发生变化时  
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  With ActiveSheet
    .Cells(r, c).Value = UCase(.Cells(r, c).Value)    '把之前位置的单元格内容转为大写
      Call getRC    '把新的活动单元格位置保存下来
  End With
End Sub

在左上角“工程”栏内【双击】Thisworkbook，在右侧编辑区域内粘贴下面的代码。

'工作簿打开时取得活动单元格位置
Private Sub Workbook_Open()
  Call getRC
End Sub

在左上角“工程”栏内空白处点右键，【插入】-【模块】，双击新插入的【模块1】，在右侧编辑区域内粘贴下面的代码。

Public r As Long    '行号
Public c As Long    '列号
  
'将活动单元格位置存入变量的过程  
Private Sub getRC()
  r = ActiveCell.Row
  c = ActiveCell.Column
End Sub

这时，保存并关闭工作簿，重新打开后就可以看到效果了。

Answer 3

你直接把大写字母键开了不就好了嘛。键盘的左边“Caps Lock”这个键。

Answer 4

capslock开了就全是大写