Stok Çıkış Ürünleri Azalınca Uyarı Verdirme

  • Konuyu başlatan Konuyu başlatan Local
  • Başlangıç tarihi Başlangıç tarihi
Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...

Local

Katılım
4 Tem 2023
Mesajlar
81
Excel Versiyonu
Excel 2016
Excel Sürümü
32 Bit
Excel Dili
Türkçe

Ekli dosyalar

Çözüm
AhmetRasim
Merhaba,
Listeden çift tıklama sırasında mesaj ile uyarı almak için liste Private Sub lstfiş_DblClick kodlarının sonuna aşağıdaki kodları ekleyin. 30 değerini istediğiniz gibi değiştirin.
VBA: 
Private Sub lstfiş_DblClick()
If TextBox2 < 30 Then
    MsgBox txt_ad1 & " stok durumu azalmaktadır.", vbExclamation, "Uyarı"
End If
End Sub

Excel'e aktarma sırasında uyarı almak için CommandButton4_Click kodlarının sonuna aşağıdaki kodları ekleyin.
VBA: 
If CInt(TextBox2) - CInt(TextBox3) < 30 Then
    MsgBox txt_ad1 & " stok durumu azalmaktadır.", vbExclamation, "Uyarı"
End If
Tarihe göre sırala Oylamaya göre sırala
Merhaba,
Listeden çift tıklama sırasında mesaj ile uyarı almak için liste Private Sub lstfiş_DblClick kodlarının sonuna aşağıdaki kodları ekleyin. 30 değerini istediğiniz gibi değiştirin.
VBA: 
Private Sub lstfiş_DblClick()
If TextBox2 < 30 Then
    MsgBox txt_ad1 & " stok durumu azalmaktadır.", vbExclamation, "Uyarı"
End If
End Sub

Excel'e aktarma sırasında uyarı almak için CommandButton4_Click kodlarının sonuna aşağıdaki kodları ekleyin.
VBA: 
If CInt(TextBox2) - CInt(TextBox3) < 30 Then
    MsgBox txt_ad1 & " stok durumu azalmaktadır.", vbExclamation, "Uyarı"
End If
 
Oyla 0 Olumsuz oyla
Çözüm
Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...
Benzer Konular Popüler İçerikler Daha Fazlası
Geri
Üst Alt