Page 1 of 5
อยากหาตำแหน่ง
Posted: Sat Jul 18, 2015 5:25 pm
by chandat
ผมต้องการให้ช่วยหาตำแหน่งของ A B C D E F ซึ่งแทนค่าสี ภาพ ที่เห็นเขียนจำนวนเส้นด้าย
ริ้วลายผ้าทั้งหมดมี 2400เส้น แบ่งเป็น10ช่วง...
เริ่มจาก #1 + #2 ... เครื่องทอผ้ามี 40 หัว(อันที่มีหลายขนาด 42 48 ...)
ปกติผมต้องเขียนออกมาเพื่อหาตำแหน่งของมัน เช่น
หัวที่ 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20..................40.
แถวที่1 AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
2 BBBBBBBBBBBBBBBBBAAAAAAAAAAAAAAA.........................
xxxx คืออยากรู้ว่า C D E จะไปอยูที่ตำแหน่งไหน?
อยากให้หาตำแหน่งสรุปที่วงไว้สีแดง
เขียน VBA ยังไงครับ
ขอบคุณครับ
Re: อยากหาตำแหน่ง
Posted: Sat Jul 18, 2015 6:39 pm
by snasui

ช่วยแนบตัวอย่างไฟล์ Excel และคีย์คำตอบที่ต้องการมาด้วยจะได้เห็นว่าต้องการคำตอบที่เซลล์ใด ด้วยค่าเท่าใด จะได้เข้าใจตรงกัน
สำหรับการใช้งาน VBA จำเป็นต้องทำตามกฎข้อ 5 ด้านบน กรณีไม่มีความรู้ เขียนเองไม่ได้ ก็ต้องให้ผู้ที่มีความรู้เขียนให้ก่อน ติดตรงไหนแล้วค่อยมาถามกันต่อครับ
Re: อยากหาตำแหน่ง
Posted: Sat Jul 18, 2015 6:45 pm
by chandat
ต้องการหาตำแหน่ง
Re: อยากหาตำแหน่ง
Posted: Sat Jul 18, 2015 6:48 pm
by snasui
snasui wrote:คีย์คำตอบที่ต้องการมาด้วยจะได้เห็นว่าต้องการคำตอบที่เซลล์ใด ด้วยค่าเท่าใด จะได้เข้าใจตรงกัน

ช่วยทำมาตามด้านบนครับ
Re: อยากหาตำแหน่ง
Posted: Sat Jul 18, 2015 9:12 pm
by chandat
ผมต้องการรู้ว่า A B C D E F จะอยู่ตำแหน่งไหนบ้าง
เช่น A ใช้มาก ต้องอยู่ตำแหน่ง 1-40. (้ครื่องมี40หัว)
จากการนับแล้ว B ต้องอยู่ ตำแหน่งที่ 1-15.
แล้วค่า F ต้องอยู่สุดท้าย เพราะ 2400/40 แล้วลงตัว ฉะนั้น F ต้องอยูที่ 36-40.
แล้ว C D E จะอยู่ไหนเอ่ย ปกติผมต้องเขียนจริงๆ 1-40 แล้วเริ่มนับใหม่ไปเรื่อยๆ
ไล่จากรายกาารที่1 ไปเรื่อยๆ จนถึงตำแหน่งของจึงจะรู้ว่า มันจะอยู่ตำแหน่งไหน
อยากให้ใส่ค่าไว้ที่ จุดวงไว้ครับ
Re: อยากหาตำแหน่ง
Posted: Sat Jul 18, 2015 9:21 pm
by snasui
chandat wrote:เช่น A ใช้มาก ต้องอยู่ตำแหน่ง 1-40. (้ครื่องมี40หัว)

