Page 1 of 1
cutข้อมูลจากsheet1ไปsheet2
Posted: Wed Jan 28, 2015 9:18 pm
by Ponpimon
ต้องการให้เมื่อกดปุ่ม ลบข้อมูลทั้งหมด แล้วข้อมูลในcell a2:b9 ย้ายไปอยุ่ใน sheet2 ในตำแหน่งที่กำหนดให้ แต่โค้ดที่เขียนมันจะไปแสดงตำแหน่งที่activeในsheet2 ซึ่งไม่สามารถกำหนดตำแหน่งที่แน่นอนได้ อยากให้ข้อมูลไปอยุ่ตามตำแหน่งที่เราฟิกไว้ตลอดทุกครั้งที่เรากดลบข้อมุล
(ปล. หนูอัพโหลดไฟล์เอ็กเซลไม่ได้ค่ะ เลยแคปรูปหน้าจอกับโค้ดให้ดูแทนค่ะ ขอโทษด้วยนะคะ)
Re: cutข้อมูลจากsheet1ไปsheet2
Posted: Wed Jan 28, 2015 9:20 pm
by snasui
ขนาดไฟล์ต้องไม่เกิน 300kb หากเกินกว่านั้นให้ลบสิ่งที่ไม่จำเป็นทิ้งไป ไฟล์ตัวอย่างไม่ควรมีขนาดใหญ่ครับ
Re: cutข้อมูลจากsheet1ไปsheet2
Posted: Wed Jan 28, 2015 9:24 pm
by Ponpimon
มีแค่ 20 kb อะค่ะ แต่ส่งไม่ได้ค่ะ
Re: cutข้อมูลจากsheet1ไปsheet2
Posted: Wed Jan 28, 2015 9:29 pm
by snasui
ชื่อไฟล์ต้องเป็นภาษาอังกฤษ ตามประกาศด้านบนครับ
Re: cutข้อมูลจากsheet1ไปsheet2
Posted: Wed Jan 28, 2015 9:32 pm
by Ponpimon
ได้แล้วค่ะ ขอโทษทีค่ะ พอดีพึ่งเริ่มใช้ค่ะ^^
Re: cutข้อมูลจากsheet1ไปsheet2
Posted: Wed Jan 28, 2015 9:47 pm
by snasui
ตัวอย่างการปรับ Code ครับ
Code: Select all
Private Sub CommandButton1_Click()
Range("a2:b11").Cut Sheets("Sheet2").Range("c5")
End Sub
Re: cutข้อมูลจากsheet1ไปsheet2
Posted: Wed Jan 28, 2015 10:16 pm
by Ponpimon
ได้แล้วค่ะ ขอบคุณอาจารย์มากค่ะ^^