snasui.com ยินดีต้อนรับ
ยินดีต้อนรับสู่กระดานถามตอบ Excel and VBA และอื่น ๆ ที่เป็นมิตรกับทุกท่าน มีไฟล์แนบมหาศาล ช่วยให้ท่านค้นหาและติดตามศึกษาได้โดยง่าย สมาชิกท่านใดที่ยังไม่ได้ระบุ Version ของ Excel ที่ใช้งานจริง สามารถทำตาม Link นี้เพื่อจะได้รับคำตอบที่ตรงกับ Version ของท่านครับ ระบุ Version ของ Excel
ฟอรัมถาม-ตอบปัญหาการใช้งานสูตรและฟังก์ชัน Excel
Forum rules
ไม่อนุญาตให้ใช้ภาษาแชทในการถามและตอบปัญหา ไม่ใช้คำว่า "คับ" หรือ "อ่ะครับ" แทนคำว่า "ครับ" ไม่ใช้คำว่า "เด๋ว" แทนคำว่า "เดี๋ยว" เป็นต้น เนื่องจากเมื่อแปลเป็นภาษาต่างประเทศแล้วจะให้ความหมายผิดไปจากที่ควรจะเป็น
ห้ามถามโดยระบุชื่อผู้ตอบและต้องตั้งชื่อกระทู้ให้สื่อถึงปัญหาที่จะถาม ไม่ตั้งชื่อว่า ช่วยด้วยครับ, มีปัญหามาปรึกษาครับ เป็นต้น
กรุณาอธิบายปัญหาและระบุคำตอบที่ต้องการมาในกระทู้ด้วยเสมอถึงแม้จะอธิบายไว้ในไฟล์แนบแล้วก็ตาม ทั้งนี้เพื่ออำนวยความสะดวกแก่เพื่อนสมาชิกในการค้นหาข้อมูล
กรุณาแนบไฟล์ตัวอย่างพร้อมแสดงคำตอบที่ถูกต้องมาในไฟล์ด้วยเพื่อให้ง่ายต่อการทำความเข้าใจและสะดวกต่อการตอบคำถาม (ขนาดไฟล์ไม่เกิน 500Kb ขนาดภาพไม่เกิน 800*600 Pixel) ไม่แนบเป็น Link มาจากแหล่งอื่นที่อาจจะถูกลบทิ้งไปโดยต้นทางในภายหลัง นอกจากนี้ไม่ควรแนบไฟล์ที่มีข้อมูลสำคัญอันก่อให้เกิดความเสียหายกับตนเองและผู้อื่น
กรณีเป็นคำถามเกี่ยวกับ Programming เช่น VBA, VB.Net, C#, SQL ฯลฯ ต้องลองเขียนมาเองก่อนเสมอ ถามเฉพาะที่ติดปัญหา ระบุ Module, Procedure ที่ติดปัญหาให้ชัดเจน กรุณาโพสต์ Code ให้แสดงเป็น Code คือเปิดด้วย [code] และปิดด้วย [/code] ตัวอย่างเช่น [code]dim r as range[/code] เพื่อให้แตกต่างจากข้อความทั่วไป สะดวกในการอ่านและทดสอบ (คลิกเพื่อดูตัวอย่าง)
กรุณาแจ้งผลการใช้งานเมื่อได้รับคำตอบว่าตรงกับความต้องการหรือไม่
leelaphoom
Member
Posts: 21 Joined: Mon Mar 03, 2014 11:15 pm
#1
Post
by leelaphoom » Fri Jun 27, 2014 1:00 pm
จากไฟร์ที่แนบมาให้ผมอยากทราบว่า
จะดึงข้อมูล Received กับ Send out ในsheet 1 มาไว้ในsheet ให้ตรงกับItem No ตามวันที่และเดือนปัจจุบัน จะใช้สูตรอะไรครับ
You do not have the required permissions to view the files attached to this post.
snasui
Site Admin
Posts: 31253 Joined: Sun Jan 24, 2010 12:33 pm
Location: Songkhla, Thailand
Excel Ver: 2010, 2019
Contact:
#2
Post
by snasui » Fri Jun 27, 2014 1:07 pm
แนบตัวอย่างคำตอบที่ต้องการมาด้วยสักสองสามตัวอย่าง และอธิบายมาด้วยว่าดึงมาด้วยเงื่อนไขใด จะได้เข้าใจตรงกันครับ
leelaphoom
Member
Posts: 21 Joined: Mon Mar 03, 2014 11:15 pm
#3
Post
by leelaphoom » Fri Jun 27, 2014 1:23 pm
อย่างเช่น ข้อมูลตัวแรก Item No=FG-A03-00739 Received= 20 Send out=2 ข้อมูลReceived กับ Send out ก็จะไปขึ้นในช่อง Received กับ Send out ของวันที่27/06/2014 ประมาณนี้ครับ ถ้าเรากรอกพรุ้งนี้ก็จะไปขึ้นในช่องของวันที่28/06/2014
You do not have the required permissions to view the files attached to this post.
snasui
Site Admin
Posts: 31253 Joined: Sun Jan 24, 2010 12:33 pm
Location: Songkhla, Thailand
Excel Ver: 2010, 2019
Contact:
#4
Post
by snasui » Fri Jun 27, 2014 1:34 pm
ข้อมูลใน Sheet1 ไม่ระบุวันที่ โปรแกรมจะทราบได้อย่างไรว่าให้นำไปวางในคอลัมน์ AD ซึ่งเป็นของวันที่ปัจจุบันครับ
leelaphoom
Member
Posts: 21 Joined: Mon Mar 03, 2014 11:15 pm
#5
Post
by leelaphoom » Fri Jun 27, 2014 1:38 pm
ขอประธานโทษครับ อันนี้ระบุแล้ว
You do not have the required permissions to view the files attached to this post.
snasui
Site Admin
Posts: 31253 Joined: Sun Jan 24, 2010 12:33 pm
Location: Songkhla, Thailand
Excel Ver: 2010, 2019
Contact:
#6
Post
by snasui » Fri Jun 27, 2014 3:52 pm
ลองตามนี่้ครับ
ชีท June เซลล์ BJ3 คีย์
=SUMIFS(Sheet1!$C$2:$C$19,Sheet1!$B$2:$B$19,$A3,Sheet1!$E$2:$E$19,BJ$2)
Enter > Copy ไปด้านล่างและคอลัมน์อื่น ๆ ที่เกียวข้อง
leelaphoom
Member
Posts: 21 Joined: Mon Mar 03, 2014 11:15 pm
#8
Post
by leelaphoom » Fri Jun 27, 2014 4:44 pm
รขกวนถามอีกคำถามครับ
คือผมลองเขียนโค้ด VBA ค้นหาข้อมูล แต่พอพิมพ์ Key Word ไปแล้วมันไม่โชว์ข้อมูลตามต้งการ
เช่นคีย์ FG-A03-00739 ไปแล้ว จะโชว์ Item No Received Send out ใน list box ครับ ควรปรับสูตร อย่างไรบ้างครับ
You do not have the required permissions to view the files attached to this post.
snasui
Site Admin
Posts: 31253 Joined: Sun Jan 24, 2010 12:33 pm
Location: Songkhla, Thailand
Excel Ver: 2010, 2019
Contact:
#9
Post
by snasui » Fri Jun 27, 2014 4:57 pm
Code ที่เขียนมาเองแล้วชื่อว่า Procedure อะไร ติดขัดบรรทัดใดครับ
leelaphoom
Member
Posts: 21 Joined: Mon Mar 03, 2014 11:15 pm
#10
Post
by leelaphoom » Fri Jun 27, 2014 5:11 pm
Code: Select all
Private Sub TextBox1_Change()
Range("KeyWord").Value = TextBox1.Value
ListBox1.RowSource = "Product"
Calculate
End Sub
ผมไม่ค่อยเข้าใจเรื่อง vba เท่าไหร่เพิ่งเริ่มศึกษา
แต่โค้ดนี้พอพิมพ์ keyword ในtextbox แล้ว
ในช่อง listbox มันโชว์แต่ item no มา
ซิึ่งผม อยากให้มันโชว์ค่า Item No Received Send out ทั้ง3 ค่า
เลยไม่รู้จะแก้ตรงไหนดี
snasui
Site Admin
Posts: 31253 Joined: Sun Jan 24, 2010 12:33 pm
Location: Songkhla, Thailand
Excel Ver: 2010, 2019
Contact:
#11
Post
by snasui » Fri Jun 27, 2014 5:22 pm
ที่โพสต์มานั้นไม่พบว่าเป็นการค้นหา ควรศึกษาการ Loop เพิ่มเติม จากนั้นลองเขียนมาใหม่ ติดตรงไหนมาถามกันต่อครับ
leelaphoom
Member
Posts: 21 Joined: Mon Mar 03, 2014 11:15 pm
#12
Post
by leelaphoom » Fri Jun 27, 2014 5:30 pm
คือผมต้องการแค่ อยากดูข้อมูล ทั้ง 3 อย่างของมัน
เอาไว้ใช้เวลาหาวัสดุเฉยๆ ไม่สามารถใช้ได้หรอครับ
snasui
Site Admin
Posts: 31253 Joined: Sun Jan 24, 2010 12:33 pm
Location: Songkhla, Thailand
Excel Ver: 2010, 2019
Contact:
#13
Post
by snasui » Fri Jun 27, 2014 5:36 pm
การค้นหาที่พูดถึงคือ คีย์ค่าใด ๆ ลงไปใน TextBox แล้วให้โชว์ค่าที่เกี่ยวข้องใน ListBox จะต้อง Loop ค่าที่ตรงกับเงื่อนไขเพื่อ Add รายการเข้าไปครับ