ค่อย ๆ ถามตอบกันไปครับ
จากด้านบน นับอย่างไรว่าอยู่ 1-40 ครับ ตัวเลขใด ค่าใด หรือเซลล์ใด ที่จะบอกว่าอ A อยู่ในตำแหน่ง 1-40 หรือมีวิธีคำนวณมืออย่างไรครับ
Re: อยากหาตำแหน่ง
Posted: Sat Jul 18, 2015 9:43 pm
by chandat
ตัวอย่างที2
เส้นด้ายทั้งหมด 80เส้น ใช้เครื่อง 40หัวทอ (หารด้วย 40)
ค่า A 40 เส้น แสดงว่าต้องใช้ตำแหน่ง 1-40.
ค่า B 10 เส้น แสดงว่าต้องใช้ตำแหน่ง 1-10. เครื่องจะนับ1ใหม่ต่อจาก40 เพราะมี40หัว
ค่า C 30 เส้น แสดงว่าต้องใช้ตำแหน่ง 11-40.
เป็นต้น
ทีนี้ถ้าเจอลายยาวๆต้องกินเวลามากเลยก็จะหาตำแหน่ง
บางวันเขียนหลายสิบรายการเสียเวลาเยอะเลย......
จึงอยากหาวิธีหาตำแหน่งแล้วระบุไว้ว่าค่า A B C อยู่ตรงไหนบ้าง
Re: อยากหาตำแหน่ง
Posted: Sat Jul 18, 2015 9:59 pm
by chandat
ตัวอย่างที่3
เส้นด้ายทั้ง repeat มี 100 เส้น ใช้เครื่อง 40 หัวทอ หารไม่ลงตัว จบrepeatแรกแล้ว repeat ต่อไป ช่องที่ 21 จะเริ่มลายใหม่
สี A ใช้ 2 เส้น รอบแรก จะตก 1 และ 2 รอบต่อไป ก็เป็น 21 และ 22.
สี B ใช้ 38 เส้น แต่รอบต่อไปจะเริ่มวิ่งที่ 23-40. ต่อด้วย 1-19. จึงเท่ากับต้องใส่ 40หัว 1-40.
สื C วิ่งครบทุกหัว ใส่ด้วย 1-40.
ทุกครั้งผมต้องหาตำแหน่งตัวเลขมาใส่ตรงที่วงไว้ครับ
Re: อยากหาตำแหน่ง
Posted: Sat Jul 18, 2015 10:46 pm
by snasui
chandat wrote:เส้นด้ายทั้ง repeat มี 100 เส้น ใช้เครื่อง 40 หัวทอ หารไม่ลงตัว จบrepeatแรกแล้ว repeat ต่อไป ช่องที่ 21 จะเริ่มลายใหม่
สี A ใช้ 2 เส้น รอบแรก จะตก 1 และ 2 รอบต่อไป ก็เป็น 21 และ 22.
สี B ใช้ 38 เส้น แต่รอบต่อไปจะเริ่มวิ่งที่ 23-40. ต่อด้วย 1-19. จึงเท่ากับต้องใส่ 40หัว 1-40.
สื C วิ่งครบทุกหัว ใส่ด้วย 1-40.

อ่านแล้วไม่เข้าใจครับ
เครื่อง 40 หัวทอ สี A เป็น 1 และ 2 อันนี้เข้าใจได้ แต่เป็น 21 และ 22 ด้วยนั้น มีวิธีคิดอย่างไรครับ
Re: อยากหาตำแหน่ง
Posted: Sat Jul 18, 2015 11:05 pm
by DhitiBank
อ๋อ แบบนี้หรือเปล่าครับอาจารย์
1 repeat = 100 เส้น
เครื่อง 40 หัว จะต้องใช้หมด 40 หัว จำนวน 2 รอบ (จะได้ 80 เส้น) เหลืออีก 20 เส้น ก็จะจบ 1 repeat
ดังนั้นเครื่อง 40 หัว ใช้ในรอบที่ 3 ไปแล้ว 20 หัว ก็จะขึ้น repeat ใหม่ที่หัว 21 เอ... หรือเรียกว่าช่อง อ่านแล้ว งงแท้
Re: อยากหาตำแหน่ง
Posted: Sat Jul 18, 2015 11:40 pm
by snasui

ตามตัวอย่างที่สอง ลองดูตัวอย่างสูตรใน Sheet2 ตั้งแต่คอลัมน์ J เป็นต้นไป ตามไฟล์แนบว่าตรงกับที่ต้องการหรือไม่ครับ
Re: อยากหาตำแหน่ง
Posted: Sun Jul 19, 2015 7:06 am
by chandat
[youtube]
https://youtu.be/rtURLUxKmEk[/youtube]
เครื่องทอผ้าที่ผมต้องการเขียนโปรแกรมเป็นเครื่องทรงกลม มีหลายหัว ในที่นนี้ผมใช้ 40หัว
จากที่ดูใน clip เป็นเครื่องทอผ้าริ้วสี เครื่องจะหมุนไปเรื่อยๆ ช่วงกลางของ clip จะเห็นมีการขยับสับเปลี่ยน
ก็คือการเปลี่ยนสีนั่นเอง
เสื้อตัวอย่าง ใช้ 2 สี (ทอช่วงละ 3นิ้วกะด้วยสายตา) สมมุติว่าแต่ละช่วงทอ 100เส้น
จะเริ่มด้วย
C=640 เส้นด้ายใช้ 640 เส้น
line = 7 แบ่งเป็น 7ช่วง
#1 = A 40 ช่วงที่1 ใช้เพียง40เส้น
#2 = B 100 ช่วงที่ 2 ใช้100 เส้น เครื่องจะหมุน 2รอบครึ่งในการทอริ้วนี้ จบทีหัว 20
#3 = A 100 เริ่มทอหัวที่ 21 นับเส้นที่1 ไป 2รอบครึ่ง จบที่หัวที่40
#4 = B 100 เริ่มหัวที่ 1เปลี่ยนสี ไปจบที่หัว20
#5 = A 100
#6 = B 100
#7 = A 100
เส้นด้าย 640 เครื่องมี 40 หัว = 640/40=เครื่องหมุน 16 รอบ จบ1repeat (1ตัวเสื้อ)
เมื่อหารลงตัวทุกครั้งที่เริ่มนับจะเป็นหัวที่ 1เสมอ
แต่ถ้ามีริ้วผ้ายาว 100 เส้น เครื่องต้องหมุน 2รอบครึ่ง จึงจะครบ 1repeat
100/40=2.5รอบ
เนื่องจากหารไม่ลงตัว ฉะนั้น การนับ1(เริ่มrepeatใหม่) ครั้งต่อไปคือหัวที่21 นับเป็นหัวที่1 เมื่อหมุนไปครอบ 100เส้น
จะไปจบที่หัวที่40 การนับครั้งต่อไป จะเริ่มที่หัวที่1 ........
Re: อยากหาตำแหน่ง
Posted: Sun Jul 19, 2015 7:34 am
by chandat
เครื่องทอผ้าตัว ในรูปนี้เห็น 6หัว ทั้งหมดอาจมี 40 42 48 หรือแล้วแต่ความกว้างของเครื่องทอผ้า วงใหญ่แค่ไหน
แต่ะลหัวจะมี 6ช่อง ใส่เส้นด้าย 6เส้น หรือ 6สี ชื่อเรียกตัวแทน A B C D E F
ปัญหาของผมคือ ถ้าทอเลื้อ 1 ตัว ที่บางสีใช้น้อยๆ เช่นเสื้อทั้งตัวยาว 2000เส้น
แต่คาดริ้วสีไว้สัก 15เส้น ผมคงไม่ใส่ครบ 40ช่อง(ใส่ทุกหัว)
ผมต้องมานับเอาว่าจบริ้วผ้าแต่ช่วงจนมาถึง 15เส้นที่ว่ามันอยู่ตรงไหนใส่ตรงนั้น
เหมือนที่ยกตัวอย่างหัวข้อกระทู้ สี C D E ต้องหาออกมาว่ามันจะไปตรงกับหัวไหน
Re: อยากหาตำแหน่ง
Posted: Sun Jul 19, 2015 7:58 am
by snasui
snasui wrote: 
ตามตัวอย่างที่สอง ลองดูตัวอย่างสูตรใน Sheet2 ตั้งแต่คอลัมน์ J เป็นต้นไป ตามไฟล์แนบว่าตรงกับที่ต้องการหรือไม่ครับ

