Hücre Değeri Değişince Sesli Alarm Almak

VBA Makrolar ile ilgili sormak istedikleriniz, yapmak istedikleriniz hakkında yardım alabileceğiniz bölümdür.

Hücre Değeri Değişince Sesli Alarm Almak

İleti#1)  atilla13 » 17 Haz 2021 11:12

İyi günler;

Bir hücrede değer değiştiğinde sesli uyarı almak istiyorum. AZ1 hücresinde; =EĞER(MAK(AZ4:AZ235)>=5;"BUYING ALARM";"") formülü var. Bu sayfanın kod bölümünde;
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Range("AZ1")) Is Nothing Then Exit Sub
Application.OnTime Now + TimeValue("00:00:05"), "ALARM"
End Sub

makrosu ile Modül1'de

Sub ALARM()
Beep
End Sub

var. Manuel olarak AZ1 hücresine herhangi bir şey yazıp değerini değiştirdiğimde sesli uyarı vermektedir. Ancak, programın çalışıp, yaptığı analiz sonucunda AZ4:AZ235 arasındaki uygun bir değere göre AZ1 'de "BUYING ALARM" neticesi aldığımda uyarı gelmemektedir. Bu sorunu çözmemde ve uyarı sesinin 1 kez değil de 15-20 kez verilmesini sağlayacak değişiklik hakkında yardımcı olursanız çok teşekkür ederim. Sağlıklı günler.
Bu iletideki ekleri görmek için gerekli yetkilere sahip değilsiniz.
Kullanıcı avatarı
atilla13
Yeni Başlamış
 
Kayıt: 06 Mar 2017 11:47
Meslek: Emekli
Yaş: 53
İleti: 44
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Ankara

Cevap: Hücre Değeri Değişince Sesli Alarm Almak

İleti#2)  şahin » 17 Haz 2021 22:40

Kod: Tümünü seç
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Range("AZ1")) Is Nothing And Range("AZ1") = "BUYING ALARM" Then
Application.OnTime Now + TimeValue("00:00:05"), "ALARM"
End If
End Sub


Kod: Tümünü seç
Sub ALARM()
For i = 1 To 15
DoEvents
Beep
Start = Timer
Do
DoEvents
Finnish = Timer
Loop While Finnish - Start <= 1
Next i
End Sub
Kullanıcı avatarı
şahin
Site Dostu
 
Kayıt: 30 Eyl 2016 21:24
Meslek: memur
Yaş: 32
İleti: 1203
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: bursa

Cevap: Hücre Değeri Değişince Sesli Alarm Almak

İleti#3)  atilla13 » 18 Haz 2021 11:19

Teşekkürler. Kod'u sayfaya, ALARM'ı da Modül1 e yazıp çalıştırdığımda. Şu hatayı veriyor.
Bu iletideki ekleri görmek için gerekli yetkilere sahip değilsiniz.
Kullanıcı avatarı
atilla13
Yeni Başlamış
 
Kayıt: 06 Mar 2017 11:47
Meslek: Emekli
Yaş: 53
İleti: 44
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Ankara

Cevap: Hücre Değeri Değişince Sesli Alarm Almak

İleti#4)  şahin » 18 Haz 2021 21:22

o satırı silip deneyin
Kullanıcı avatarı
şahin
Site Dostu
 
Kayıt: 30 Eyl 2016 21:24
Meslek: memur
Yaş: 32
İleti: 1203
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: bursa

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

Forum Genel Makro Soruları

Online Kullanıcılar

Bu forumu görüntüleyenler: AhrefsBot ve 0 misafir

Bumerang - Yazarkafe