vba 将数字转换成字符串的函数是哪个呢

风行无边

学习了~~~

周秦汉

5楼非常实用！

热浪2006

我一般用Format()，能自动去掉前导空格。

wormtiger

谢谢各位的回答。

香川群子

补充：

① 定义变量数据类型
   如果把数值结果赋值给已经定义了变量数据类型的变量，则不需要转换。

Sub test()
    Dim s$ '或 Dim s as String '定义变量s为字符串变量
    Dim t& '或 Dim t as Long '定义变量t为长整形数值变量
    s = 100
    t = 100

    s = "100"
    t = "100"
End Sub

在VBE窗口中可以观察到赋值以后的变量类型。

香川群子

方法② 用VBA函数转换。

数值转换为字符串：=Cstr()

文本型数值转换为数值型：=Val()

记住，Val函数很强大，可以把数值+字符串内容一步到位转换为数值。
即，提取最前面部分的有效数值，然后转换为数值型数据。

如： Val("123abc") 结果=123 会自动忽略后面非数值部分。

香川群子

方法③

直接在数值前加一个""作为前导，就能把数值转换为字符串：

Sub test()
    Dim t 'Dim t As Variant '变量t定义为任意可变变量时。
   
    t = 100 '赋值后VBA自动判断为整数型变量
    t = "" & t '在变量前加前导""赋值后变为字符串
    t = "" & 100 '数值加前导""赋值后变为字符串
    t = "100" '或直接在数据前后加"赋值后变为字符串
   
   t = 100
   t = "" & t & "" '在变量前后加"赋值后变为字符串
End Sub

aoe1981

香川群子 发表于 2014-4-15 09:07
方法② 用VBA函数转换。

数值转换为字符串：=Cstr()

工作表中有没有转字符串的函数？

yhtqn

yf_992258 发表于 2008-10-15 15:50
cstr吧介绍函数的话函数版块应该有的

好，好吧，一个字不行，还需要灌水

地天泰

学习了，谢谢楼主！！！