Program Başka Bilgisayarda Sorunlu Çalışıyor.

[alpay1]

Merhaba,
Değerli arkadaşlar, izin verirseniz benim birkaç sorum olacak.
Yaptığım Programda aşağıdaki örnek kodlarla Form üzerinde TextBox larla çarpma işlemi yapıyorum.Hiçbir sorun yok.
Fakat aynı programı başka bir bilgisayarda çalıştırınca kuruşlu işlemlerde sorun oldu:
Ã?rnek: 10,25 YTL * 5 (ADET) = 501,25 gibi bir sonuç çıkarıyor.
Private Sub TextBox8_Change()
TextBox8 = Format(TextBox8.Value, "#,##0.00")
If IsNumeric(TextBox14) And IsNumeric(TextBox8) Then
TextBox13 = CCur(TextBox14) * CCur(TextBox8)
End If
End Sub

Ayrıca Form üzerindeki TextBox1 için (TextBox1 = Date) kodunu yazdım.Benim bilgisayarımda buradaki tarih 24.05.2005 formatında görüntülenirken (Form Açılışında Private Sub UserForm_Activate ) o bilgisayarda 24/05/2005 formatında görünüyor.Denetim Masasından bilgisayarın tarih formatını ayarlamış olmama rağmen.

Üçüncü sorum Form üzerinde bulunan Calender nesnesinden TextBox’a tarih yazdırıyorum.Yine benim bilgisayarımda sorun olmamasına rağmen, diğerinde tarih yazdırırken eğer tarih 01.05.2005 ise 05.01.2005 olarak yazıyor ama 10.05.2005 ise normal yani 10.05.2005 olarak yazıyor.Yani gün on dan küçük ise ay olarak görüyor.

Bu sorunların nedeni ve çözümü hakkında yardımcı olursanız sevinirim.
Soruların hepsi birbirine bağlantılı olduğu için aynı başlık altında sordum.
Herkese iyi çalışmalar dilerim.

 

[selections]

Diğer makinanın bölgesel ayarlarınından ondalık ve basamak ayıraçlarını kontrol edin. çok büyük bir ihtimalle sorun buradadır.

 

[Ongun]

Sayfa3.Cells(i, 12) = CCur(Sayfa3.Cells(i, 12).Value * 1) + CCur(TextBox12.Value * 1)
Sayfa3.Cells(i, 13) = CCur(Sayfa3.Cells(i, 9).Value * 1) + CCur(Sayfa3.Cells(i, 10).Value * 1) + CCur(Sayfa3.Cells(i, 11).Value * 1) + CCur(Sayfa3.Cells(i, 12).Value * 1)

Merhaba aynı sorunu bende yaşamıştım. Ancak kodlarımı yukarıdaki şekilde yazınca çözüm buldum. NOT: TextBox`lara rakamı (10.000,02) YTL şeklinde girmen lazım. Denemeni tavsiye ederim. Sonuca ulaşacağına inanıyorum.
String değerleri numerik değere çeviriyor yani her bilgisayarda tanıyor. Ayrıca rakamları yazdıracağın sütunun hücre değerlerini "SAYI" olarak ayarla binlik ayracı ve ondalığı 2 yap. Umarım çözüm bulursun. Kolay gelsin.

 

[alpay1]

Sayın Ongu Bey dediğinizi yapmam için programı komple değiştirmrm gerekiyor.Buda günler alır.Başka bir çözümü varmıdıdır acaba?

 

[Ongun]

Sayın Ongu Bey dediğinizi yapmam için programı komple değiştirmrm gerekiyor.Buda günler alır.Başka bir çözümü varmıdıdır acaba?

Sayın alpay1, bahsettiğiniz konu beni aştı. Sizin sorununuza ançak üstadlarımız çare olur. Benden bu kadar. Umarım çözümünü bulursunuz. Selamlar.

 

[alpay1]

Sayın Ongun yardımlarınız için teşekkürler.
Bu sorun olan program "Excel İçin Programlar" bölümünde yayınlanan "Cari Takip Programı".
İlgilenen arkadaşlar o programada bakabilir.
1*1,2=12 olarak hesaplıyor.

Üstatların yardımlarını bekliyorum.

 

[abazya]

Sn:alpay merhaba
Mesaj sayınız 100 geçmiş hala excel versiyonunuz yazılmamış üstatlardan yardım diyorsunuz nasıl yardım etsinler
Nedemelerini bekliyorsun araçlar=seçenekler = ........mi yoksa tools=.....mı diyecekler önce onu bir düzeltin sonra Sn:selections dediklerini yabana atmayın kendiniz yazmışsınız 1*1,2=12 olarak hesaplıyor hata ben burdayım diye basss baaas bağırıyor ve diyorki iki bigisayar arasında (versiyonlarını bilemediğim için şu kısımda diyemiyorum ) farklılıkları karşılaştır
Kısaca söylüyorum 2. PC virgül okumadan işlem yap komutu ile çalışıyor Kusura bakma bu kadar olabiliyor

 

[alpay1]

Sn.abazya
Serzenişlerinizde haklısınız.Excel Versiyonunu yazmam gerekirdi.
Excel2003/TR
Program bu versiyonla yapıldı.Þu anda kullanıldığı PC de de aynı versiyon var.
Sayın selections beyin dediklerini yabana atmış değilim.Onu zaten yapmıştım.
YTL uyum programlarıda yüklü.PCnin Tarih ve sayı formatlarıda doğru.
Ben bilgim dahilinde bütün olasılıkları denedikten sonra altından kalkamayınca sizlerden yardım istedim.Bunun çözümünün çok basit olabileceğinide tahmin ediyorum ama ben çözemedim.
Sizin söylediğiniz " 2. PC virgül okumadan işlem yap komutu ile çalışıyor" virgül okumadan işlem yap komutu nerededir ve nasıl düzeltilir? açabilirmisiniz.
Teşekkürler.
Herkese kolay gelsin.

 

[xxrt]

Serzenişlerinizde haklısınız.Excel Versiyonunu yazmam gerekirdi.
Excel2003/TR

İmza kısmınıza tarafımdan yazılmıştır.
Teşekkürler.