[Yardım]  hata mesajı vermeye çalışıyorum

Mesaj Kutusu. Programcıların olmazsa olmazlarından.

hata mesajı vermeye çalışıyorum

İleti#1)  domesdos » 02 May 2017 08:23

Merhaba;
Sorum şu bir sütunda işlem yapıldığında o işlem eğer 0'ın altına düşerse mesajbox ile uyarı vermesini istiyorum. ama 1 kere yaptıktan sonra tekrar devam etmiyor. bu konuda yardımcı olabilirseniz çok memnun olurum. şimdiden teşekkür ederim
Kullanıcı avatarı
domesdos
 
Kayıt: 02 May 2017 08:12
Meslek: Muhasebe
Yaş: 39
İleti: 5
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: HATAY

Cevap: hata mesajı vermeye çalışıyorum

İleti#2)  askmadige34 » 02 May 2017 11:23

Örnek dosya eklerseniz yardımcı olmaya çalışalım.
askmadige34
Forum Moderatörü
 
Kayıt: 20 Kas 2015 11:04
Meslek: memur
Yaş: 38
İleti: 1697
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Kayseri

Cevap: hata mesajı vermeye çalışıyorum

İleti#3)  domesdos » 02 May 2017 12:13

dosyayı nasıl ekliyorum acaba?
Kullanıcı avatarı
domesdos
 
Kayıt: 02 May 2017 08:12
Meslek: Muhasebe
Yaş: 39
İleti: 5
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: HATAY

Cevap: hata mesajı vermeye çalışıyorum

İleti#4)  askmadige34 » 02 May 2017 12:42

http://www.dosyaupload.com bu linke ekleyin. Linkini buraya yazın.
askmadige34
Forum Moderatörü
 
Kayıt: 20 Kas 2015 11:04
Meslek: memur
Yaş: 38
İleti: 1697
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Kayseri

REKLAM
Excel Logo XML Oluşturucu
Logo Object Designer ile Uyarlama

Cevap: hata mesajı vermeye çalışıyorum

İleti#5)  domesdos » 02 May 2017 13:04

http://www.dosyaupload.com/hi5U

Basit bir şey olacak sadece "-'ye" düştüğünde uyarı versin.
Teşekkür ederim
Kullanıcı avatarı
domesdos
 
Kayıt: 02 May 2017 08:12
Meslek: Muhasebe
Yaş: 39
İleti: 5
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: HATAY

Cevap: hata mesajı vermeye çalışıyorum

İleti#6)  askmadige34 » 02 May 2017 13:48

Eğer buton ile yapmaya çalışıyorsanız
Kod: Tümünü seç
Sub deneme()
Application.Calculation = xlCalculationAutomatic
If [E3] < 0 Then
MsgBox "Fazla Giriş", vbCritical, "Ataş"
End If
End Sub


Eğer girince otomatik yapsın istiyorsanız.
Kod: Tümünü seç
Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Column = 4 Then
        Application.EnableEvents = False
        Application.Calculation = xlCalculationAutomatic
        If Target.Offset(, 1) < 0 And Target.Offset(, -1) <> Empty Then
            Target.Offset(0, 0).Select
            MsgBox "Fazla Giriş", vbCritical, "Ataş"
        End If
    Application.EnableEvents = True
    End If
End Sub
askmadige34
Forum Moderatörü
 
Kayıt: 20 Kas 2015 11:04
Meslek: memur
Yaş: 38
İleti: 1697
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Kayseri

REKLAM
ETA - Excel Konsolide Raporlama
ETA Excel Personel Entegre Raporu

Cevap: hata mesajı vermeye çalışıyorum

İleti#7)  domesdos » 02 May 2017 16:26

Teşekkür ederim.
E sütununda her yanlış yazıldığında hata vermesini istiyorum. bu kodu yazarsam her seferinde hata verecek mi?
Kullanıcı avatarı
domesdos
 
Kayıt: 02 May 2017 08:12
Meslek: Muhasebe
Yaş: 39
İleti: 5
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: HATAY

Cevap: hata mesajı vermeye çalışıyorum

İleti#8)  domesdos » 03 May 2017 08:32

Rica etsem bir örnek yaparak gönderebilir misiniz? Bir türlü beceremedim run sub tuşuna bastığımda create bölümü çıkıyor ve takılıp kalıyorum. Nasıl bir yol izlemem gerekiyor yardımcı olursanız sevinirim. Şimdiden teşekkür ederim.
Kullanıcı avatarı
domesdos
 
Kayıt: 02 May 2017 08:12
Meslek: Muhasebe
Yaş: 39
İleti: 5
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: HATAY

Cevap: hata mesajı vermeye çalışıyorum

İleti#9)  askmadige34 » 03 May 2017 09:21

askmadige34
Forum Moderatörü
 
Kayıt: 20 Kas 2015 11:04
Meslek: memur
Yaş: 38
İleti: 1697
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Kayseri

Cevap: hata mesajı vermeye çalışıyorum

İleti#10)  Tarkan VURAL » 03 May 2017 22:59

Makro kullanmadan veri doğrulama denetimi ile de uyarı verdirebilir, işlemi durdurmayı ya da devam edilmesini sağlayabilirsiniz.
Resim
www.tarkanvural.com.tr

İnnâ lillâhi ve innâ ileyhi raciûn
Şüphesiz ki; biz Allah’a âidiz ve vakti geldiğinde O’na döndürüleceğiz.

HasbunAllâhu ve nimel vekîl
Bize Allah yeter. O ne güzel vekildir.


ExcelVBA.NET' e katkıda bulunmak ister misiniz ? O halde BAĞIŞ butonunu tıklayın...
Kullanıcı avatarı
Tarkan VURAL
Yönetim Kurulu
 
Adı Soyadı:Tarkan VURAL
Kayıt: 14 Haz 2008 18:27
Konum: @tarkanvural73
Meslek: LUU, Database Expert, Senior Software Specialist, Developer
Yaş: 45
İleti: 26991
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: İstanbul - Beylikdüzü


Forum MsgBox

Online Kullanıcılar

Bu forumu görüntüleyenler: Kayıtlı kullanıcı yok ve 1 misafir

Bumerang - Yazarkafe