excel中拖动而造成的公式错误是经常发生的，可以把拖动功能禁用来实现：方法有二种：1、工具－－〉选项－－〉编辑－－〉单元格拖放功能，不取消勾选。缺点：会造成所有excel文件的拖放功能及自动填充功能丧失。2、通过VBA来实现单个工作表的禁用拖放功能：（1）.按Alt+F11，打开VBA编辑器。（2）.如果仅要禁用某个工作表的单元格拖放功能，可以在“工程”窗口中双击某个工作表，在代码窗口中输入下列代码：PrivateSubWorksheet_Activate()Application.CellDragAndDrop=FalseEndSubPrivateSubWorksheet_Deactivate()Application.CellDragAndDrop=TrueEndSub（3）这样，当该工作表被激活时，单元格拖放功能就被禁用了，而选择其他工作表时又会打开单元格拖放功能。2、通过VBA来实现整个工作簿的禁用拖放功能：在“工程”窗口中双击“ThisWorkBook”，在右侧代码窗口中输入下列代码：PrivateSubWorkbook_WindowActivate(ByValWnAsWindow)Application.CellDragAndDrop=FalseEndSubPrivateSubWorkbook_WindowDeactivate(ByValWnAsWindow)Application.CellDragAndDrop=FalseEndSub当该工作簿被激活时，单元格拖放功能就被禁用了，而选择其他工作簿时又会打开单元格拖放功能。提示：请允许宏运行在开始→选项→高级→在编辑选项里的“启用填充柄和单元格拖放功能”选项怎样才能设置得到只对一个文档有效，即在同一台电脑里，“启用填充柄和单元格拖放功能”只对其中某一个文档有效，但打开其它文档时是没有效的呢？通过VBA代码解决这个问题在工程窗口双击“ThisWorkBook”，右侧输入如下代码：PrivateSubWorkbook_WindowActivate(ByValWnAsWindow)Application.CellDragAndDrop=FalseEndSubPrivateSubWorkbook_WindowDeactivate(ByValWnAsWindow)Application.CellDragAndDrop=FalseEndSubPrivateSubWorkbook_Deactivate()Application.CellDragAndDrop=TrueEndSub