2016-08-23 58 views
2

我必须以“1”的形式在单元格中写一个位置。与宏。无论我试图连接数字和点的方式,它总是只写一个数字。如果我在数字之前添加一个条形码,输出会被正确写入。如果我在点之后添加另一个字符,它也会正确写入结果。例子:Excel:如何连接一个数字和一个字符串

Sub concat() 
Dim currentSht As Worksheet 
Dim position, dot As String 
Dim checkRow1 As Integer 
Set currentSht = Sheets("Predtekmovanje") 
position = "2" 
dot = ".h" 
currentSht.Range("AY8").Value = CStr(position) & dot 
End Sub 

如果有人发现就如何使在2单元格中的形式输出一个聪明的办法,我真的appresciate它。

+0

您确定单元格的实际数据是错误的吗?听起来问题在于Excel将数值格式化为数字。 –

回答

1

首先将数字格式更改为Text,然后添加该值。

currentSht.Range("AY8").NumberFormat="@" 
currentSht.Range("AY8").Value="1." 
0

您是否试过自定义数字格式?像这样:

With Sheet1.Range("A2") 
    .NumberFormat = "#." 
    .Value = position 
End With 
相关问题