• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

Kodlar veya formüller bilgisayardan bilgisayara farklılık gösterirmi

F

ferhatgurbuz

Katılım
8 Haziran 2007
Mesajlar
761
Excel Vers. ve Dili
excel- 2003 Türkçe
yani benim bilgisayarda artı gözüken bir rakam , başka bilgisayarda eksi değer alıyor, yada benim bilgisayarda ondalılkı gözüken bir sayı başka bir bilgisayarda ondalıksız gözüküyor. Bu söylediklerim form üzerinden bilgi gönderince yada form üzerine bilgi çağırınca oluyor.
 
Merhaba,

İhtimallerden biri; formülü kopyaladığınız hücredeki biçim ile(Hücre Biçimlendirme), başka bir sayfadan aldığınız hücrenin biçimlendirmeleri farklı ise bu söylediğiniz olabilir..
 
evet başka bir sayfadan kopya aldım
tamam teşekkür ederim
 
Dim topla1, topla2 As Single
For x = 30 To 47 'Burayı Textbox sayısına göre düzeltiniz.
If IsNumeric(Controls("TextBox" & x)) Then
topla1 = topla1 + Controls("TextBox" & x) * 1
End If
Next
TextBox67 = topla1
topla = 0
For x = 50 To 63 'Burayı Textbox sayısına göre düzeltiniz.
If IsNumeric(Controls("TextBox" & x)) Then
topla2 = topla2 + Controls("TextBox" & x) * 1
End If
Next
TextBox68 = Format(topla2, "#,##0.00")
TextBox69 = Format(TextBox67, "#,##0.00") - Format(TextBox68, "#,##0.00")
End Sub

Form üzerindeki textboxlarda virgüllü gözüküyor ama alt toplalarda başka bir bilgisayarda virgülsüz oluyor
 
Form üzerindeki textboxlarda virgüllü gözüküyor ama alt toplalarda başka bir bilgisayarda virgülsüz oluyor
Genişletmek için tıkla ...
Alt toplam dediğniz yer neresi sayfadaki hücremi yoksa Userform üzerinde bulunan bir textbox'Mı?
 
Evren Hocam yukarıdaki kod ile TexBoxlar daki toplamları alıyorum. Yani 30-47 arısını TextBox 67'ye, ve 50-63 arasını TextBox 68'e ve 67 ile 68 arasındaki farkıda TexTbox 69'a alıyorum. Yain form üzerindeki TextBoxlardaki rakamlar düzgün gözüküyor,40,52, 10,55, 52,78 gibi yani YTL ye uyumlu gözüküyor. Ama 67, 68, ve 69 a toplam alırken virgülsüz gözüküyor. Bu benim bilgisayarda değil aynı proğramı başka bir bilgisayarda açtığımda oluyor.
 
aşağıdaki kodları deneyiniz.:cool:
Kod: 
Dim topla1, topla2 As double
For x = 30 To 47 'Burayı Textbox sayısına göre düzeltiniz.
If IsNumeric(Controls("TextBox" & x)) Then
topla1 = topla1 + Controls("TextBox" & x) * 1
End If
Next
TextBox67 = format(topla1,"#,##0.00")
topla = 0
For x = 50 To 63 'Burayı Textbox sayısına göre düzeltiniz.
If IsNumeric(Controls("TextBox" & x)) Then
topla2 = format(topla2 + Controls("TextBox" & x) * 1,"#,##0.00")
End If
Next
TextBox68 = Format(topla2, "#,##0.00")
TextBox69 = format(cdbl(TextBox67) - cdbl(TextBox68),"#,##0.00")
End Sub
 
teşekkürler hocam kolay gelsin. hayırlı akşamlar
 
Evren Hocam Yukarıdaki kodu denedim ama gene olmadı. Ya çok ilginç benim olduğum yerde iki arkadaş daha var onların bilgisayarlarındada çalışıyor. Ama üst kata çıkıyorum orda farklı çılışıyor. Bende 1.381,22-YTL olan rakam diğer bilgisayarda 137.627,00 oluyor.
 
Bölgesel Seçenekler > Para Birimi, orayı bir kontrol edin. Değişen bir şey olmazsa, format atın, derim.
 
denetim masasından bölgesel seçeneklere ulaşabilirsiniz.Sayın seyit beyin dediklerinini yanı sıra sayılarda bakın binlik ayıraçlar nokta ondalık ayıraçlarda virgül şeklinde ayrılmış olmalı.:cool:
 
Baktım hocam ama bölgesel seçeneklerde sorun yok. Sadece Üç tane TextBoxta sorun var. Form üzerinde bulunan excel sayfasından veri alan TextBoxlarda sorun yok. Bu textBoxları topladığım üç TextBoxta sorun oluyor.
 
Bir bilgisayarda doğru çalışıyorsa başka bilgisayarda doğru çalışmıyorsa bu o bilgisayarın ayarlarında türkçe sayı tarih ve para ayarı olmadığı için olabilir.Başkacada bir şey olamaz.
Yanlış gösteren bilgisayardaki denetim masasından bölgesel ayarlardan sayıların ve para birimin formatına bakıp aynisini buraya yazarmısınız?:cool:
 
Dosya Ektedir

Bende gözükenler bu şekilde.
 
Son düzenleme:
ferhatgurbuz' Alıntı:
Sorunlu bilgisayardaki ayarlar böyle
Genişletmek için tıkla ...
Windowsun ayarlarında bir sorun gözükmüyor.
Birde excel'de seçenekler-Uluslararası-Sistem ayırıcaları'nı kullan onaylı değilse onaylayınız.Aklımada başka bir şey gelmiyor.:cool:
 
Cevap yazmak için giriş yap yada kayıt ol.
Geri
Üst