Note: The other languages of the website are Google-translated. Back to English
ล็อกอิน สมัครสมาชิก

 วิธีสร้างรายการแบบหล่นลง แต่แสดงค่าต่างกันใน Excel

ในแผ่นงาน Excel เราสามารถสร้างรายการแบบหล่นลงได้อย่างรวดเร็วด้วยคุณสมบัติการตรวจสอบข้อมูล แต่คุณเคยพยายามแสดงค่าที่แตกต่างออกไปเมื่อคุณคลิกรายการแบบเลื่อนลงหรือไม่? ตัวอย่างเช่นฉันมีข้อมูลสองคอลัมน์ต่อไปนี้ในคอลัมน์ A และคอลัมน์ B ตอนนี้ฉันต้องการสร้างรายการแบบหล่นลงที่มีค่าในคอลัมน์ชื่อ แต่เมื่อฉันเลือกชื่อจากรายการแบบเลื่อนลงที่สร้างขึ้นสิ่งที่เกี่ยวข้อง ค่าในคอลัมน์ Number จะแสดงเป็นภาพหน้าจอต่อไปนี้ บทความนี้จะแนะนำรายละเอียดเพื่อแก้ปัญหานี้

doc dropdown ค่าต่างๆ 1

สร้างรายการแบบหล่นลง แต่แสดงค่าที่แตกต่างกันในเซลล์รายการแบบหล่นลง

สร้างรายการแบบหล่นลง แต่แสดงค่าที่แตกต่างกันในเซลล์รายการแบบหล่นลง

เพื่อให้งานนี้เสร็จสิ้นโปรดทำตามขั้นตอนต่อไปนี้:

1. สร้างชื่อช่วงสำหรับค่าเซลล์ที่คุณต้องการใช้ในรายการแบบเลื่อนลงในตัวอย่างนี้ฉันจะป้อนชื่อแบบเลื่อนลงใน ชื่อ: กล่องจากนั้นกด เข้าสู่ สำคัญดูภาพหน้าจอ:

doc dropdown ค่าต่างๆ 2

2. จากนั้นเลือกเซลล์ที่คุณต้องการแทรกรายการดรอปดาวน์แล้วคลิก ข้อมูล > การตรวจสอบข้อมูล > การตรวจสอบข้อมูลดูภาพหน้าจอ:

doc dropdown ค่าต่างๆ 3

3. ใน การตรวจสอบข้อมูล ภายใต้ การตั้งค่า เลือกแท็บ รายการ จาก อนุญาต เลื่อนลงจากนั้นคลิก doc dropdown ค่าต่างๆ 5 เพื่อเลือกรายการชื่อที่คุณต้องการใช้เป็นค่าแบบเลื่อนลงในไฟล์ แหล่ง กล่องข้อความ. ดูภาพหน้าจอ:

doc dropdown ค่าต่างๆ 4

4. หลังจากแทรกรายการแบบหล่นลงแล้วโปรดคลิกขวาที่แท็บแผ่นงานที่ใช้งานอยู่และเลือก ดูรหัส จากเมนูบริบทและในเปิด Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่างคัดลอกและวางรหัสต่อไปนี้ลงในโมดูลเปล่า:

รหัส VBA: แสดงค่าที่แตกต่างจากรายการแบบหล่นลง:

Private Sub Worksheet_Change(ByVal Target As Range)
'Updateby Extendoffice
    selectedNa = Target.Value
    If Target.Column = 5 Then
        selectedNum = Application.VLookup(selectedNa, ActiveSheet.Range("dropdown"), 2, False)
        If Not IsError(selectedNum) Then
            Target.Value = selectedNum
        End If
    End If
End Sub

doc dropdown ค่าต่างๆ 6

หมายเหตุ: ในรหัสด้านบนหมายเลข 5 ภายใน ถ้า Target.Column = 5 แล้ว สคริปต์คือหมายเลขคอลัมน์ที่รายการแบบเลื่อนลงของคุณตั้งอยู่ซึ่งเป็น "หล่นลง" ในเรื่องนี้ selectedNum = Application.VLookup (selectedNa, ActiveSheet.Range ("dropdown"), 2, False) รหัสคือชื่อช่วงที่คุณสร้างขึ้นในขั้นตอนที่ 1 คุณสามารถเปลี่ยนเป็นชื่อที่ต้องการได้

