metin kutusunda hata

Katılım
24 Eylül 2005
Mesajlar
332
metin kutusuna hatalı girişte uyarı

Sayın modalının vermiş olduğu örnekle yapmış olduğum çalışmada metin kutusuna sayı veya harf girilmesi haline hata kontrolü ile hata mesajı veriyor. diğer metin kutusuna geçiyor. ben aynı metin kutusunda kalmasını sağlayamadım. bu konuda yardımınızı rica ediyorum.
 
Son düzenleme:
Katılım
15 Kasım 2006
Mesajlar
583
Excel Vers. ve Dili
Ms Office 2003 Türkçe
adet için

adet_Exit(Cancel As Integer)

olayını kullanın. şart sağlanmazsa cancel = true yapın.
 
Katılım
24 Eylül 2005
Mesajlar
332
If IsNumeric(adet) Then
Cancel = False
Else
Cancel = True
End If

ifadesi ile nümerik girişleri önleyebiliyorum, fakat 6+5 sonuçuda nümerik olduğu için sorunumu çözemiyorum.
 
Katılım
25 Aralık 2005
Mesajlar
4,160
Excel Vers. ve Dili
MS Office 2010 Pro Türkçe
Sayın GKMER,

Bir kere yazdığınız kod ters

Kod:
Private Sub alan_BeforeUpdate(Cancel As Integer)
If IsNumeric(alan) Then
Cancel = True
Else
Cancel = False
End If
End Sub
Şeklinde olmalı ve 6+5 i metin olarak kabul ediyor.

İyi çalışmalar:)
 
Katılım
24 Eylül 2005
Mesajlar
332
Sayın Modalı dediğiniz şekildede denedim. Sorunum 6+5 yazdığımda bunu 11 olarak görmeli ve diğer kutuya geçmeli. 6.7 yazdığımda 6,7 olarak hesaba girmeli, diğer kutuya geçmeli bu ikisini sağlaması için 5,5 leri tanımıyacağı için uyarı ile birlikte aynı kutuda kalmalı.Daha önce verdiğiniz örnekle oluşturduğum çalışma ekte.
 
Katılım
25 Aralık 2005
Mesajlar
4,160
Excel Vers. ve Dili
MS Office 2010 Pro Türkçe
Sayın GKMER,

Gönderdiğim örneği iyice inceleyin. Orada görünmeyen kutular var, hesaplama orada yapılıp asil kutuya yazılıyor. Siz bu kutularaı eklemediniz. Aslında bir tane görünmez kutu yeter. Hepsiniz hesabı yapılabilir bunun üstünden.

İyi çalışmalar:)
 
Katılım
24 Eylül 2005
Mesajlar
332
Sayın Modalı sabrınıza güvenerek yazıyorum çok uzatma oldu ama. Diğer kutuları hesaplama için kullanıyorum. Görünen kutulardaki ifadeleri yazıcıdan çıktı olarak alacağım. Bundan dolayı sorunumun çözümü varsa düzeltip göndermenizi rica edeceğim.
 
Katılım
25 Aralık 2005
Mesajlar
4,160
Excel Vers. ve Dili
MS Office 2010 Pro Türkçe
Sayın GKMER,

Tam olarak yaptırmak istediğinizin işlemin mantığını yazarsanız daha çabuk çözüme ulaşabiliriz.
 
Katılım
24 Eylül 2005
Mesajlar
332
Yaptırmak istediğim. Adet, en, boy, yük kutularındaki rakamları çarptırmak. Yanlız girişleri yazıcı çıktısında da görüntülemek için örnek olarak (6.60+3.70)/2 şeklinde girebileyim. bu işlemin sonuçu 5.35 çarpıma 5.35 olarak girsin ama kutuda açık olarak ((6.60+3.70)/2) görünsün ( yazıcı çıktısı için ) ayrıca kutu boş ise değer çarpımda 1 olsun çarpanı sıfırlamamak için. Tabi sadece 6 veya 6.57 olarakta girilebilsin. enter bastığımda diğer kutuya gitsin. bunu yaparken girişler metin olduğu için virgüllü girişleri kabul etmiyor. ( nümerik karakter) bu şekilde girişlerde veya hatlı girişlerde uyarsın ve aynı kutuda kalsın hata yoksa diğer kutuya geçsin.
 
Katılım
16 Kasım 2005
Mesajlar
1,090
Excel Vers. ve Dili
Access 2002
sayın modalı, slm.lar

bu gün 18:17 'de gönderdiğiniz mesajda ve öncekilerdeki kod yazım kısmını nasıl farklı olarak gösteriyorsunuz resim gibi yani mesajdan farklı olarak yazarmısınız?
 
Katılım
25 Aralık 2005
Mesajlar
4,160
Excel Vers. ve Dili
MS Office 2010 Pro Türkçe
Sayın karaayhan,

Çok basit. Kod olarak göstermek istediğimiz kısmı seçeriz ve daha sonra üst kısımda # e basarız. o sırada code tagı eklendiğini gösteren yazılar görünür, ancak yazılarda bir değişiklşik olmaz. Cevabı gönderdiğimizde kod olarak göründüğünü görürüz.

iyi çalışmalar
 
Katılım
16 Kasım 2005
Mesajlar
1,090
Excel Vers. ve Dili
Access 2002
============sadece deneme============

Private Sub alan_BeforeUpdate(Cancel As Integer)
If IsNumeric(alan) Then
Cancel = True
Else
Cancel = False
End If
End Sub
 
Katılım
16 Kasım 2005
Mesajlar
1,090
Excel Vers. ve Dili
Access 2002
Sayın karaayhan,

Çok basit. Kod olarak göstermek istediğimiz kısmı seçeriz ve daha sonra üst kısımda # e basarız. o sırada code tagı eklendiğini gösteren yazılar görünür, ancak yazılarda bir değişiklşik olmaz. Cevabı gönderdiğimizde kod olarak göründüğünü görürüz.

iyi çalışmalar
Nerde bu söylediğiniz # ben bulamadım inanın ve denedim olamdı gördüğünüz gibi?
 
Katılım
24 Eylül 2005
Mesajlar
332
Sorunumu çözdüm. İlgilenen arkadaşlara teşekkür ederim.
 
Üst