ได้ทดสอบไฟล์ที่ผมโพสต์ไปแล้วยัง ได้ผลเป็นอย่างไร ติดปัญหาตรงไหนครับ

Re: อยากหาตำแหน่ง
Posted: Sun Jul 19, 2015 12:48 pm
by chandat
อยากได้เลขกำกับ คอลลัม กับ โร
่เมื่อเปลี่ยนค่าจำนวนหัวเป็น42 จะแสดงผลไม่ตรง
เมื่อทอด้วยเครื่อง 42 หัว
ตำแหน่ง ควรจะเป็นแบบนี้ครับ
A 1-42.
B 1-42.
C 1-42.

Re: อยากหาตำแหน่ง
Posted: Sun Jul 19, 2015 12:55 pm
by snasui

ในโอกาสถัดไปให้แนบไฟล์ที่ปรับเองแล้วพร้อมกรอกค่าตัวอย่างมาด้วย จะได้ช่วยตอบไปจากนั้นครับ
ผมปรับไฟล์มาให้ใหม่ตามแนบ โดยคอลัมน์ L:S แทนแต่สี
Re: อยากหาตำแหน่ง
Posted: Sun Jul 19, 2015 1:52 pm
by chandat
ได้เลยครับผม
แนบมาใหม่แล้วครับ
ขออภัย
Re: อยากหาตำแหน่ง
Posted: Sun Jul 19, 2015 1:59 pm
by snasui
snasui wrote:
ในโอกาสถัดไปให้แนบไฟล์ที่ปรับเองแล้วพร้อมกรอกค่าตัวอย่างมาด้วย จะได้ช่วยตอบไปจากนั้นครับ
ผมปรับไฟล์มาให้ใหม่ตามแนบ โดยคอลัมน์ L:S แทนแต่สี

ดูไฟล์ที่ผมตอบไปว่าได้คำตอบตรงกับที่ต้องการหรือไม่ครับ
Re: อยากหาตำแหน่ง
Posted: Sun Jul 19, 2015 2:08 pm
by chandat
เห็นแล้วครับ
แต่ตำแหน่งที่ใส่เส้นด้ายยังต้องแก้ไขนะครับ
กรณี ใช้เครื่องที่มี 42 หัว
เครื่องจะไม่ซ้ำตำแหน่งเดิม
เมื่อเครื่องทำงาน 1 รอบ (repeat ) มันจะนับ 1 ต่อจากหัวถัดไปเหมือนที่แสดงไว้ใน word ครับ
ฉะนั้น การนับตำแหน่งจึงต้องนับไปเรื่อยๆ เท่ากับจะต้องมีทุกหัว 1-42. หมด
Re: อยากหาตำแหน่ง
Posted: Sun Jul 19, 2015 2:14 pm
by snasui

โพสต์ที่คุณ chandat อ่านแล้วทราบว่าผมให้แนบไฟล์มาด้วยนั่นแหละครับ