VSTO中怎样限制Excel下拉复制

hanxiaoep · 发表于 2015-7-31 20:20

VSTO 中可以通过下列代码限制Excel的复制，但仍可下拉复制，怎样防止下拉复制？
Globals.Sheet1.BeforeRightClick += Sheet1_BeforeRightClick;//取消右键菜单
Globals.Sheet1.Application.OnKey("^{c}","");//禁用Ctr+C
Globals.Sheet1.Application.OnKey("^{v}", "");//禁用Ctr+V

coby001 · 发表于 2015-7-31 21:05

Worksheet.Protect

hanxiaoep · 发表于 2015-7-31 21:42

需要输入数据，但不可以复制粘贴，Worksheet.Protect限制了所有输入。

coby001 · 发表于 2015-8-1 07:31

只开放需要输入的单元格就可以了~

hanxiaoep · 发表于 2015-8-1 09:17

我使用建了一个程序，用listobject控件绑定了数据库，然后对多列使用了NamedRange控件进行条件判定输入，通过下拉复制时出现“该表向工作表中插入了行。这将导致表下方单元格的数据向下移动”，然后破坏整个逻辑条件。而且复制也不是我期望了，希望能找到一个方法，在下拉复制后能够退回或避免该操作。

coby001 · 发表于 2015-8-1 09:41

破坏整个逻辑条件
---------------------------
什么意思？

hanxiaoep · 发表于 2015-8-1 09:48

谢谢coby001，自己搞定结贴，分享一下C#代码：
#region 对工作表进行限制
         Globals.Sheet1.BeforeRightClick += Sheet1_BeforeRightClick;//取消右键菜单
         Globals.Sheet1.Application.OnKey("^{c}","");//禁用Ctr+C
         Globals.Sheet1.Application.OnKey("^{v}", "");//禁用Ctr+V
         Globals.Sheet1.Application.CellDragAndDrop = false;
         #endregion
void Sheet1_BeforeRightClick(Excel.Range Target, ref bool Cancel)
      {
         Cancel = true;
      }
参考资料：
http://wenwen.sogou.com/z/q333561469.htm
http://club.topsage.com/thread-1874080-1-1.html

coby001 · 发表于 2015-8-1 10:02

菜单中的复制粘贴按钮你也屏蔽了？

hanxiaoep · 发表于 2015-8-5 17:16

通过ribbon屏蔽了：
<customUI xmlns="http://schemas.microsoft.com/office/2006/01/customui">
  <commands>
<command idMso="FileNew" enabled="false" />
<command idMso="FileSaveAs" enabled="true" />
<command idMso="FileSaveAsMenu" enabled = "false" />
<command idMso="FileOpen" enabled="false" />
<command idMso="FilePrintQuick" enabled="false" />
<command idMso="FileClose" onAction="MyClose" />
<command idMso="MergeCenterMenu" enabled = "false" />
  </commands>
  <ribbon>
<tabs>

<tab idMso="TabHome" visible="false"/>
   <tab idMso="TabInsert" visible="false"/>
   <tab idMso="TabPageLayoutExcel" visible="false"/>
   <tab idMso="TabFormulas" visible="false"/>
   <tab idMso="TabData" visible="false"/>
   <tab idMso="TabReview" visible="false"/>
   <tab idMso="TabView" visible="false"/>
   <tab idMso="TabDeveloper" visible="false"/>
   <tab idMso="TabAddIns" visible="false"/>

   <tab id="tabLotNumberEntrySystem" label="Test" >

   </tab>
</tabs>
  </ribbon>
</customUI>

		自动登录	找回密码
密码			免费注册

[求助] VSTO中怎样限制Excel下拉复制