[VBA] Formdaki Açılır Kutunun Değerine Göre İşlem Yapmak
#1
Arkadaşlar Formumda bir açılır kutu var. Bir de Taksit Gir butonu. Taksit Gir butonu tıklandığında eğer açılır kutudaki değer Aktif se diğer kontrollerden sonra form açsın değilse kaydı aktif yapın diye mesaj versin. Bununla ilgili aşağıdaki kodu yazdım ancak durum Aktif olsa bile Aktif Yap Mesajı geliyor. Nedeni ne olabilir. VT ekte. İlgileneceklere şimdiden teşekkürler.

If (Me.oDurum) <> Aktif Then
MsgBox ("Aktif Yap!")
ElseIf......
Else
DoCmd.OpenForm "frmTaksit",....
End If



  Alıntı
Bu mesajı beğenenler:
#2
sn EminA
uygulamanızda yukarıda vermiş olduğunuz kodu bulamadım. Şöyle açıklayayım.
Eğer 2 kriter kıyaslayacaksanız ElseIf kullanmanıza gerek yok. 3 ve daha fazla ise kullanabilirsiniz.

Visual Basic
  1. If (Me.oDurum) <> "Aktif" Then ' Yani pasif ise
  2. MsgBox ("Aktif Yap!")
  3. Else ' Aktif ise
  4. DoCmd.OpenForm "frmTaksit",.... ' frm Taksit formunu aç
  5. End If





  Alıntı
Bu mesajı beğenenler:
#3
(04-04-2017, 12:56)onur_can demiş ki: sn EminA
uygulamanızda yukarıda vermiş olduğunuz kodu bulamadım. Şöyle açıklayayım.
Eğer 2 kriter kıyaslayacaksanız ElseIf kullanmanıza gerek yok. 3 ve daha fazla ise kullanabilirsiniz.

Visual Basic
  1. If (Me.oDurum) <> "Aktif" Then ' Yani pasif ise
  2. MsgBox ("Aktif Yap!")
  3. Else ' Aktif ise
  4. DoCmd.OpenForm "frmTaksit",.... ' frm Taksit formunu aç
  5. End If



Onur Hocam, kod istediğim gibi çalışmayınca silmiştim. Kontrol edilecek 2 den fazla kriter olduğu için ElseIf kullanmıştım. Sanırım Aktif kısmını tırnak içerisinde kullanmadım o yüzden olabilir.

Tırnak içine aldım sorun çözüldü. Teşekkürler Onur Hocam.Uzun süre aynı şeylerle uğraşınca basit birşeyi bile göremiyor insan.



  Alıntı
Bu mesajı beğenenler:


Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
  [FORM] 1. Açılır Kutudan Tablo Sütunlarını Seçeyim. 2. Açılır Kutudan Filtreleme Yapayım. ŞabanTR 4 144 10-01-2024, 14:10
Son Mesaj: dsezgin
  Açılır Kutu Değerine Göre Tablo2'ye Değer Yazsın Veya Satır Eklesin. ŞabanTR 11 299 24-12-2023, 14:38
Son Mesaj: dsezgin
  Aynı Tarihli Veri Varsa Işlem Yapmasın Ve Sql Col Sayısını Arttırma snapper 9 318 20-10-2023, 00:36
Son Mesaj: dsezgin
  Toplu .csv, .xlsx, .xls, .xml Dosya Aktarımı Yapmak adnnfrm 2 241 22-06-2023, 19:04
Son Mesaj: dsezgin
  Altformda Hücre Ile Değil Satır Ile Işlem Yapma Hakkında. OGUZTURKYILMAZ 1 160 22-04-2023, 23:48
Son Mesaj: OGUZTURKYILMAZ
  Formdaki Veriyi Rapora Aktaramadım ankaram 2 156 18-02-2023, 21:51
Son Mesaj: ankaram
  Aktif Formdaki Raporu Yazdırma ankaram 3 187 27-01-2023, 00:46
Son Mesaj: BeyTor
  Alt Formdaki Alanların kursun 3 114 10-01-2023, 20:28
Son Mesaj: BeyTor

Foruma Git:


Bu konuyu görüntüleyen kullanıcı(lar): 1 Ziyaretçi