मेरे पास Cbo_Vendor युक्त एक फॉर्म है जहां उपयोगकर्ता एक विक्रेता का चयन करता है (एक लिंक की गई स्प्रेडशीट की सूची के आधार पर जो विक्रेताओं और पीएन को सूचीबद्ध करता है)। इस चयन का उपयोग अलग-अलग लिस्टबॉक्स के लिए 2 चुनिंदा प्रश्नों को फ़िल्टर करने के लिए किया जाता है: (Qry_Parts) विक्रेता के लिए PN की सूची प्राप्त करने के लिए और (Qry_Team) यह निर्धारित करने के लिए कि उस विक्रेता के लिए खरीदार कौन है।

Qry_Team में 2 फ़ील्ड हैं - विक्रेता और खरीदार, और यह एक अलग लिंक्ड स्प्रेडशीट से जुड़ा है जो विक्रेताओं और खरीदारों को सूचीबद्ध करता है। विक्रेता के लिए मानदंड है

[Forms]![Summary_Form]![Cbo_Vendor]

मेरे पास Qry_Team से खरीदार का नाम प्रदर्शित करने के लिए एक सूची बॉक्स है। List_Buyer के लिए पंक्ति स्रोत है

SELECT [Qry_Team].[Buyer] FROM Qry_Team; 

और सूची बॉक्स में केवल एक ही नाम पॉप्युलेट होना चाहिए।

मैं अपनी तालिका में क्रेता का नाम सहेजने में असफल रहा हूँ।

Cbo_Vendor अपडेट होने के बाद मेरे पास सूची बॉक्स के लिए VBA कोड की आवश्यकता है। यह काम करता है।
मेरे पास सूची बॉक्स में दिखाई देने वाले एक नाम को स्वतः चुनने के लिए कोड भी है। यह भी काम करता है। मैंने अपनी तालिका में "क्रेता' फ़ील्ड को सामान्य पाठ के रूप में और तालिका/क्वेरी के आधार पर लुकअप फ़ील्ड के रूप में स्थापित करने का प्रयास किया है (उसी चयन कथन का उपयोग मेरे फॉर्म पर सूची बॉक्स के रूप में और इसे खाली छोड़कर)।

Private Sub Cbo_Vendor_AfterUpdate()
  Me.List_Buyer.Requery
  List_Buyer.Selected(0) = True
End Sub

चाहे मैं कितनी भी कोशिश कर लूं, जब तक मैं पहले से चयनित नाम पर भौतिक रूप से क्लिक नहीं करता, तब तक मुझे अपनी सारांश तालिका में खरीदार का नाम सहेजने के लिए नहीं मिल सकता। उपयोगकर्ता को उपयोगकर्ता को इसे फिर से चुनने की आवश्यकता के बिना इसे सहेजने के लिए मैं इसे कैसे प्राप्त करूं?

0
Lisa 2 जुलाई 2018, 19:55

1 उत्तर

सबसे बढ़िया उत्तर

आपके प्रश्न से यह पता लगाना कठिन हो जाता है कि आप फ़ील्ड को कैसे अपडेट कर रहे हैं - और कौन से नियंत्रण फ़ील्ड से मेल खाते हैं। आदर्श रूप से उनके गुणों के साथ नियंत्रण की एक सूची (नियंत्रण स्रोत, नियंत्रण नाम और सूची प्रश्नों के साथ जाने वाला कोई भी एसक्यूएल) इसे आसान बना देगा।

कभी-कभी प्रभावित नियंत्रणों के साथ अपने फ़ॉर्म का स्क्रीनशॉट जोड़ने से भी कल्पना करना आसान हो जाता है।

ऐसा कहने के बाद, आपने अपनी टिप्पणियाँ जोड़ने के बाद समस्या का अनुमान लगाना आसान बना दिया:

प्रपत्र TblSummary के लिए बाध्य है। प्रपत्र फ़ील्ड उस तालिका के भीतर "खरीदार" के लिए बाध्य है।

List_Buyer.Selected(0) = True के बजाय

Me!List_Buyer = List_Buyer.ItemData(0) द्वारा सीधे मान निर्दिष्ट करने का प्रयास करें

जब आप .Selected(index) प्रॉपर्टी का उपयोग करते हैं तो मान सीधे असाइन नहीं किया जाता है

1
dbmitch 5 जुलाई 2018, 22:20