Page 1 of 1
ให้ cell B5 กับ B9 ข้อมูลต้องเหมือนกัน และสามารถแก้ที่ cell ใดก็ได้ ข้อมูลก็จะอัปเดทตามกันต้องทำไงครับ
Posted: Wed May 25, 2022 9:35 pm
by 10idlnw
ตอนนี้เมื่อแก้ที่
B5 ก็จะทำให้ B9 เปลี่ยนตาม ฺ
B5 เท่านั้นตามโค้ดนี้
Code: Select all
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Range("b9") = Range("b5")
Range("b10") = Range("b6")
End Sub
แต่ผมต้องการอยากให้ ทั้ง B5 และ B9 เหมือนกันตลอด คือ
เมื่อแก้ที่
B5 ก็จะทำให้ B9 เปลี่ยนตาม ฺ
B5 หรือในทางกลับกัน
เมื่อแก้ที่ B9 ก็จะทำให้
B5 เปลี่ยนตาม B9 สลับสับเปลี่ยนกันไปแบบนี้ต้องเขียนโค้ดยังไงครับอาจารย์
sssss.xlsm
Re: ให้ cell B5 กับ B9 ข้อมูลต้องเหมือนกัน และสามารถแก้ที่ cell ใดก็ได้ ข้อมูลก็จะอัปเดทตามกันต้องทำไงครับ
Posted: Wed May 25, 2022 9:40 pm
by snasui
กรุณาแจ้งผลการใช้งานในกระทู้นี้
viewtopic.php?t=19163 ตามกฎการใช้บอร์ดข้อ 6 ด้านบน
ด้วยครับ
Re: ให้ cell B5 กับ B9 ข้อมูลต้องเหมือนกัน และสามารถแก้ที่ cell ใดก็ได้ ข้อมูลก็จะอัปเดทตามกันต้องทำไงครับ
Posted: Wed May 25, 2022 9:43 pm
by 10idlnw
เข้าไปแจ้งผลการใช้งานเรียบร้อยแล้วครับ ขอบคุณมากครับอาจารย์
Re: ให้ cell B5 กับ B9 ข้อมูลต้องเหมือนกัน และสามารถแก้ที่ cell ใดก็ได้ ข้อมูลก็จะอัปเดทตามกันต้องทำไงครับ
Posted: Wed May 25, 2022 9:48 pm
by snasui
ตัวอย่างการปรับ Code ครับ
Code: Select all
Private Sub Worksheet_Change(ByVal Target As Range)
If InStr("B5B9", Target.Address(0, 0)) Then
Range("b5, b9").Value = Target.Value
' Range("b9") = Range("b5")
' Range("b10") = Range("b6")
End If
End Sub
Re: ให้ cell B5 กับ B9 ข้อมูลต้องเหมือนกัน และสามารถแก้ที่ cell ใดก็ได้ ข้อมูลก็จะอัปเดทตามกันต้องทำไงครับ
Posted: Wed May 25, 2022 10:07 pm
by 10idlnw
ใช้งานได้แล้วครับ ขอบคุณมากครับอาจารย์