رفع مشکل غیر فعال شدن امکان درگ کردن در اکسل

[khorasan66]

سلام
تا کنون دو مرتبه برای اکسل رایانه من امکان درگ کردن غیر فعال شده است یعنی وقتی اکسل را باز می کنم و روی یک
سلول کلیک کنم ، یک مربع مشکی کوچیک ، گوشه سمت راست، پایین سلول وجود نداره تا بتوانم درگ کنم . لذا مجبور شده ام آفیس (2010 ) را مجدد نصب کنم
احتمالا در برنامه هایم از دستوری استفاده کرده ام که باعث این امر می شود
لطفا راهنمائی فرمائید چه کار کنم

[khorasan66]

با کد زیر مشکلم حل شد :

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.CutCopyMode = True
Application.OnKey "^c"
Application.OnKey "^v"
Application.OnKey "^{INSERT}"
Application.OnKey "^{DELETE}"
Application.CommandBars("Cell").Enabled = True
Application.CellDragAndDrop = True
Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"",True)"
End Sub