Page 1 of 1

การเลือกข้อมูลจาก DropDown List แล้วขึ้น #N/A ครับ

Posted: Fri Feb 24, 2012 4:36 pm
by niwat2811
การเลือกข้อมูลจาก DropDown List แล้วขึ้น #N/A ครับ คือว่าต้องการเลือกข้อมูลจาก DropDown List ที่ Sheet"จัดชั้น" เซลล์ Z2 แล้วให้ดึงข้อมูลจาก Sheet"Database" มาแสดง ข้อมูลที่แสดงก็ถูกต้อง แต่ว่าบรรทัดอื่น ๆ ทำไมเป็น #N/A รบกวนช่วยดู Code ให้หน่อยครับ และถามต่ออีกนิดครับ ที่ Sheet "จัดชั้น" ตั้งแต่แถว 8 ลงไป ถ้าเราลบหรือ Delete ข้อมูลออกมันจะขึ้น Error ครับ รบกวนท่านอาจารย์หรือผู้รู้ช่วยชี้แนะด้วยครับ ขอบคุณมากครับ

Re: การเลือกข้อมูลจาก DropDown List แล้วขึ้น #N/A ครับ

Posted: Fri Feb 24, 2012 5:43 pm
by niwat2811
ตอนนี้แก้ไขเรื่อง #N/A ได้แล้วครับ เหลือแต่ว่าถ้าเราลบข้อมูลตั้งแต่แถว 8 ออกไป มันจะขึ้น Error ไม่ทราบว่าต้องแก้ไขยังไงครับ ขอบคุณครับ

Re: การเลือกข้อมูลจาก DropDown List แล้วขึ้น #N/A ครับ

Posted: Fri Feb 24, 2012 6:03 pm
by tupthai
ประเด็นเรื่อง error เดี๋ยวให้ผู้รู้ท่านอื่นมาตอบ
ความเห็นผมถ้าลักษณะงานแบบนี้ผมจะใช้ Advanced filter + VBA
เพราะสามารถกำหนดเงื่อนไขในการกรอง และ เลือกว่าจะเอาหัวตารางไดมาบ้าง
ซึ่งเขียน code น้อยมาก

Re: การเลือกข้อมูลจาก DropDown List แล้วขึ้น #N/A ครับ

Posted: Fri Feb 24, 2012 6:38 pm
by snasui
:lol: ลองปรับ Code เป็นตามด้านล่างครับ

Code: Select all

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Count > 1 Then Exit Sub
    If Target.Address = "$Z$2" And Target <> "" Then
        ShowEmp
    ElseIf Target.Address = "$Z$2" And Target = "" Then
        MsgBox "Please select data."
    End If
End Sub

Re: การเลือกข้อมูลจาก DropDown List แล้วขึ้น #N/A ครับ

Posted: Fri Feb 24, 2012 9:40 pm
by tupthai
ผมทำตัวอย่างมาให้ดูครับ
โดยการ บันทึกมาโครจากการทำ advanced filter
แล้ว สร้าง range nameให้กับข้อมูลให้เป็น dynamic
data=OFFSET(Database!$A$1,0,0,COUNTA(Database!$A:$A),COUNTA(Database!$1:$1))
Criteria=Sheet1!$A$3:$A$4
traget=Sheet1!$B$5:$AA$5
เป็นอีกแนวทางมาแชร์กันครับผม

Code: Select all

Sub Macro1()

    Sheets("Database").Range("data").AdvancedFilter Action:=xlFilterCopy, _
        CriteriaRange:=Range("Criteria"), CopyToRange:=Range("traget"), _
        Unique:=False
End Sub

Re: การเลือกข้อมูลจาก DropDown List แล้วขึ้น #N/A ครับ

Posted: Sat Feb 25, 2012 10:14 am
by tupthai
excel2003 มีคอลัมน์ไม่พอเลยerror ผมขอแนบไพล์ใหม่ครับ

Re: การเลือกข้อมูลจาก DropDown List แล้วขึ้น #N/A ครับ

Posted: Sat Feb 25, 2012 10:32 am
by niwat2811
แจ้งผลครับ Code ที่ท่านอาจารย์ให้มาสามารถใช้ได้ตรงตามความต้องการเลยครับ ขอบคุณมากเลยครับ และต้องขอขอบคุณท่าน tupthai ด้วยที่ได้ชี้แนะแนวทางอื่น ๆ ผมจะลองนำไปปรับใช้ดูครับ แล้วจะมารายงานผลนะครับ ขอบคุณทั้งสองท่านมากเลยครับ