Çözüldü Texbox sayı formatı ve sayı formatının kodlaması hk,

If TextBox39 <> Empty And TextBox40 <> Empty Then TextBox41 = Format(WorksheetFunction.Round(TextBox39 / TextBox40, 3), "0.0##")
kodunuzu
HTML: şeklinde dener misiniz

azraep' Alıntı:

If TextBox39 <> Empty And TextBox40 <> Empty Then TextBox41 = Format(WorksheetFunction.Round(TextBox39 / TextBox40, 3), "0.0##")
kodunuzu
HTML:

Kod: Kodları Kopyala

İçeriği görebilmek için Giriş yap ya da Üye ol.

şeklinde dener misiniz

Genişletmek için tıkla...

azraep Hocam Selam,
Herhangi bir değişiklik olmadı.
Aynı durum devam ediyor. Paylaştığınız kodda round / roundup değişikliği görüyorum. Hiç bir etkime tepkime olmadı.

HTML:
buna uyguladım ve çalışıyor

azraep' Alıntı:

HTML:

Kod: Kodları Kopyala

İçeriği görebilmek için Giriş yap ya da Üye ol.

buna uyguladım ve çalışıyor

Genişletmek için tıkla...

azraep hocam;

Aynısını uyguluyorum fakat yarım saat aralıklarında problem devam ediyor.
Tam saatlerde problem yok, çözemedim bir türlü şaştım kaldım...
Görselde bulunan sarı ünlem işaretine tıklıyorum sayıya dönüştür demek durumunda kalıyorum. Direk kayıt sonrası sayıya dönüştürülmüş olması gerekiyor 1,2/2,5/3,5/4,5/5,5/6,5/7,5 vs... bu yarım saatlik dilimlerde sayı olarak görmüyor texboxtan aktardıktan sonra...

Merhabalar,
Probleminiz tamamen tür dönüşümlerinden kaynaklı, bunu kendi bilgisayarınızda çözebilirsiniz sadece, bizim bilgisayarımızdaki ondalık ve binlik ayracına göre çalışan hesaplama, sizin ondalık ve binlik ayraçlarınız farklı olduğu için hata verecektir.
Şöyle özetleyeyim,
Textbox'a bir değer giriyorsunuz.
Bu değer aksini belirtmezseniz "string" formatındadır.
Hesaplama yapmadan önce Textbox değerini "Cdbl" ya da "Cint" ile double ya da integer formatına çevirmeniz gerekir.
15,10 textbox değeri normalde "15,10" algılanırken Cdbl(textbox) dediğimizde 15,1 Cint(textbox) dediğimizde 15 olarak algılanacaktır.
Hesaplama bittikten sonra sonucu excele aktardığımızda, aktarılan değer aksini belirtmezsek genel olarak algılanır. Bu da karışıklığa neden olacaktır.
ExcelHücresi=Cdbl(HesaplamaSonucu) olarak aktarırsak yine dönüşümü yaptığımız için problem kalmayacaktır.

Tavsiye olarak, hesaplama yaparken değişken tanımları yaparak değerleri bu değişkenler üzerinden oluşturun.
Textbox1=Budur demek yerine;
Dim a=double
a=Textbox1.value
şekline tanımlama yaparsanız, textbox değeri a'ya atanırken double olarak belirlenecek ve hesaplama içerisinde sorun yaratmayacaktır.
Özetle;
Vba Değişken tanımları ve tür dönüşümleri olarak araştırabilirsiniz.