Uyarı Mesajı Verdirmek İstiyorum

[iplikci_80]

Arkadaşlar yapmak istediğim şey, gönderdiğim örnek belgesinin D31 hücresi sıfırdan büyük olduğu zaman, belgeyi açtığımda, D31 değerince yani örnekteki gibi "2 ÖZÜRLÜ PERSONEL İHTİYACINIZ VAR" şeklinde uyarı mesajı verdirmek istiyorum. Bu konuda yardımlarınızı bekliyorum. Herkese teşekkürler.

 

[Mehmet Şahin]

Merhaba,
Vb editöründeki "Thisworkbook" kod bölümüne aşağıdaki kodları kopyalayıp deneyiniz. İyi çalışmalar.

Private Sub Workbook_Open()
If Sheets("İCMAL").[D31] > 0 Then
MsgBox Sheets("İCMAL").[D31] & " ÖZÜRLÜ PERSONELE İHTİYACINIZ VAR!", vbCritical, "DİKKAT!"
End If
End Sub

 

[iplikci_80]

Çok teşekkür ederim.

 

[Mehmet Şahin]

Rica ederim, kolay gelsin.