metin olarak görünen sayılar arasına nokta koymak

[cemşir79]

kafayı yemek üzereyım yaklaşık 20 sayfadan veri alınmakta ve alınan veriler metin olarak görünmektedir. forumda araştırdım fakat kendi örneğimde uyğulayamadığım veya uygulanmayan çözümler mevcuttur, Ben 20 sayfadan almış olduğum kimi zaman metin kimi zaman sayı olduğu için tablomda göründüğü gibi bir formatta yayınlamam gerekiyor sayı biçimleride buna paralel olarak örnekte açıkladığım gibidir.örnek olarak makroda 4 rakamlı sayı olursa yani1215 olursa 00\.00 uygulansın sonuç 12.15 eğer sayı 5 rakamlı olursa yani 22574 olursa 02:25.74 olsun veya sayı 3 rakamlı olursa 125 olursa ya 1.25 yada 01.25 olsun yardım edecek olan ustalara şimdiden teşekkür ederim

 

[Korhan Ayhan]

Örnek olarak C8 hücresindeki formülü aşağıdaki gibi değiştirirseniz sonuç sayısal olarak değişecektir.

=1*(EĞERHATA(DÜŞEYARA($B8;DOLAYLI("'"&$C$6&"'!$E$8:$f$1500");2;0);"")&EĞERHATA(DÜŞEYARA($B8;DOLAYLI("'"&$C$6&"'!$F$8:$N$1500");9;0);"")&EĞERHATA(DÜŞEYARA($B8;DOLAYLI("'"&$C$6&"'!$F$8:$aa$1500");22;0);""))

Bundan sonra istediğiniz biçimi uygulayabilirsiniz.

 

[cemşir79]

Sayın Korhan Ayhan ilginizden dolayı teşekkür ederim. fakat aşağıdaki gibi bir sonuç çıktı
Fıstk sayfasında yazan değerler
ahmet 02:25.84
mehmet vade
hasan 02:26.04
hüseyin 02:26.14
kazım izin

tablo sayfasında görünüm
ahmet 02:25.84
mehmet #DEĞER!
hasan 02:26.04
hüseyin 02:26.14
kazım #DEĞER!

=EĞERHATA(DÜŞEYARA(B8;DOLAYLI("'"&$E$6&"'!$E$8:$f$1500");2;0);0)+EĞERHATA(DÜŞEYARA(B8;DOLAYLI("'"&$E$6&"'!$F$8:$N$1500");9;0);0)+EĞERHATA(DÜŞEYARA(B8;DOLAYLI("'"&$E$6&"'!$F$8:$aa$1500");22;0);0)

yukarıda yazılı olan formül sizin yazdığınız formülün aynı görevini gören başka bir formüldü fakat o formülde de değer hatası veriyor.

 

[cemşir79]

sorum günceldir

 

[cemşir79]

yapılamayacak bir işlem galiba!!!

 

[uzmanamele]

kafayı yemek üzereyım yaklaşık 20 sayfadan veri alınmakta ve alınan veriler metin olarak görünmektedir. forumda araştırdım fakat kendi örneğimde uyğulayamadığım veya uygulanmayan çözümler mevcuttur, Ben 20 sayfadan almış olduğum kimi zaman metin kimi zaman sayı olduğu için tablomda göründüğü gibi bir formatta yayınlamam gerekiyor sayı biçimleride buna paralel olarak örnekte açıkladığım gibidir.örnek olarak makroda 4 rakamlı sayı olursa yani1215 olursa 00\.00 uygulansın sonuç 12.15 eğer sayı 5 rakamlı olursa yani 22574 olursa 02:25.74 olsun veya sayı 3 rakamlı olursa 125 olursa ya 1.25 yada 01.25 olsun yardım edecek olan ustalara şimdiden teşekkür ederim

Merhaba

Umarım soruyu doğru anlamışımdır.

C sütunundaki formül;

=EĞERHATA(((EĞERHATA(DÜŞEYARA($B8;DOLAYLI("'"&$C$6&"'!$E$8:$f$1500");2;0);"")&EĞERHATA(DÜŞEYARA($B8;DOLAYLI("'"&$C$6&"'!$F$8:$N$1500");9;0);"")&EĞERHATA(DÜŞEYARA($B8;DOLAYLI("'"&$C$6&"'!$F$8:$aa$1500");22;0);""))*1);((EĞERHATA(DÜŞEYARA($B8;DOLAYLI("'"&$C$6&"'!$E$8:$f$1500");2;0);"")&EĞERHATA(DÜŞEYARA($B8;DOLAYLI("'"&$C$6&"'!$F$8:$N$1500");9;0);"")&EĞERHATA(DÜŞEYARA($B8;DOLAYLI("'"&$C$6&"'!$F$8:$aa$1500");22;0);""))))

C sütunundaki sayı formatını ayarlamak için bu kodu çalıştırın.

Sub NumberFormat()
On Error Resume Next
For i = 8 To 32
If Len(Cells(i, "c")) = 4 Then
Cells(i, "c").NumberFormat = "00"".""00"
Else:
Cells(i, "c").NumberFormat = "0"":""00"".""00"
End If
Next
End Sub

 

[cemşir79]

Sayın Uzmanamele büyüksün mükemmel olmuş. istediğim biçimlendirmeyi sizin yazmış olduğunuz formülle yapabiliyorum, daha önce isteğe uyarlanmış şeklinde yapamadığım için makro ihtiyacı olacağını düşünmüştüm. Ama düşüncemde yanılmışım siz formülle yaptığınız için çok çooook teşekkür ederim