5. จากนั้นบันทึกและปิดรหัสนี้ตอนนี้เมื่อคุณเลือกรายการจากรายการแบบเลื่อนลงค่าที่แตกต่างกันจะแสดงในเซลล์เดียวกันดูภาพหน้าจอ:

doc dropdown ค่าต่างๆ 7

การสาธิต: สร้างรายการแบบหล่นลง แต่แสดงค่าที่แตกต่างกันใน Excel

Kutools สำหรับ Excel: ด้วย Add-in ของ Excel ที่มีประโยชน์มากกว่า 300 รายการให้ทดลองใช้ฟรีโดยไม่มีข้อ จำกัด ใน 30 วัน ดาวน์โหลดและทดลองใช้ฟรีทันที!

 

เครื่องมือเพิ่มประสิทธิภาพการทำงานในสำนักงานที่ดีที่สุด

Kutools สำหรับ Excel แก้ปัญหาส่วนใหญ่ของคุณและเพิ่มผลผลิตของคุณได้ถึง 80%

  • นำมาใช้ใหม่: ใส่อย่างรวดเร็ว สูตรที่ซับซ้อนแผนภูมิ และสิ่งที่คุณเคยใช้มาก่อน เข้ารหัสเซลล์ ด้วยรหัสผ่าน; สร้างรายชื่อผู้รับจดหมาย และส่งอีเมล ...
  • ซุปเปอร์ฟอร์มูล่าบาร์ (แก้ไขข้อความและสูตรหลายบรรทัดได้อย่างง่ายดาย); การอ่านเค้าโครง (อ่านและแก้ไขเซลล์จำนวนมากได้อย่างง่ายดาย); วางลงในช่วงที่กรองแล้ว...
  • ผสานเซลล์ / แถว / คอลัมน์ โดยไม่สูญเสียข้อมูล แยกเนื้อหาของเซลล์ รวมแถว / คอลัมน์ที่ซ้ำกัน... ป้องกันเซลล์ซ้ำ; เปรียบเทียบช่วง...
  • เลือกซ้ำหรือไม่ซ้ำ แถว; เลือกแถวว่าง (เซลล์ทั้งหมดว่างเปล่า); Super Find และ Fuzzy Find ในสมุดงานจำนวนมาก สุ่มเลือก ...
  • สำเนาถูกต้อง หลายเซลล์โดยไม่เปลี่ยนการอ้างอิงสูตร สร้างการอ้างอิงอัตโนมัติ ถึงหลายแผ่น ใส่สัญลักษณ์แสดงหัวข้อย่อย, กล่องกาเครื่องหมายและอื่น ๆ ...
  • แยกข้อความ, เพิ่มข้อความ, ลบตามตำแหน่ง, ลบ Space; สร้างและพิมพ์ผลรวมย่อยของเพจ แปลงระหว่างเนื้อหาของเซลล์และความคิดเห็น...
  • ซุปเปอร์ฟิลเตอร์ (บันทึกและใช้โครงร่างตัวกรองกับแผ่นงานอื่น ๆ ); การเรียงลำดับขั้นสูง ตามเดือน / สัปดาห์ / วันความถี่และอื่น ๆ ตัวกรองพิเศษ โดยตัวหนาตัวเอียง ...
  • รวมสมุดงานและแผ่นงาน; ผสานตารางตามคอลัมน์สำคัญ แยกข้อมูลออกเป็นหลายแผ่น; Batch แปลง xls, xlsx และ PDF...
  • คุณสมบัติที่ทรงพลังมากกว่า 300 รายการ. รองรับ Office/Excel 2007-2021 และ 365 รองรับทุกภาษา ง่ายต่อการปรับใช้ในองค์กรหรือองค์กรของคุณ คุณสมบัติเต็มรูปแบบ ทดลองใช้ฟรี 30 วัน รับประกันคืนเงินภายใน 60 วัน
kte แท็บ 201905

แท็บ Office นำอินเทอร์เฟซแบบแท็บมาที่ Office และทำให้งานของคุณง่ายขึ้นมาก

  • เปิดใช้งานการแก้ไขและอ่านแบบแท็บใน Word, Excel, PowerPoint, ผู้จัดพิมพ์, Access, Visio และโครงการ
  • เปิดและสร้างเอกสารหลายรายการในแท็บใหม่ของหน้าต่างเดียวกันแทนที่จะเป็นในหน้าต่างใหม่
  • เพิ่มประสิทธิภาพการทำงานของคุณ 50% และลดการคลิกเมาส์หลายร้อยครั้งให้คุณทุกวัน!
