ปิด“ ลาก Fill Series” ใน Excel

ฉันกำลังมองหาการปิดฟังก์ชันลากเติมซีรีส์เท่านั้น

ฉันต้องการให้ผู้ใช้แผ่นงานของฉันสามารถลาก COPY ลงเท่านั้น

ฉันปิดคุณลักษณะในการตั้งค่าซึ่งปิดใช้งานการลากลงทั้งหมด ฉันจะมีความสุขกับเรื่องนี้ แต่แน่นอนว่าสิ่งนี้ใช้ได้เฉพาะในการตั้งค่า Excel ของฉันเองผู้ใช้ชีตคนอื่น ๆ ก็จะสามารถใช้บริบทของการตั้งค่าของพวกเขาได้เช่นกัน

ฉันสงสัยว่ามีวิธีใดใน VBA ที่จะเปิดใช้คุณลักษณะการเติมซีรี่ส์หรือปิดการใช้งานคุณสมบัติการลากทั้งหมด?

microsoft-excel vba

— Koto
แหล่งที่มา

ความท้าทายที่ยิ่งใหญ่ที่สุดที่คุณจะได้พบคือ Macro Security บนเครื่องแต่ละเครื่อง หากไม่ได้ตั้งค่าให้เรียกใช้ Macros สิ่งนี้จะทำให้ไม่สามารถเรียกใช้ได้

คุณสามารถใช้สิ่งต่อไปนี้ใน VBA เพื่อปิดการใช้งานการลากและวางเซลล์เมื่อเปิดเวิร์กบุ๊ก

Private Sub Workbook_Open()
Application.CellDragAndDrop = False
End Sub

เพื่อหลีกเลี่ยงการทำให้คนโกรธคุณควรเปิดใหม่เมื่อสมุดงานปิด

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.CellDragAndDrop = True
End Sub

คุณสามารถใช้IFคำสั่งเพื่อตรวจสอบว่าคุณสมบัติเปิด / ปิดเพื่อให้แน่ใจว่าคุณกลับสู่สถานะเดิม ความท้าทายที่ยิ่งใหญ่ที่สุดที่คุณจะได้พบคือ Macro Security บนเครื่องแต่ละเครื่อง หากไม่ได้ตั้งค่าให้เรียกใช้ Macros สิ่งนี้จะทำให้ไม่สามารถเรียกใช้ได้

— CharlieRB
แหล่งที่มา

เมื่อปิดเวิร์กบุคลงฉันได้รับกล่องข้อผิดพลาดเกิดขึ้น: พบข้อผิดพลาดในการคอมไพล์ตรวจพบชื่อที่ไม่ชัดเจน: BeforeClose ฉันได้บันทึกทั้งแมโครของคุณในแผ่นงาน "This Workbook" ซึ่งตรงข้ามกับแมโครแต่ละแผ่น

— Koto

สมุดงานย่อยส่วนตัว _BeforeClose () Application.CellDragAndDrop = True End Sub แมโครนี้รู้ได้อย่างไรว่าสมุดงานกำลังปิดอยู่

— Koto

Excel รู้และดำเนินการตัวจัดการเหตุการณ์ / รูทีนย่อยโดยอัตโนมัติเมื่อมีเหตุการณ์เกิดขึ้น นอกจากนี้การประกาศควรเป็นแบบส่วนตัว Sub Workbook_BeforeClose ( ยกเลิกเป็นบูลีน ) ... End Sub

— Karan