aktarılan sayı metne dönüşüyor

[baron07]

merhaba arkadaşlar hepinize iyi çalışmalar dileğimle sorunumu aktarmak istiyorum
kodlarını sayfadaki arkadaşlardan birinin örnek çalışmasından alıp kendi çalışmama uyarladığım ekte ki örnek çalışmada bir sorunum var.
Tahakkuk fişi üzerinde” D14”adlı hücreye yazdığım T.L. cinsinden değer aktarılan “LİSTE” sayfasındaki “F” sütunundaki yerde metin olarak yer alıyor dolayısı ile toplamlarını alamıyorum.
Örneği inceleyip varsa eksiklerini de tamamlayıp yardımcı olursanız memnun olurum.
Hepinize emekleriniz için teşekkür eder saygılarımı sunarım

 

[Orion1]

Butondaki ilgili kodlarda hücreyi text olara kaydetmeyin.
Bakın ben value yaptım.
Değer ne ise o oluyor.
İlgili yerleri değiştiriniz.

Sheets("LISTE").Range("A" & bos_satır).Value = Range("H9").[COLOR="Red"]Value[/COLOR]
Sheets("LISTE").Range("C" & bos_satır).Value = Range("C6").[COLOR="Red"]Value[/COLOR]
Sheets("LISTE").Range("B" & bos_satır).Value = Range("C7").[COLOR="Red"]Value[/COLOR]
Sheets("LISTE").Range("D" & bos_satır).Value = Range("A14").[COLOR="Red"]Value[/COLOR]
Sheets("LISTE").Range("E" & bos_satır).Value = Range("G6").[COLOR="Red"]Value[/COLOR]
Sheets("LISTE").Range("F" & bos_satır).Value = Range("D16").[COLOR="Red"]Value[/COLOR]
kaplan = Sheets("LISTE").Range("A65536").End(xlUp).Row

 

[Ömer]

Merhaba,

Örnek:

Sheets("LISTE").Range("F" & bos_satır).Value = Range("D16").Text

Text'lerin yerine Value yazın.

.

 

[baron07]

Sayın üstadlarım teşekkürlerimi sunarım hayırlı çalışmalar iyi ki varsınız.