摘要： 如果要在Excel中将单元格内字符串中的重复字符去掉，重复的字符仅保留一个，如将字符串“1232345667”变成“1234567”，可以用自定义函数实现。 &nbs...
如果要在Excel中将单元格内字符串中的重复字符去掉，重复的字符仅保留一个，如将字符串“1232345667”变成“1234567”，可以用自定义函数实现。
步骤如下：
1.按Alt F11，打开VBA编辑器。
2.单击菜单“插入→模块”，在代码窗口中粘贴代码：
Function RemoveDupChar(theString As String) As String
Dim i As Integer
For i = 1 To Len(theString)
If InStr(RemoveDupChar, Mid(theString, i, 1)) = 0 And _
Mid(theString, i, 1) <> " " Then _
RemoveDupChar = RemoveDupChar & Mid(theString, i, 1)
Next
End Function
excel利用自定义函数显示单元格内的公式
在Excel中选择某个单元格后，在编辑栏中会显示单元格内的公式，但编辑栏内不可能同时显示多个单元格中的公式。反复按快捷键Ctrl `（`位于数字键1的左侧），可以切换显示工作表中的所有公
3.返回Excel工作表界面。
假如字符串在A1单元中，在B1单元格中输入公式：
=RemoveDupChar(A1)
该自定义函数还可以将多个单元格中的字符串合并后去重复，如A6单元格为“12345”，A7单元格为“23456”，在B6单元格输入公式：
=RemoveDupChar(A6&A7)
公式返回“123456”。
excel利用VBA将多行多列区域转为一列
有时需要在Excel中将某个多行多列的区域转换到一列中，下面的VBA代码可以实现这个目的。1.按快捷键Alt F11，打开VBA编辑器，在右侧代码窗口中粘贴下列代码：SubRangeToOneCol()DimTheRng,TempArr