ด้านล่าง officetab

 

จัดเรียงความคิดเห็นโดย
เก่ามาก่อน
ใหม่ก่อน
ความคิดเห็น (42)
ยังไม่มีการให้คะแนน เป็นคนแรกที่ให้คะแนน!
ทีน่า
ทีน่า
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
สามารถทำได้บนแผ่นต่างๆ หรือไม่? ฉันหมายถึงบนแผ่นที่ 1 รายการแบบเลื่อนลงและบนแผ่นที่ 2 ช่วง ฉันต้องเข้ารหัสสิ่งนี้อย่างไร ขอบคุณล่วงหน้า. ทีน่า.
ตอบ
0
0
ลี แอน เบรนแนน
ลี แอน เบรนแนน
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
จะทำอย่างไรถ้าฉันต้องการทำดรอปดาวน์มากกว่าหนึ่งรายการโดยคืนค่าที่ต่างกันในเวิร์กชีตเดียวกัน คุณช่วยแสดงตัวอย่างการเข้ารหัสสำหรับสองคนขึ้นไปได้ไหม
ตอบ
0
0
โทนี่
โทนี่     ลี แอน เบรนแนน
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
ลีแอน

หากคุณเพียงแค่คัดลอกและวางโค้ดจาก if เป็น EndIf และเปลี่ยนคอลัมน์ # และ Table ก็ควรทำงาน:


แผ่นงานย่อย_เปลี่ยน (เป้าหมาย ByVal เป็นช่วง)
selectNa = Target.Value
ถ้า Target.Column = 5 แล้ว
selectedNum = Application.VLookup (selectedNa, ActiveSheet.Range ("dropdown"), 2, False)
ถ้าไม่ใช่ IsError(selectedNum) แล้ว
Target.Value = เลือกแล้วNum
End If
End If
ถ้า Target.Column = 9 แล้ว
selectNum = Application.VLookup(selectedNa, ActiveSheet.Range("dropdown1"), 2, เท็จ)
ถ้าไม่ใช่ IsError(selectedNum) แล้ว
Target.Value = เลือกแล้วNum
End If
End If
ย่อยสิ้นสุด

ฉันไม่ได้บอกว่านี่เป็นวิธีที่ถูกต้อง แต่มันใช้ได้กับเวอร์ชันทดสอบของฉัน ฉันใช้ Excel 2013
ตอบ
0
0
ปาวิโรดิโครโม ฟีโอน่า
ปาวิโรดิโครโม ฟีโอน่า     โทนี่
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
เพิ่งได้ลอง และมันก็ได้ผล!! ขอขอบคุณ.
ตอบ
0
0
Karolis
Karolis     โทนี่
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
สวัสดี ช่วยด้วย มันใช้งานไม่ได้ คุณช่วยวางโค้ดทั้งหมดที่นี่สำหรับ 2 colums ได้ไหม
ตอบ
0
0
ชี่เฉิงเชียน
ชี่เฉิงเชียน     โทนี่
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
Tony: ถูกต้อง แต่ขั้นตอนต่อไปคือการหลีกเลี่ยงการสนับสนุน: a) การละเมิดหลักการ DRY (และดังนั้นจึงเพิ่มขึ้น: a.1) โอกาสที่จะเกิดข้อผิดพลาดและค่าใช้จ่ายในการแก้ไข และ a.2) ค่าใช้จ่ายของการเปลี่ยนแปลง / การปรับปรุงที่อาจเกิดขึ้นในอนาคต) โดย ไม่สนับสนุนการเขียนโปรแกรม "Copy-Paste" โดยแสดงให้เห็นว่าสามารถ "refactored" เพื่อลดโค้ดที่ซ้ำกันได้อย่างไร และ b) ค่าคงที่ตามตัวอักษรแบบฮาร์ดโค้ด ("magic" "number" / "string") โดยการประกาศและใช้ Named Constants ที่เป็น พิมพ์ผิดยากกว่ามากโดยไม่ทำให้เกิดข้อผิดพลาดของคอมไพเลอร์ สิ่งเดียวที่แตกต่างกันระหว่างบล็อกโค้ดที่คัดลอกและวางสองบล็อกคือคอลัมน์ #s และชื่อช่วง ดังนั้น ทุกสิ่งทุกอย่างไม่ควรทำซ้ำให้มากที่สุดเท่าที่จะเป็นไปได้ ดังนั้น โค้ดควรเป็น เช่น:

