2016-08-23 3 views
2

Ich muss eine Position in der Zelle in Form von "1" schreiben mit einem Makro. Wie auch immer ich versucht habe, eine Zahl und einen Punkt zu verketten, es schreibt immer nur eine Zahl. Wenn ich vor der Zahl einen String hinzufüge, wird die Ausgabe richtig geschrieben. Wenn ich nach dem Punkt ein weiteres Zeichen hinzufüge, schreibt es auch das Ergebnis richtig. Beispiele:Excel: Wie verkette ich eine Zahl und eine Zeichenfolge

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 

Wenn jemand einen cleveren Weg findet, wie die Ausgabe in Form von 2 in der Zelle zu machen, würde ich appresciate es wirklich.

+0

Sind Sie sicher, dass die tatsächlichen Daten der Zelle falsch sind? Es klingt, als ob das Problem darin besteht, dass Excel den Wert als Zahl formatiert. –

Antwort

1

Erste Änderung das Zahlenformat auf Text und dann den Wert hinzuzufügen.

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

Haben Sie ein benutzerdefiniertes Zahlenformat versucht? Wie folgt:

With Sheet1.Range("A2") 
    .NumberFormat = "#." 
    .Value = position 
End With 
Verwandte Themen