Нөхцөл байдлаас шалтгаалан доош унадаг жагсаалтаас олон утгыг сонгох шаардлагатай байж магадгүй. Энэ зааварт бид унадаг жагсаалтаас олон сонголт хийх аргыг танд үзүүлэх болно. Энэ сессийн хувьд бид Excel 2019-г ашиглаж байгаа тул та хүссэн хувилбараа ашиглана уу.

Хэлэлцүүлэгт орохын өмнө бидний жишээнүүдийн үндэс болсон өгөгдлийн багцтай танилцацгаая.

Энд бидэнд бичгийн хэрэгслийн хэд хэдэн элемент байгаа бөгөөд эдгээрийг ашиглан унадаг жагсаалт үүсгэж, тэндээс олон зүйлийг сонгоно.

Энэ нь аливаа зүйлийг ойлгомжтой байлгах энгийн өгөгдлийн багц гэдгийг анхаарна уу. . Практик хувилбарт та илүү том бөгөөд төвөгтэй мэдээллийн багцтай тулгарч магадгүй.

Дадлага хийх ажлын ном

Та доорх холбоосоос дадлага хийх ажлын номыг татаж авах боломжтой.

Унадаг жагсаалтаас олон сонголт хийх.xlsm

Унждаг жагсаалтаас олон сонголт хийх

Юуны өмнө бид дараах үндсэн дээр унадаг жагсаалт үүсгэх хэрэгтэй. манай бичгийн хэрэгсэл. Үүнийг хурдан бүтээцгээе. Унждаг жагсаалт гаргах тухай нийтлэлийг үзэхээс бүү эргэлз.

Өгөгдлийн баталгаажуулалт харилцах цонхноос ЖАГСААЛТ өгөгдлийн төрлийг сонгоод зүйлсийн нүдний муж.

B4:B11 нь бичгийн хэрэгслийн элементүүдийг агуулсан муж юм. Одоо та унадаг жагсаалтыг олох болно.

Дэлгэрэнгүй унших: Сонголтоос хамааран Excel-ийн унждаг жагсаалт

1. СонгоОлон зүйл (Давхардсан сонголт хийх боломжтой)

Унжлагаас доош унадаг жагсаалт нь үргэлж нэг зүйлийг сонгодог. Эндээс харж болно, бид жагсаалтаас Үзэг -г сонгов (доорх зураг).

Одоо өөр зүйл сонговол <7 гэж хэлье>Харандаа

тэгвэл өмнөх утгыг орлуулах болно. Зөвхөн Харандаа сонгогдсон хэвээр үлдэнэ.

Олон зүйл сонгохын тулд бид VBA кодыг ашиглах хэрэгтэй. Microsoft Visual Basic for Applications цонхыг нээ ( ALT + F11 дарж нээнэ үү).

Одоо сонгохыг хүссэн ажлын хуудасны нэр эсвэл дугаар дээр давхар товшино уу. унадаг жагсаалтын олон зүйл. Та тухайн хуудасны кодын цонхыг олох болно.

Энд манай ажлын дэвтэрт байгаа Хуудас2 -ын кодын цонх байна (бид унадаг цонхтой. Энэ хуудасны жагсаалт).

Код цонх нээгдсэний дараа тэнд дараах кодыг оруулна уу

2801

Кодыг хадгалаад одоо утгыг сонгож үзнэ үү. унадаг жагсаалтаас.

Харандаа -г сонгосны дараа бид Тэмдэглэлийн дэвтэр өөр зүйлийг сонгох гэж байна. Та харж болно, бид хоёр зүйлийг хоёуланг нь олсон (доорх зураг).

Энэ код нь сонголтоо давтах боломжийг бидэнд олгоно. Хэрэв бид Харандаа -г дахин сонговол

сонголтын талбараас тухайн зүйлийг дахин олох болно гэж бодъё.

Кодын тайлбар

Бид Oldvalue гэсэн хоёр мөрийг зарласан. Шинэ үнэ цэнэ .

Бид D4 нүдэнд унадаг жагсаалтыг гаргасныг харж болно, тиймээс бидний зорилтот хаяг D4 байна. Нэмж хэлэхэд, бид нүд нь өгөгдлийн баталгаажуулалтыг ашиглаж байгаа эсвэл Target.SpecialCells -г ашиглаагүй эсэхийг дахин шалгасан.

Утга сонгогдсоны дараа бид үйл явдлуудыг ( Application.EnableEvents = False ) унтраасан тул өөрчлөлт гарахгүй' t үйл явдлыг дахин өдөөх. Дараа нь сонгосон зүйлээ Шинэ утга -д хадгалсан.