' -- หมายเหตุ: ประกาศ "EmptyString" ในโมดูลการประกาศส่วนกลาง
Const EmptyString สาธารณะเป็น String = ""

' -- คอลัมน์ #s หมายเหตุ: ในทางปฏิบัติ เช่น "Col5Header" จะเป็น เช่น "ProductID" และ "Col9Header" จะเป็น เช่น "SalesID"
Const Col5HeaderColumnNumber ส่วนตัวเป็นจำนวนเต็ม = 5
Const Col9HeaderColumnNumber ส่วนตัวเป็นจำนวนเต็ม = 9

' -- ชื่อช่วงของรายการแบบหล่นลงของคอลัมน์
Const ส่วนตัว Col5HeaderDropDownRangeName เป็น String = "col5HeaderDropDownRangeName"
Const ส่วนตัว Col9HeaderDropDownRangeName เป็น String = "col9HeaderDropDownRangeName"

แผ่นงานย่อย_เปลี่ยน_
( _
ByVal เป้าหมายเป็นช่วง _
)

' -- BEGIN สำหรับ =คอลัมน์ที่เกี่ยวข้อง ให้ดึง ID สำหรับคำอธิบายที่เลือกจากรายการแบบเลื่อนลง
Dim dropDownListRangeName เป็นสตริง
dropDownListRangeName = สตริงว่าง
เลือก Case Target.Column
กรณี Col5HeaderColumnNumber
dropDownListRangeName = Col5HeaderDropDownRangeName
กรณี Col9HeaderColumnNumber
dropDownListRangeName = Col9HeaderDropDownRangeName
สิ้นสุดการเลือก ' -- Case Target.Column
ถ้า (dropDownListRangeName <> EmptyString) จากนั้น
Dim เลือกรหัสเป็นสตริง
selectedId = Application.VLookup(selectedNa, ActiveSheet.Range(dropDownListRangeName), 2, เท็จ)
ถ้าไม่ใช่ข้อผิดพลาด (selectedId) จากนั้น
Target.Value = รหัสที่เลือก
สิ้นสุดถ้า ' -- ไม่ใช่ IsError (selectedId)
สิ้นสุดถ้า ' -- (dropDownListRangeName <> EmptyString)
-- END สำหรับ =columns ที่เกี่ยวข้อง ให้ดึง ID สำหรับคำอธิบายที่เลือกจากรายการแบบเลื่อนลง

