การเปลี่ยนค่า Drop down List

[pro602]

ขอคำแนะนำการใช้งาน Drop down list แบบ 2 ชั้นหน่อยครับ
เมื่อเรามีการเลือกค่าใน Drop down list ชั้นที่ 1 และ 2 ได้ตามต้องการแล้ว แต่ถ้าเราต้องการเปลี่ยนค่า Drop down list ชั้นที่ 1 ใหม่
และให้ค่าในช่องถัดไปซึ่งเป็นค่า Drop down list ชั้น 2 เป็นค่าว่างจนกว่าจะมีการเข้าไปเลือกค่าใหม่ สามารถทำได้ไหมครับและต้องปรับสูตรอย่างไร

[puriwutpokin]

การทำแบบนั้นเมื่อมีการเปลี่ยนค่าใน Dropdown แล้วให้เป็นค่าว่าง ต้อง อาศัย VBA มาช่วยครับ
ลองบันทึก Macro ดูแล้วแก้ไข ติดตรงไหนมาถามต่อครับ

[pro602]

การทำแบบนั้นเมื่อมีการเปลี่ยนค่าใน Dropdown แล้วให้เป็นค่าว่าง ต้อง อาศัย VBA มาช่วยครับ
ลองบันทึก Macro ดูแล้วแก้ไข ติดตรงไหนมาถามต่อครับ

ผมลองใช้ VBA แล้ว ถ้าจะให้ Drop down list ชั้นที่ 2 เป็นค่าว่างก็ต่อเมื่อมีการเปลี่ยนค่า Drop down list ชั้นที่1 ต้องปรับ VBA Code อย่างไรครับ

Code: Select all

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
activecell.Offset(0, 1).Value = ""
End Sub

[puriwutpokin]

ปรับเป็น

Code: Select all

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("a2:a10")) Is Nothing Then
Target.Offset(0, 1).Value = ""
End If
End Sub

[pro602]

ปรับเป็น

Code: Select all

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("a2:a10")) Is Nothing Then
Target.Offset(0, 1).Value = ""
End If
End Sub

-ขอบคุณครับ