[FORM] Altformdan ana forma koşullu veri aktarımı
#1
Selam,

Ekte resim olarak gönderdiğim form üzerinde bir tane alt form mevcut ve ben bu alt formu tıklamak suretiyle ana form üzerine verileri aktarıyorum.

Ancak; kullanıcı bu verileri aktarmadan önce ana form üzerinde bulunan IstekID alanında seçim yapmalı ve bu seçimden sonra altformdan veri aktarmalı.

Kullanıcının herhangi bir şekilde yanlışlık yapıp IstekID alanında seçim yapmadan altformdan veri aktarmak istediğinde, mesaj ile uyarmasını, aktarmayı yapmamasını ve IstekID alanının arka rengini KIRMIZI yapmasını istiyorum. Eğer IstekID seçimi yapıldıysa prosedür normal işlemeli.

Birkaç yol denedim ama olmadı. Formda alan adlarının görünmesi maksadıyla TASARIM olarak resim haline getirdim ve formların adlarını üzerine yazdım.
yardımcı olabilirseniz sevinirim.


Eklenti Dosyaları
.rar   Resim1.rar (Boyut: 414,21 KB / İndirilme: 98)



  Alıntı
Bu mesajı beğenenler:
#2
Sn alpertunga65;

1. Modul icine
Global AracIstekIDsec As Long
satirini tasiyin.

2. Frm_Arac_Gorev_Tahsisi (FORM)
Private Sub IstekID_AfterUpdate()
Me.IstekID.BackColor = IIf(AracIstekIDsec = 0, vbWhite, Me.IstekID.BackColor)
AracIstekIDsec = 1
End Sub

3. AltForm_Arac_Sofor_Bilgisi_Sorgusu (FORM)
Private Sub Form_Click()
If AracIstekIDsec = 0 Then
Me.Parent.IstekID.BackColor = vbRed
Msj = MsgBox("Arac Istek Bilgisini Secmelisiniz!", vbCritical, "ARAC ISTEK")
Else
...
...
Me.Parent.IstekID.BackColor = vbwhite
MsgBox "Arac tahsis islemleri tamamlandi"
End If
AracIstekIDsec = 0
End Sub




  Alıntı
Bu mesajı beğenenler:
#3
Sayın dsezgin83260,

Çok teşekkür ederim. Yardımınızla sorun çözülmüştür.



  Alıntı
Bu mesajı beğenenler:


Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
  [TABLO] Word Tablodan Tarih Aktarımı kahramanselim 6 541 01-10-2024, 12:34
Son Mesaj: halily
  [FORM] Acess Forma Resim Koyma Pasham 14 1.053 25-05-2024, 03:02
Son Mesaj: dsezgin
  [TABLO] Excel Aktarımı kahramanselim 6 798 06-04-2024, 21:11
Son Mesaj: kahramanselim
  [VBA] Rapora Veri Aktarımı zimbit 15 943 19-01-2024, 02:10
Son Mesaj: zimbit
  Ilgili Güne Göre Koşullu Sorgu turgay52 6 671 23-08-2023, 11:50
Son Mesaj: turgay52
  Toplu .csv, .xlsx, .xls, .xml Dosya Aktarımı Yapmak adnnfrm 2 601 22-06-2023, 19:04
Son Mesaj: dsezgin
  [FORM] Forma Arama Ekleyemedim :( finishim 16 1.208 16-05-2023, 12:44
Son Mesaj: finishim
  [VBA] 2 Koşullu Vba xberkayx 10 840 02-05-2023, 20:08
Son Mesaj: BeyTor

Foruma Git:


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