VBA to disable Excel Clipboard

[faizanmariner]

Good Day to All, please help its very important

I have created form which have multiple sheet, I used VBA to force run macro, disable copy paste, disable right click, but still can copy from world and paste using excel clipboard, I need VBA to disable this excel clipboard or VBA so that if I copied from World I should not be able to paste in the form.

 

[shg]

In ThisWorkbook,

Private Sub Workbook_Activate()
  Application.CutCopyMode = False
End Sub

 

[faizanmariner]

In ThisWorkbook,

Private Sub Workbook_Activate()
  Application.CutCopyMode = False
End Sub

using this code , still I am able to copy paste

 

[faizanmariner]

using this code , still I am able to copy paste

It means I am still able to copy and paste from Microsoft World

 

[Jaafar Tribak]

It means I am still able to copy and paste from Microsoft World

Yes. Correct.
Setting CutCopyMode to False won't clear the system clipboard and the user will still be able to paste from Word.

 

[faizanmariner]

thanks for reply....i got another VBA which undo......if the last command is copy...its working fine for me now

 

[Jaafar Tribak]

thanks for reply....i got another VBA which undo......if the last command is copy...its working fine for me now

Glad you got it working.

I guess you are using the Worksheet_Change event to detect when data is pasted to the worksheet . If so, how do you distinguish between entering data with the keyboard and pasting data from outside excel ?

 

[faizanmariner]

Glad you got it working.

I guess you are using the Worksheet_Change event to detect when data is pasted to the worksheet . If so, how do you distinguish between entering data with the keyboard and pasting data from outside excel ?

i really do not know.......but I am using a number of VBA....one VBA has disable copy and paste within excel for clipboard, one VBA has disable ctr command, one VBA has disable right click, and the last one which can undo if the last command is copy.....so finally can not copy paste whitin excel, from other excel as well as non excel application also

 

[Kajairoh]

In ThisWorkbook,

Private Sub Workbook_Activate()
  Application.CutCopyMode = False
End Sub

shg I need your help regarding a formula you posted in 2014