aktarma yaparken formatlama

[kadir68]

arkadaşlar benim kodları aşagıdaki gibi olan bir aktarma makrom var,yardımınızı istediğim konu ise makronun aktardıgı degeri formatlamak.
bu makroyu çalıştırdıgım zaman sayının aktarıldığı hücrenin sol üst köşesinde sarı bir ünlem işareti çıkıyor ,ünlem işaretine tıkladıgım zaman açılan menüden 'conver to number' a tıkladıgım zaman ancak bu sayıyla işlem yapabiliyorum. benim istegim metin olarak değilde direk sayı olarak aktarma yapabilmek



Sub veriaktar()
Application.ScreenUpdating = False

Sheets("sayfa2").Range("c2").Copy

sat = Sheets("sablon").Cells(65536, 3).End(xlUp).Row
Sheets("sablon").Cells(sat - 50, 12).PasteSpecial Paste:=xlValues


Application.CutCopyMode = False
MsgBox ("Verileriniz kaydedilmiştir.")
Application.ScreenUpdating = True
End Sub

 

[nazif74]

Sub veriaktar()

Application.ScreenUpdating = False

Sheets("sayfa2").Range("c2").Copy

sat = Sheets("sablon").Cells(65536, 3).End(xlUp).Row
Sheets("sablon").Cells(sat - 50, 12).PasteSpecial Paste:=xlValues
Selection.NumberFormat = "0.00"

Application.CutCopyMode = False
MsgBox ("Verileriniz kaydedilmiştir.")
Application.ScreenUpdating = True

End Sub

Bu şekilde denermisiniz..

 

[kadir68]

ilginiz için çok teşekkür ederim fakat hala sayı olarak aktarmıyor

 

[nazif74]

Ornek dosyanızı eklerseniz yardımcı olmaya çalışırım. Zira yazdığınız kodu denedim sayı olarak atıyor.