Snasui Excel Forum

เรียนอาจาร์ยและท่านผู้รู้ครับ
ปัญหาที่เกิดขึ้นคือ Llik Text BoXและ ComBo Boxข้าม sheet ผ่าน VBA ทำอย่างไรครับ
ปัญหาของผมคือ
-ต้องการ link Text BoXและ ComBo Boxข้าม sheet
(Text Boxคือรายชื่อcell name ที่ต้องการเลือก)และ(ComBo Boxคือfillterรายวันที่ต้องการ)
-เพราะมี หลาย sheet ผมต้อง ทำLlik Text BoXและ ComBo Box ทุกงานเลย
-พอทำText BoXและ ComBo Box ก็เลือกไม่ได้อีก
ตอนนี้กำปั้นทุบดินไม่ก่อนแล้วกันครับ
ขอบพระคุณมากครับ สามารถแก้ในไฟล์ได้เลยครับ
อาร์ต

ผมไม่พบว่ามี Code ใดอยู่ไฟล์แนบ กรณีต้องการใช้ VBA จำเป็นต้องเขียนมาก่อนเสมอครับ ไม่ทราบว่าขั้นตอนการทำงานเป็นอย่างไร ปัญหาตอนนี้คืออะไร ต้องการคำตอบเป็นอย่างไรครับ

เรียนอาจาร์ยครับ
ขอบพระคุณมากครบทีสละเวลามาตอบ ผมแนบไฟล์ให่มพร้อม code ขึ้นไปแล้วนะครับ
codeด้านล่างครับ
อาร์ต
Private Sub ComboBox1_Change()
With Propogation Delay.ComboBox1
.AddItem "9/13/2012"
.AddItem "9/14/2012"
End With
End Sub

Private Sub ComboBox2_Change()
With HO Attemp.ComboBox2
.AddItem "9/13/2012"
.AddItem "9/14/2012"
End Sub

Private Sub TextBox1_Change()
Sheets("Propogation Delay").Range("$A$1:$N$200000").AutoFilter Field:=2, Criteria1:=TextBox1.Text, Operator:=xlAnd
End Sub

Private Sub TextBox2_Change()
Sheets("HO Attemp").Range("$A$1:$N$200000").AutoFilter Field:=2, Criteria1:=TextBox2.Text, Operator:=xlAnd
End Sub

ค่อย ๆ ถามตอบกันไปนะครับ

จากไฟล์ที่แนบมา สามารถใช้ Validation (เมนู Data > Validation) แทนการใช้ ComboBox ได้หรือไม่ครับ ถ้าไม่ได้ ติดปัญหาอะไรครับ

อาจาร์ยครับ ผมใช้ไม่เป็นครับ จำเป็นต้องใช้ครับเวลาเราเลือกวันที่เราต้องการดู จะได้ไม่ต้องคลิกข้ามsheet ไปมาครับ คิดไม่ออกจริงๆ
ขอบคุณครับ

ดูตัวอย่างตามไฟล์แนบครับ ซึ่งมีการปรับปรุงดังนี้

1. มีการให้ Range Name กับค่าที่จะนำไปใช้ใน Validation ซึ่งอยู่ในชีท Config สามารถเข้าไปดูการให้ Range Name ได้โดยคลิกเมนู Formula > Name Manager
2. สร้าง Validation สามารถเข้าไปดูการกำหนด Validation โดยไปที่เซลล์ B4 ของชีท Chart แล้วเข้าเมนู Data > Data Validation แล้วสังเกตการกำหนดค่า
3. ปรับ Code สำหรับการ Filter ข้อมูล ดูได้จาก VBE

ได้แล้วครับอาจาร์ย แต่ของผมมี 2 sheet ครับ จะต้องแสดงในหน้าเดียว
ผมต้องทำ 2 text box และ 2Combo Box
ถ้าเราจะให้เหลือแค่ 1textboxและ 1Combo Boxในหน้าเดียว
ต้องทำอย่างไรครับ
ขอบพระคุณมากครับ ที่สละเวลาให้ครับ
ขอให้มีสุขภาพแข็งแรงครับ
เคารพนับถืออย่างสูง
อาร์ต

แค่เพิ่ม Code สำหรับการ Filter Sheet ที่ต้องการเข้ามาเท่านั้นครับ สามารถ Copy Code เดิมมาวางต่อใน Procedure เดียวกันแล้วเปลี่ยนเฉพาะชีทเป้าหมายที่ต้องการ Filter ใน Code ก็ควรจะได้คำตอบแล้วครับ

เย้ ได้แล้วครับ
ขอบพระคุณอาจาร์ยมากครับ ติดมาเป็นเดือนแล้วครับ
เคารพนับถืออย่างสูง
อาร์ตครับ