Өөрчлөлтийг буцаасны дараа бид утгыг Хуучин утга -д тохируулсан. Дараа нь Oldvalue хоосон эсэхийг шалгана уу. Хэрэв хоосон бол (зөвхөн нэг утгыг сонгосон гэсэн үг) Шинэ утга -г буцаана уу. Үгүй бол Хуучин утга ба Шинэ утгыг хооронд нь холбоно уу.

Үйл явдлыг дуусгахаас өмнө шаардлагатай бол өөрчлөх боломжтой.

Дэлгэрэнгүй: Олон хамааралтай унждаг жагсаалт Excel VBA

2. Унждаг жагсаалтаас олон зүйлийг сонгоно уу (Зөвхөн өвөрмөц сонголт)

Өмнөх хэсэгт , бид давталт хийхийг зөвшөөрсөн олон сонголтыг харсан. Хэрэв та үүнийг хүсэхгүй байгаа бол энэ хэсгийг дагана уу.

Тохиромжтой болгох үүднээс бид энэ үзүүлбэрт тусдаа хуудас ашигласан. Энэ удаад бид Sheet3 дээр байна. Энэ хуудасны кодын цонхонд дараах кодыг бичнэ үү.

7814

Өмнөх кодтой харьцуулахад ямар нэгэн ялгаа байна уу! Нарийвчилж харвал та бага зэргийн ялгааг анзаарах болно.

Энд бид VBA функцийг ашигласан болно. INSTR . INSTR функц нь мөр дэх дэд мөрийн эхний тохиолдлын байрлалыг буцаана. Дэлгэрэнгүй мэдээллийг энэ INSTR нийтлэлээс авна уу.

Энэ логик үйлдлийг InStr(1, Oldvalue, Newvalue) = 0 ашиглан бид утгууд олдсон эсэхийг шалгасан. Хэрэв логик үйлдэл ҮНЭН (өмнө нь олдоогүй)-г буцаавал тухайн зүйлийг сонгож, өмнөх утгатай холбох боломжийг олгоно.

Кодыг хадгалаад одоо аль хэдийн байгаа зүйлийг сонгохыг оролдоно уу. сонгогдсон байна.

Энд бид аль хэдийн Харандаа -г сонгосон байгаа, хэрэв бид үүнийг дахин сонгохыг хүсвэл бид чадахгүй. Энэ нь давхардсан утгыг зөвшөөрөхгүй.

Дэлгэрэнгүй унших: Excel дээр өөр хуудаснаас доош унадаг жагсаалт хэрхэн үүсгэх вэ

3. Сонго Шинэ мөрөнд байгаа зүйлс

Одоогоор бид эдгээр зүйлсийг таслалаар тусгаарласныг олж мэдсэн. Энэ хэсэгт бид сонгосон зүйлсийг шинэ мөрөнд байрлуулна.

Хялбар болгох үүднээс бид хэд хэдэн нүдийг D4 нүдтэй нэгтгэж байна. Үүнийг хийхийн тулд нэгтгэхийг хүссэн нүднүүдээ сонгоод Merge & Нүүр табын Зохицуулах хэсгээс -г төв.

Нүд илүү өндөр болно.

Одоо шинэ мөрөөр дамжуулан зүйлсийг ялгах кодыг харцгаая. Дараах кодыг ашиглаарай

6943

Өмнөх кодоос цорын ганц ялгаа нь бид энэ удаад vbNewLine -г OldValue хооронд ашигласан явдал юм. NewValue .

vbNewLine нь зүйлсийн хооронд шинэ мөр үүсгэдэг.

Одоо эдгээр зүйлсийг сонго.

Бид дээрх зурган дээр харагдаж байгаа Үзэг зүйлийг сонгоно. Одоо өөр элемент сонгоно уу.

Та хоёр зүйл өөр мөрөнд байгааг олж харах болно.

Энд хоёр зүйл байна. хоёр өөр мөрөнд байгаа утгууд. Өөр утгыг сонгосноор үүнийг өөр мөрөнд нэмнэ. Утга бүр шинэ мөрөнд байх болно.

Хэрэв та зүйлсийг тусгаарлахын тулд өөр хязгаарлагчийг хүсвэл vbNewline<10-ын оронд давхар хашилтанд оруулахыг анхаарна уу>.

Дүгнэлт

Энэ бол өнөөдрийнх. Унждаг жагсаалтад олон сонголт хийх хэд хэдэн аргыг бид жагсаасан. Энэ нь танд хэрэг болно гэж найдаж байна. Ойлгоход хэцүү зүйл байвал сэтгэгдэлээ үлдээгээрэй. Бидний орхигдсон бусад аргуудыг энд мэдэгдээрэй.