如何批量的在数据前面添加单引号，而单引号却不显示。

wuzhenshu · 发表于 2009-3-26 15:53

数字格式变成文本格式的一个方法是：在输入数字前加一个单引号’，数字就“变形”为文本了。输入的单引号不会显示出来，也不计入字符串的长度。

但我的问题是：我的原始数据已经录入完毕，数据量也很多很多，且都是数字格式。
我想通过在原始数据前添加单引号的方法，让这批数据由数字格式变成文本格式（重点是这些单引号不显示出来）。
如何快捷的使一大批原始数据前面都添加单引号，而单引号又不显示出来呢？？

附件是我那些数据的一小部分，请大家帮帮忙！

sunmon123 · 发表于 2009-3-26 15:56

不太理解你的想法，既然是要变成文本格式，那为什么非要通过添加“'”来实现呢？直接用公式或VBA转换成文本不就行了？

wxb_815 · 发表于 2009-3-26 15:58

用数据分列可以将单元格式改为文本格式
数据—分列
下一步下一步
列数据格式选文本就是了

yangjia1980 · 发表于 2009-3-26 15:59

假设原数据在A列，做辅助列B
B1="i"&A1
然后将B列粘贴成值
然后将i替换成'即可

yangrongguan · 发表于 2009-3-26 16:11

4楼的方法可以行得通。

LangQueS · 发表于 2009-3-26 16:17

如果数据行列比较整齐，使用分列最方便，如果数据位置比较复杂，可用下面的代码：（当前不连续选区添加文本）

Sub 批量添加文本()
Application.Calculation = xlCalculationManual '手动重算
Dim s As Range
For Each s In Selection
s = "'" & s
Next
Application.Calculation = xlCalculationAutomatic '自动重算
End Sub

wuzhenshu · 发表于 2009-3-26 16:24

非常感谢您！

summeryshine · 发表于 2009-7-23 17:09

还有一个最简单的方法,就是用公式=TEXT(A1,0)
这样就会很快将你的数字转换成文本格式了.
然后再将得到的文本数值选择性粘帖一下, 粘贴数值即可.

[ 本帖最后由 summeryshine 于 2009-7-23 17:12 编辑 ]

excel5.0 · 发表于 2011-4-19 15:17

我正要用，感谢各位，问我的题也解决了！

lingyi123456 · 发表于 2011-7-31 17:25

谢谢各位，我也受益了

		自动登录	找回密码
密码			免费注册

[求助] 如何批量的在数据前面添加单引号，而单引号却不显示。

回复 4楼 yangjia1980 的帖子

回复 1楼 wuzhenshu 的帖子