Çözüldü sayısal metni text olarak gösteriyor

[ERDALOZ]

merhaba,
sayı olan yüzlerce hücreyi farklı bir yere sadece değer olarak kopyalıyorum ancak hep text olarak kopyalıyor, sonrasında onuda sayısala çevirmek için tekrar uğraşıyorum, bunu nasıl düzeltebilirim?

 

[asax]

"Yapıştırma Seçenekleri" içinde "Yalnızca Değerler" veya "Sayı Olarak Tut" gibi seçenekler varsa, bu seçenekleri kullanarak yapıştırma işlemini gerçekleştirin.

 

[asax]

Sayfanın kod kısmına ekleyin hücreleri uygun şekilde değiştirin

HTML:

İçeriği görebilmek için Giriş yap ya da Üye ol.

 

[ERDALOZ]

Sayfanın kod kısmına ekleyin hücreleri uygun şekilde değiştirin

Sub TakipEt()
Dim sourceRange As Range
Dim targetCell As Range


Set sourceRange = Selection
sourceRange.Copy


Set targetCell = Sheets("Sayfa1").Range("A1")

' Hedef hücreye yapıştır (sayı olarak)
targetCell.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False


Application.CutCopyMode = False


End Sub

teşekkürler, konu çözülmüştür