Allow user to paste to visible cells only or not paste at all for specified columns

[cknnugget]

I have a table that a user may be tempted to copy paste down a column in a FILTERED table. If this occurs, the cells that are hidden from the filter will be overwritten when the column is pasted too. Is there a way, without turning off paste for the whole workbook, to either:
1. Not allow paste for specific columns?
2. Not allow hidden rows to be pasted to for specific columns?

 

[cknnugget]

I tried this line of code but it does not allow

ActiveSheet.ListObjects("Table14").ListColumns(2).DataBodyRange.CutCopyMode = False