Sverweis verschluckt einen Teil der Zelle

[Krusti667]

Hallo zusammen, 

ich bin heute auf ein Problem gestoßen, dass ich mir nicht erklären kann. 

Ich habe mir einen Sverweis in VBA gebastelt/ergoogelt, welcher an einer anderen Stelle in meinem Code einwandfrei funktioniert.
Doch bei der Benutzung des selben Codes lediglich durch Austausch der Zeilen und Tabellen auf die ich Verweisen möchte, habe ich nun das Problem, dass er als Ergebnis nicht den vollständigen Inhalt der Zelle wiedergibt. 
Konkret: 

In der Zelle die ich auslesen will steht 2. aber der Sverweis spuckt mir nur 2 aus ohne den Punkt. 
Da der Code an anderer Stelle einwandfrei funktioniert kann es ja an dem nicht liegen. 

Kennt jemand das Problem ? Und weiß im besten Fall wie ich das lösen kann ?

Der Vollständigkeit halber hier einmal mein VBA-Code:

Sub sverw_class()
Dim Zelle As Range
For Each Zelle In ActiveSheet.Range("G2:G1000")
If Zelle.Value <> "" Then
    Zelle.Offset(0, 1).Value = Application.VLookup(Zelle.Offset(0, 0), Sheets("Abweichungen").Range("Tabelle6"), 3, False)
End If
Next Zelle
End Sub

[WillWissen]

Moin,

stecke zwar noch sehr weit am Anfang einer eventuellen VBA-"Karriere". Tausche aber mal .Value in .Text um.

[Krusti667]

Hey,

danke für die schnelle Antwort. 
Hab ich natürlich direkt ausprobiert allerdings erhalte ich dann leider einen Objektfehler. Muss ich nur das .Text austauschen oder eventuell dann noch andere Anpassungen machen ?

[schauan]

Hallo,

formatiere Deine Zielzellen als Text, dann kommt auch der Punkt mit.