O3 Formülü Hata Verdiğinde Tarih Uyarısı Gösterme

SilinenUye8231

Kullanıcı
Katkı: %1
Excel Versiyonu
Excel 2016
Excel Sürümü
64 Bit
Excel Dili
Türkçe
Merhaba hayırlı akşamlar.

Ekte gönderdiğim excel dosyamın O3 hücresindeki formül hata verdiğinde ekrana tarih hatalı mesajını vermesini istiyorum.

Yardımcı olur musunuz?
 

Ekli dosyalar

Tarihe göre sırala Oylamaya göre sırala
Selamlar,
Dosyanıza göre, benim çözümüm
L3 hücresinde değişiklik yapılıp, L3 hücresi Tarih değilse Mesaj verilmekte...

Kod:
Bu kodu görmek için giriş yapmanız gerekmektedir (4 satır). Giriş Yap
 

Ekli dosyalar

Oyla 0 Olumsuz oyla
Sayın @SilinenUye8231 .

Bu veya başka bir belgenizde çalıştırdığınız kodlar sanıyorum,
Application.EnableEvents = False
şeklinde kod içeriyor olmalı ki Worksheet_Change kodu da devreye giremiyor.

Sayın @52779 'un verdiği çözümün, dosyanızda devreye girmesi için; bir defaya mahsus şu kodu çalıştırın.

Kod:
Bu kodu görmek için giriş yapmanız gerekmektedir (3 satır). Giriş Yap
 
Oyla 0 Olumsuz oyla
52779' Alıntı:
Selamlar,
Dosyanıza göre, benim çözümüm
L3 hücresinde değişiklik yapılıp, L3 hücresi Tarih değilse Mesaj verilmekte...

Kod:
Bu kodu görmek için giriş yapmanız gerekmektedir (4 satır). Giriş Yap
Genişletmek için tıklayın ...
Merhaba ilginiz için çok teşekkür ediyorum, kodlar benim benim istediğimi karşılamıyor, gönderdiğim örneğe göre yardımcı olur musunuz?

Yapmak istediğim ektedir.
 

Ekli dosyalar

Oyla 0 Olumsuz oyla
Ömer BARAN' Alıntı:
Sayın @SilinenUye8231 .

Bu veya başka bir belgenizde çalıştırdığınız kodlar sanıyorum,
Application.EnableEvents = False
şeklinde kod içeriyor olmalı ki Worksheet_Change kodu da devreye giremiyor.

Sayın @52779 'un verdiği çözümün, dosyanızda devreye girmesi için; bir defaya mahsus şu kodu çalıştırın.

Kod:
Bu kodu görmek için giriş yapmanız gerekmektedir (3 satır). Giriş Yap
Genişletmek için tıklayın ...
Merhaba Ömer Bey, ilginiz için çok teşekkür ediyorum
 
Oyla 0 Olumsuz oyla
ASLAN7410' Alıntı:
Merhaba Ömer Bey, ilginiz için çok teşekkür ediyorum
Genişletmek için tıklayın ...

Ömer BARAN' Alıntı:
@SilinenUye8231
Teşekkür tamam da, isteğiniz karşılandı mı karşılanmadı mı onu anlayamadım.
Genişletmek için tıklayın ...
Sayın Ömer Bey, istediğim gibi olmadı, yapmak istediğim 4.mesajımda gönderdiğim örnek.

O3 hücresini bir türlü tetiklettiremiyorum. Aşağıdaki gibi yapıyorum yine olmuyor.


Private Sub Worksheet_Change(ByVal Target As Range)
If [O3] = "#DEĞER" Then
MsgBox "Hatalı tarih"
End If
End Sub
 
Oyla 0 Olumsuz oyla
@SilinenUye8231

Sayın @52779 'un verdiği kodda esasında bir sorun yok. Sorunun kaynağı L3 hücresine veri girişinin elle yapılmıyor oluşu.

Belgede uygun bir Module veya sayfanın kod bölümüne şu kodu ekleyin.
Sonra da sayfadaki 3 nesneye ayrı ayrı sağ tıklayıp MAKRO ATA >> makronun adını seçip işlemi onaylayın.

Artık L3 hücresinde anlamlı olmayan bir tarih oluşturulursa HATA mesajını alırsınız. O3 hücresinin kullanılmasına gerek yok bence.

Kod:
Bu kodu görmek için giriş yapmanız gerekmektedir (5 satır). Giriş Yap

.
 
Oyla 0 Olumsuz oyla
Ömer BARAN' Alıntı:
@SilinenUye8231

Sayın @52779 'un verdiği kodda esasında bir sorun yok. Sorunun kaynağı L3 hücresine veri girişinin elle yapılmıyor oluşu.

Belgede uygun bir Module veya sayfanın kod bölümüne şu kodu ekleyin.
Sonra da sayfadaki 3 nesneye ayrı ayrı sağ tıklayıp MAKRO ATA >> makronun adını seçip işlemi onaylayın.

Artık L3 hücresinde anlamlı olmayan bir tarih oluşturulursa HATA mesajını alırsınız. O3 hücresinin kullanılmasına gerek yok bence.

Kod:
Bu kodu görmek için giriş yapmanız gerekmektedir (5 satır). Giriş Yap

.
Genişletmek için tıklayın ...
Sayın Ömer Bey, çok teşekkür ediyorum.

Hayırlı günler diliyourm.
 
Oyla 0 Olumsuz oyla
Yanıt için giriş yapmanız veya üye olmanız gerekir.

Benzer konular Benzer kaynaklar Benzer dosyalar

Geri
Üst