title: How to Prevent copy from protected excel sheet
body: <p>I'm trying to protect some of the columns from my excel. I tried this code mentioned below but its not working can anyone help me to out of this issue.</p>
  <pre><code>Sub ARCProtectPwdRFQ()
  
  ActiveSheet.Unprotect Password:=&quot;arc&quot;
  Cells.Locked = False
  
  ActiveSheet.Range(&quot;A1&quot;, &quot;D100&quot;).Locked = True
  Columns(&quot;I:I&quot;).EntireColumn.Locked = True
  ActiveSheet.Protect Password:=&quot;arc&quot;, UserInterFaceOnly:=True   'DrawingObjects:=True, Contents:=True, Scenarios:=True
  
  End Sub
  </code></pre>