2016-08-23 95 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 
相關問題