Question

Excel 中要把表内所有，全角字母及数字，全部转换成半角要怎么做？

Excel 中要把表内所有，全角字母及数字，全部转换成半角要怎么做？

因为表格很多

Answer 1

先将Excel中的数据复制到一个Word文件中，然后单击“格式→更改大小写”，在弹出的对话框中选择“半角”，再单击“确定”按钮。
接着再把Word文件中的数据复制到Excel，单击“编辑→选择性粘贴”，在弹出的对话框中，选择“文本”，单击“确定”按钮

Answer 2

Option Explicit

Sub 宏1()
'
' 宏1 Macro
' user 记录的宏 2010-7-29
'
'
Dim zf$, zfc, i%
zfc = "1234567890,."
For i = 1 To Len(zfc)
zf = Mid(zfc, i, 1)
Cells.Replace What:=zf, Replacement:=zf, LookAt:=xlPart, SearchOrder _
:=xlByRows, MatchCase:=False, MatchByte:=False
Next i
End Sub

用上面的宏，字符串zfc要自己再添加。

Answer 3

编辑-查找--选项--勾选“区分半角/全角

Answer 4

用函数
=ASC(全角数字的单元格)
真的很方便

Answer 5

查找 替换 全部替换