Page 1 of 1

เปลี่ยนข้อมูลตามเงื่อนไขที่ต้องการ

Posted: Fri Jun 05, 2015 1:33 pm
by setsunatop
*เปลี่นข้อมูลในช่องสีเหลืองแล้วสถานะจะเปลี่ยนตาม
เมื่อ ช่องสีเหลืองเป็น "ประทีป" สถานะจะเปลี่ยนเป็น "ไม่ว่าง"
และเปลี่ยนข้อมูลในช่องสีเหลืองอีกครั้งเป็น "ไพบูลย์" สถานะก็จะเปลี่ยนเป็น"ไม่ว่าง"
โดยที่สถานะของประทีปก็จะเป็น"ไม่ว่าง"เหมือนเดิม
สถานะจะกลับมาเป็น"ว่าง"เหมือนเดิมได้ก็ต่อเมื่อเราเปลี่ยนเองในช่อง Dropdown ของสถานะแต่คนคน

Re: เปลี่ยนข้อมูลตามเงื่อนไขที่ต้องการ

Posted: Fri Jun 05, 2015 1:42 pm
by snasui
:D หมายถึงว่าหากเปลี่ยน I4 เป็นชื่อใด คอลัมน์ G ที่ตรงกับชื่อผู้นั้นให้แสดงค่าเป็น "ไม่ว่าง" และเมื่อเปลี่ยนเป็น "ไม่ว่าง" แล้วก็ให้คงสถานะไว้เช่นนั้นใช่หรือไม่ครับ

หากใช่ต้องเขียนด้วย VBA ซึ่งต้องเขียนมาก่อน ติดตรงไหนแล้วค่อยถามกันต่อตามกฎการใช้บอร์ดข้อ 5 ด้านบนครับ :roll:

Re: เปลี่ยนข้อมูลตามเงื่อนไขที่ต้องการ

Posted: Fri Jun 05, 2015 2:32 pm
by yodpao.b
เปลี่ยนข้อมูลตามเงื่อนไขที่ต้องการ

น่าสนใจครับ
ขอศึกษาด้วยครับอาจารย์

Re: เปลี่ยนข้อมูลตามเงื่อนไขที่ต้องการ

Posted: Fri Jun 05, 2015 3:38 pm
by yodpao.b
เรียนอาจารย์ผมได้ทดลองทำด้วย VBA ก็ใช้ได้ระดับหนึ่งครับ
แนบไฟล์มาให้ดูกันด้วยครับ

Re: เปลี่ยนข้อมูลตามเงื่อนไขที่ต้องการ

Posted: Fri Jun 05, 2015 3:52 pm
by yodpao.b
1.JPG
ตอนนี้ข้อมูล สถานะในช่อง G ได้อ้างอิงจากคอลัม I(สูตร)

คำถามถ้าผมไม่ต้องการ ข้อมูลอ้าอิงจากคอลัม I
จะเขียน VBA ที่ เซล G8:G23 อย่างไรดีครับ

Re: เปลี่ยนข้อมูลตามเงื่อนไขที่ต้องการ

Posted: Fri Jun 05, 2015 4:04 pm
by snasui
:D ตัอย่าง Code ครับ

Code: Select all

Private Sub Worksheet_Change(ByVal Target As Range)
    With Application
        .EnableEvents = False
        If Target.Address = "$C$3" Then
            Range("c8").Offset(.Match( _
                Range("c3"), Range("c8:c1000"), 0) - 1, 4) = "ไม่ว่าง"
        End If
        .EnableEvents = True
    End With
End Sub

Re: เปลี่ยนข้อมูลตามเงื่อนไขที่ต้องการ

Posted: Fri Jun 05, 2015 6:15 pm
by yodpao.b
ขอบคุณครับ
Code นี้มีประโยชน์ครับ
ฝากไฟล์ไว้หน่อยครับ พอดีทำ ไดร์หายครับ