گھڻن چونڊ سان ڊراپ ڊائون لسٽ

هڪ ايڪسل شيٽ ۾ کلاسک ڊراپ-ڊائون لسٽ عظيم آهي، پر اها توهان کي صرف پيش ڪيل سيٽ مان هڪ اختيار چونڊڻ جي اجازت ڏئي ٿي. ڪڏهن ڪڏهن اهو ئي آهي جيڪو توهان چاهيو ٿا، پر اهي حالتون آهن جتي صارف کي چونڊڻ جي قابل هوندو ڪجهه فهرست مان عناصر.

اچو ته اهڙي گھڻن چونڊيل فهرست جي ڪيترن ئي عام عملن کي ڏسو.

آپشن 1. افقي

صارف هڪ هڪ ڪري ڊراپ-ڊائون لسٽ مان شيون چونڊيندو آهي، ۽ اهي ظاهر ٿيندا آهن سيل جي ساڄي پاسي تبديل ٿي رهيا آهن، خودڪار طور تي افقي طور تي درج ٿيل آهن:

سيلز ۾ ڊراپ-ڊائون لسٽون C2:C5 هن مثال ۾ معياري طريقي سان ٺاهيا ويا آهن، يعني

  1. سيلز C2:C5 چونڊيو
  2. ٽيب يا مينيو ڊيٽا هڪ ٽيم چونڊيو ڊيٽا جي تصديق
  3. کليل ونڊو ۾، هڪ اختيار چونڊيو فهرست ۽ حد جي طور تي بيان ڪريو ذريعو فهرست A1:A8 لاءِ ماخذ ڊيٽا سان سيل

پوء توهان کي شيٽ ماڊل ۾ هڪ ميڪرو شامل ڪرڻ جي ضرورت آهي، جيڪو سڄو ڪم ڪندو، يعني گرين سيلز جي ساڄي پاسي چونڊيل قدر شامل ڪريو. هن کي ڪرڻ لاء، ڊروپ-ڊائون لسٽن سان شيٽ ٽيب تي صحيح ڪلڪ ڪريو ۽ حڪم چونڊيو سورس ڪوڊ. هيٺ ڏنل ڪوڊ پيسٽ ڪريو Visual Basic ايڊيٽر ونڊو ۾ جيڪو کلي ٿو:

Private Sub Worksheet_Change(ByVal Target as Range) غلطي تي وري شروع ڪريو اڳيون جيڪڏھن Intersect (Target, Range("C2:C5")) ڪجھ به نه آھي ۽ Target.Cells.Count = 1 پوءِ Application.EnableEvents = False If Len(Target.Off.Off) (0, 1)) = 0 پوءِ Target.Offset(0, 1) = ھدف ٻيو ھدف.End(xlToRight).Offset(0, 1) = ھدف جي پڇاڙي جيڪڏھن Target.ClearContents Application.EnableEvents = True End جيڪڏھن End Sub  

جيڪڏهن ضروري هجي ته، ڊراپ-ڊائون لسٽن جي حساس رينج کي تبديل ڪريو C2:C5 هن ڪوڊ جي ٻئي لائن ۾ توهان جي پنهنجي سان.

اختيار 2. عمودي

ساڳيو ئي پوئين ورزن ۾، پر نئين چونڊيل قدر ساڄي طرف شامل نه ڪيا ويا آهن، پر تري ۾:

اهو بلڪل ساڳيو طريقي سان ڪيو ويندو آهي، پر هينڊلر ميڪرو ڪوڊ ٿورڙي تبديل ڪري ٿو:

پرائيويٽ ذيلي ورڪ شيٽ_تبديل (2, 2)) = 1 پوءِ Target.Offset(1, 0) = Target Else Target.End(xlDown).Offset(0, 1) = ھدف جي پڇاڙي جيڪڏھن Target.ClearContents Application.EnableEvents = True End جيڪڏھن آخر ذيلي  

ٻيهر، جيڪڏهن ضروري هجي ته، C2 جي حساس رينج کي تبديل ڪريو: F2 ڊراپ-ڊائون لسٽون هن ڪوڊ جي ٻئي لائن ۾ توهان جي پنهنجي سان.

اختيار 3. ساڳئي سيل ۾ جمع ڪرڻ سان

هن اختيار ۾، جمع ساڳئي سيل ۾ ٿئي ٿي جتي ڊراپ-ڊائون لسٽ واقع آهي. چونڊيل عناصر ڪنهن به ڏنل ڪردار (مثال طور، ڪاما) سان الڳ ٿيل آهن:

گرين سيلز ۾ ڊراپ-ڊائون لسٽون مڪمل طور تي معياري طريقي سان ٺهيل آهن، جيئن اڳئين طريقن ۾. سڀ ڪم ڪيو ويو آهي، ٻيهر، هڪ ميڪرو ذريعي شيٽ ماڊل ۾:

پرائيويٽ سب ورڪ شيٽ_تبديل oldval = ھدف جيڪڏھن Len(oldval) <> 2 ۽ oldval <> newVal پوء ھدف = ھدف ۽ "،" & newVal Else Target = newVal End جيڪڏھن Len(newVal) = 5 پوءِ Target.ClearContents Application.EnableEvents = True End جيڪڏھن آخر ذيلي  

جيڪڏھن توھان چاھيو، توھان ڪوڊ جي 9 هين لائن ۾ الڳ ڪندڙ ڪردار (ڪاما) کي پنھنجي پنھنجي (مثال طور، ھڪڙو خلا يا سيميڪولن) سان تبديل ڪري سگھو ٿا.

  • هڪسل شيٽ سيل ۾ هڪ سادي ڊراپ ڊائون لسٽ ڪيئن ٺاهيو
  • مواد سان گڏ ڊراپ ڊائون لسٽ
  • شامل ٿيل اختيارن سان گڏ ڊراپ ڊائون لسٽ
  • ميڪرو ڇا آهن، انهن کي ڪيئن استعمال ڪجي، Visual Basic ۾ ميڪرو ڪوڊ ڪٿي داخل ڪجي

جواب ڇڏي وڃو