如何用VBA将以文本形式储存的数值转为数值,并刷新单元格

china047 · 发表于 2010-9-27 15:03

各位老师,如何用VBA将附件A列以文本形式储存的数值转为数值,并且将A列单元格刷新!!
(以前的做法是先将单元格设为常规格式,再采用"分列"将单元格刷新)

先谢过各位老师了!!

lb_bn · 发表于 2010-9-27 15:36

Sub bbb()
[a:a].NumberFormatLocal = "G/通用格式"
[a:a].Value = [a:a].Value
End Sub

china047 · 发表于 2010-9-27 16:11

原帖由 lb_bn 于 2010-9-27 15:36 发表
Sub bbb()
[a:a].NumberFormatLocal = "G/通用格式"
[a:a].Value = [a:a].Value
End Sub

多谢lb_bn老师帮忙,再请教lb_bn老师,如果是数值转换为文本如何修改代码!
我将代码改为以下,但只是将单元格格式改为了文本,单元格并没有被刷新???
[a:a].NumberFormatLocal = "@"
[a:a].Value = [a:a].Value

lb_bn · 发表于 2010-9-27 16:22

以经刷新了啊.
只是不再有绿色的前头而已.

china047 · 发表于 2010-9-27 16:31

原帖由 lb_bn 于 2010-9-27 16:22 发表
以经刷新了啊.
只是不再有绿色的前头而已.

但是单元格的内的数值并没有变为文本,而且还可以进行相加,一定要双击之后才会变为文本,并带有绿色箭头!!

lb_bn · 发表于 2010-9-27 16:38

楼主原来的表里的数字也能相加啊.

china047 · 发表于 2010-9-27 16:43

原帖由 lb_bn 于 2010-9-27 16:38 发表
楼主原来的表里的数字也能相加啊.

这个倒是哦

,但是有什么办法让单元格变得带有绿色箭头呢?

china047 · 发表于 2010-9-27 16:54

lb_bn 老师,原因是这样的,我有一个横向表要转为竖向表,但不知为什么,当"面料总表"的B列格式不一样时(既有文本也有数值),转换到"快速竖向总表"之后,那些B列为文本格之的内容就会出现错列现象(附件的B列就是因为"65133141A" 这个款号后面多了个A,所以出现错列!!
但如果B列的内容全部为数值,或者全部为文本就不会出这样的情况!!

现附上完速附件上来给大家查一下原因!!

[ 本帖最后由 china047 于 2010-9-27 16:59 编辑 ]

china047 · 发表于 2010-9-27 17:14

顶一下!!

china047 · 发表于 2010-9-27 19:03

再顶起来!!

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

[讨论] 如何用VBA将以文本形式储存的数值转为数值,并刷新单元格

评分

回复 3楼 china047 的帖子

回复 5楼 china047 的帖子

最新热点 /1