ย่อยสิ้นสุด
ตอบ
รายงาน
0
0
ไมค์เค
ไมค์เค
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
ไม่มีอะไรน่าผิดหวังมากไปกว่าการพิมพ์คำถามแบบละเอียดเพื่อให้มันปลิวไป หากคุณพิมพ์รหัส 6 หลักผิดเพื่อยืนยันตัวตนของคุณ ข้อความที่โพสต์นั้นจะหายไป อาจต้องการแก้ไขสิ่งนั้น ความคิดเห็นของฉันคือ: ฉันพยายามทำสิ่งเดียวกันกับที่คุณแสดงในวิดีโอและคำแนะนำเป็นลายลักษณ์อักษร และทั้งหมดที่ฉันได้รับคือเมื่อฉันเลือกชื่อในรายการคือชื่อ ไม่ใช่ตัวเลข นอกจากนี้ สิ่งนี้ทำงานอย่างไร เนื่องจากการตรวจสอบความถูกต้องของข้อมูลควรจำกัดตัวเลือกให้เหลือเฉพาะสิ่งที่อยู่ในรายการเท่านั้น สิ่งนี้หลอกลวงระบบอย่างไร? ในอดีตฉันต้องกำหนดรหัส vba ให้กับปุ่มหรือทางลัดเสมอ รหัสนี้เปิดใช้งานอย่างไร ทดสอบอย่างไรให้ได้ผล?
ตอบ
0
0
Charmin
Charmin
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
สูตรทำงานอย่างไรเมื่อคุณต้องการเพิ่มข้อมูลในแผ่นงานแยกต่างหากในสมุดงาน ฉันต้องการซ่อนข้อมูล
ตอบ
0
0
พโย
พโย     Charmin
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
เปลี่ยนนี่ครับพี่!
selectNum = Application.VLookup(selectedNa, Worksheets("YourSheetName")).Range("dropdown"), 2, เท็จ)
ตอบ
0
0
เซซาร์ โลเปซ - ซอฟพรอมเมด
เซซาร์ โลเปซ - ซอฟพรอมเมด     พโย
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
"YourSheetName" อ้างอิงถึงแผ่นงานที่มีช่วงข้อมูลหรือแผ่นงานที่ฉันต้องการใช้รายการ dropdwon?
ตอบ
รายงาน
0
0
Charmin
Charmin
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
สูตรทำงานอย่างไรเมื่อคุณต้องการแสดงรายการข้อมูลในแผ่นงาน/แท็บแยกต่างหากในเวิร์กบุ๊ก
ตอบ
0
0
ty
ty
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
สิ่งนี้ใช้ไม่ได้ในเวอร์ชันปัจจุบันของ excel- ล้าสมัย การตรวจสอบข้อมูลจะไม่แสดงใน vba อีกต่อไปเนื่องจากวัตถุ excel ได้ลองหลายครั้งแล้วและไม่ปรากฏขึ้น
ตอบ
0
0
วิลเลียม
วิลเลียม
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
ในตัวอย่างนี้ ถ้าคุณต้องการให้ดูค่าในแต่ละเซลล์ใน 5 แต่ใส่ค่าในเซลล์ที่อยู่ติดกันใน 6
ตอบ
0
0
มาร์คัส
มาร์คัส
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
โค้ดจำเป็นต้องเปลี่ยนอย่างไรหากฉันต้องการสร้างข้อมูลอ้างอิง/ลิงก์ใน E1 ไปยังแหล่งที่มาของรายการแบบเลื่อนลงตามค่าที่เลือก
ประโยชน์จะเป็นเช่นนั้น ในกรณีที่มีการเปลี่ยนแปลงในแหล่งที่มาแบบเลื่อนลง (เช่น "Henrik" => "Hendrik" การเปลี่ยนแปลงจะมีผลโดยอัตโนมัติใน E1
ตอบ
รายงาน
0
0
ไมค์
ไมค์
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
ใครรู้วิธีทำให้สิ่งนี้ทำงานใน Google ชีต?
ตอบ
0
0
ริซวาน อาห์หมัด
ริซวาน อาห์หมัด
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
ฉันต้องการเลือกหลายตัวเลือกจากรายการแบบเลื่อนลง
ผลลัพธ์เช่นนี้: AA1001,BB1002
เป็นไปได้ไหม?
ตอบ
0
0
Mariel
Mariel     ริซวาน อาห์หมัด
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
คุณหาทางออกหรือไม่?
ตอบ
0
0
จอห์น เจ
จอห์น เจ
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
Si los datos de la lista están en otra hoja, cuál sería el código? กราเซียส
ตอบ
0
0
Alondra
Alondra
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
cómo buscar un valor hacia la izquierda
ตอบ
0
0
Alondra
Alondra
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
Worksheet_Change ย่อยส่วนตัว (เป้าหมายเป็นช่วง ByVal)
selectNa = Target.Value
ถ้า Target.Column = 5 แล้ว

ชีต("Nombre de la hoja en donde esta la lista") เปิดใช้งาน
selectedNum = Application.VLookup (selectedNa, ActiveSheet.Range ("dropdown"), 2, False)
ชีต ("Nombre de la hoja en donde estas trabajando") เปิดใช้งาน
ถ้าไม่ใช่ IsError(selectedNum) แล้ว
Target.Value = เลือกแล้วNum
End If
End If
ย่อยสิ้นสุด
ตอบ
0
0
Alondra
Alondra
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
มีคนรู้วิธีค้นหาค่าจากขวาไปซ้าย
ตอบ
0
0
Dre
Dre
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
ฉันต้องใช้ดรอปดาวน์เดียวกันมากกว่าหนึ่งคอลัมน์ รหัสจะเป็นอย่างไร
ตอบ
0
0
AC
AC
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
Hi!
สิ่งนี้มีประโยชน์จริงๆ! ขอขอบคุณ!
ฉันกำลังทำงานอยู่ในสถานการณ์ที่เซลล์ไม่อัปเดตโดยอัตโนมัติหรือเมื่อใช้ฟังก์ชันรีเฟรช ฉันต้องคลิกในเซลล์อื่นแล้วคลิกกลับไปที่เซลล์ที่ทำงานอยู่เพื่อให้แสดงค่า
ฉันกำลังทำงานกับ Office Standard 2019 มีใครทราบบ้างว่าปัญหานี้เกี่ยวข้องกับเวอร์ชันบน excel ที่ฉันใช้อยู่หรือไม่
ตอบ
0
0
ชัยธัญญา กู๊ด
ชัยธัญญา กู๊ด
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
สวัสดี
รหัสทำงานได้ดีถ้าเรากำลังกำหนดรายการและสร้างรายการแบบเลื่อนลงในแผ่นงานเดียวกัน
แต่เราจะกำหนดรายการค่าและรหัสในแผ่นงานเดียวและรายการแบบเลื่อนลงที่สร้างในอีกแผ่นงานหนึ่งได้อย่างไร
รหัสเดียวกันนี้ไม่ทำงานตามที่แสดงและมีข้อผิดพลาดในบรรทัดนี้ ("selectedNum = Application.VLookup(selectedNa, ActiveSheet.Range("dropdown"), 2, False)")
นอกจากนี้ ฉันมีข้อกำหนดเช่น ถ้าฉันมีหลายรายการที่กำหนดไว้ในแผ่นงานเดียวที่มี ID และชื่อ และรายการดรอปดาวน์หลายรายการในชีตอื่น โดยที่ค่าแบบหล่นลงหนึ่งค่าจะขึ้นอยู่กับค่าที่เลือกในรายการดรอปดาวน์อื่น

หวังว่าคุณจะเข้าใจคำถามของฉัน

โปรดช่วยฉันในการแก้ไขปัญหานี้
ตอบ
รายงาน
0
0
ร็อด แคทคาร์ต
ร็อด แคทคาร์ต
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
สิ่งนี้ช่วยฉันได้อย่างมาก ขอบคุณ เนื่องจากตารางของฉันอยู่บนชีตที่แตกต่างจากกล่องรายการของฉัน ฉันจึงเพิ่มโค้ดสองสามบรรทัดเพื่อทำสิ่งนั้นให้สำเร็จและเพื่อป้องกันไม่ให้หน้าจอกะพริบ

Application.ScreenUpdating = เท็จ
ชีต("SheetWithTableOnIt") เปิดใช้งาน

ชีต("SheetWithDropDownListOnIt") เปิดใช้งาน
Application.ScreenUpdating = จริง
ตอบ
0
0
ความปิติยินดี
ความปิติยินดี     ร็อด แคทคาร์ต
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
คุณเพิ่มรหัสนี้ที่ไหน
ตอบ
0
0
แทรชเชอร์
แทรชเชอร์
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
ฉันได้รับข้อผิดพลาดในการรวบรวม: ข้อผิดพลาดทางไวยากรณ์ในบรรทัด "ถ้า Trarget.Column = 6 แล้ว" เมื่อฉันพยายามใช้รหัส มีความคิดใด ๆ ว่าทำไม?
ตอบ
0
0
มาร์โค
มาร์โค
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
มันใช้งานได้ แต่เมื่อคุณออกจากไฟล์และเปิดอีกครั้ง มันไม่ทำงาน...มันไม่สามารถบันทึกเป็น .xls ได้เท่านั้น เนื่องจาก .xlsm มีวิธีแก้ไขหรือไม่ ขอบคุณ
ตอบ
0
0
สกายหยาง
สกายหยาง     มาร์โค
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
สวัสดี Marko หลังจากคัดลอกและวางรหัสในสมุดงานของคุณ เมื่อคุณบันทึกไฟล์ คุณควรบันทึกเป็นรูปแบบสมุดงาน Excel Macro-Enabled โปรดลอง ขอบคุณ!
ตอบ
รายงาน
0
0
มีความคิดเห็นยังไม่มีการโพสต์ที่นี่
โหลดเพิ่มเติม
แสดงความคิดเห็นของคุณ
แขก
โพสต์ในฐานะแขก
ชื่อผู้ใช้
×
ให้คะแนนโพสต์นี้:
รีเซ็ต
0   ตัวอักษร
สถานที่แนะนำ

ช่องทางอื่นๆ

ลิขสิทธิ์© 2009 - wwwextendoffice.com | สงวนลิขสิทธิ์. ขับเคลื่อนโดย ExtendOffice. | แผนผังเว็บไซต์
Microsoft และโลโก้ Office เป็นเครื่องหมายการค้าหรือเครื่องหมายการค้าจดทะเบียนของ Microsoft Corporation ในสหรัฐอเมริกาและ / หรือประเทศอื่น ๆ
ได้รับการปกป้องโดย Sectigo SSL