Page 1 of 1
ช่วยด้วยครับ linkเป็นวงกลมครับ
Posted: Mon May 23, 2011 4:48 pm
by sdmania
จากตัวอย่าง
form01 ผมจะดึงออกมา เพื่อ แก้ไข คำนำหน้า(นางสาวเป็นนาง ยศ)ชื่อลูกค้า สกุลลูกค้าครับ กะว่าให้แก้ที่ form01แล้วไปเปลี่ยนที่ data02 แต่มันขึ้น link วงกลมครับ ต้องทำยังไงดีครับ
Re: ช่วยด้วยครับ linkเป็นวงกลมครับ
Posted: Mon May 23, 2011 5:21 pm
by snasui

ปกติการแก้ไขข้อมูลที่มีอยู่แล้วสามารถจะ Filter ข้อมูลที่เกี่ยวข้องขึ้นมาแล้วเปลี่ยนเป็นข้อมูลที่สัมพันธ์กันให้ถูกต้องได้ครับ
การใช้สูตรอ้างอิงกลับไปกลับมาแล้วเกิดการอ้างอิงเป็นวงกลมย่อมเกิดขึ้นได้ และปกติจะไม่ใช่สูตรในการเปลี่ยนข้อมูลต้นแหล่งในลักษณะที่ทำมาครับ ถ้าจะทำคงต้องพึ่ง VBA คือเลือกรายการขึ้นมาแล้วแก้ไขและบันทึกลงที่เดิม
Re: ช่วยด้วยครับ linkเป็นวงกลมครับ
Posted: Tue May 24, 2011 9:01 am
by sdmania

รบกวนอาจารย์ ยกตัวอย่าง vba ที่ว่าดึงขึ้นมาแก้ไข แล้วค่อยsave เก็บลงที่เดิมด้วยครับ
ตัวอย่างvba จากหนังสือที่ผมซื้อมา ไม่มีส่วนการ editข้อมูลเลยครับ หลักๆมีเพิ่มข้อมูล, ลบข้อมูล (ตอนแรกจะใช้ลบrowที่ผิด แต่มันชักช้าตรงที่ ต้องkey เข้าไปใหม่ทั้งแถว) ,ค้นหาข้อมูล เท่านี้น่ะครับ
ผมยังไม่เคยเจอ แก้ไขข้อมูล เมื่อแก้แล้วส่งไปsave ที่เซลเดิมครับ

Re: ช่วยด้วยครับ linkเป็นวงกลมครับ
Posted: Tue May 24, 2011 9:33 am
by snasui

ลองดูตามไฟล์แนบครับโดยใช้ Code ด้านล่างเข้ามาช่วย Update ข้อมูลครับ
Code: Select all
Sub UpdateData()
Dim rs As Range, rt As Range
Dim i As Integer
Set rs = Worksheets("form01").Range("C4:E4")
i = Worksheets("form01").Range("C1")
Set rt = Worksheets("data02").Range("B1").Offset(i, 0)
rs.Copy
rt.PasteSpecial xlPasteValues
Application.CutCopyMode = False
MsgBox "Update Finish."
End Sub
Re: ช่วยด้วยครับ linkเป็นวงกลมครับ
Posted: Tue May 24, 2011 3:23 pm
by sdmania
ขอบคุณครับอาจารย์
