rst.fieldds alanının şekil vererek yazdırmak

[a_self_lion]

Merhaba arkadaşlar Sql ile çektiğim veriyi excel hücresine yazdırırken özel format uygulamak istiyorum.
Mesela gelen veri

Cells(s, 3) = rst.Fields(0)

fields(0) veri 11010101500 şekilde direk s sarırı 3 üncü sütuna yazıyor. Ben istiyorum ki 11 01 01 01500 şeklinde yazsın nasıl yapabilirim. Teşekkürler.

 

[Necdet]

Merhaba,

Format komutunu kullanabilirsiniz.

Cells(s, 3) = Format(rst.Fields(0), "00 00 00 00000")

şeklinde.

Yada aktardığınız sütunu yukarıdaki gibi biçimlendirirsiniz, kod içine ayrıca düzenlemeye gerek kalmaz (yine de denemek gerek, tam emin değilim).