Foxtable(狐表)用户栏目专家坐堂 → ft写的项目,导出excel时,能设置被导出的excel表某列禁止编辑吗?


  共有2439人关注过本帖树形打印复制链接

主题:ft写的项目,导出excel时,能设置被导出的excel表某列禁止编辑吗?

帅哥哟,离线,有人找我吗?
zhangjian222200
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1553 积分:11003 威望:0 精华:0 注册:2016/9/12 11:18:00
ft写的项目,导出excel时,能设置被导出的excel表某列禁止编辑吗?  发帖心情 Post By:2023/12/2 16:08:00 [只看该作者]

如题

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110810 积分:563988 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/12/2 16:46:00 [只看该作者]

使用vba。参考:http://www.foxtable.com/webhelp/topics/2121.htm

  • Locked
    利用Locked属性可锁定指定的单元格,也可解除锁定。
    需要注意的是,如果工作表没有被保护,即使将单元格设置为锁定状态,该单元格仍可以操作。只有在工作表被保护的情况下,锁定单元格才能起作用。如:

    Dim App As New MSExcel.Application
    Dim Wb As MSExcel.WorkBook = App.WorkBooks.Open("D:\Report.xls")
    Dim Ws As MSExcel.WorkSheet = Wb.WorkSheets(1)
    Dim Rg As MSExcel.Range = Ws.Range("A1:A10")'指定任意单元格
    Ws.Unprotect'撤销对工作表的保护
    Ws.Cells.Locked = False '解除整个工作表所有单元格的锁定
    Rg.Locked = True'锁定指定的单元格
    Ws.Protect  '保护工作表
    App.Visible = True

 回到顶部