View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
TEAM[_8_] TEAM[_8_] is offline
external usenet poster
 
Posts: 1
Default Disable Edit Fill


I am using the current commands to prevent cut, copy, past, drag, drop,
etc. What command would I use to prevent the user from filling up,
down, right, etc??


Code:
--------------------
Private Sub Workbook_Activate()

Application.CellDragAndDrop = False
Application.CutCopyMode = False
Application.OnKey "^c", ("Dummy")
Application.OnKey "^v", ("Dummy")
Application.OnKey "+{DEL}", ("Dummy")
Application.OnKey "+{INSERT}", ("Dummy")
EnableControl 21, False ' cut
EnableControl 19, False ' copy
EnableControl 22, False ' paste
EnableControl 755, False ' pastespecial
End Sub


Private Sub Workbook_Deactivate()
EnableControl 21, True ' cut
EnableControl 19, True ' copy
EnableControl 22, True ' paste
EnableControl 755, True ' pastespecial
Application.CellDragAndDrop = True
End Sub
--------------------



Thanks!


--
TEAM
------------------------------------------------------------------------
TEAM's Profile: http://www.excelforum.com/member.php...o&userid=22810
View this thread: http://www.excelforum.com/showthread...hreadid=484102