Excel VBA保护工作表,但允许粘贴值

时间:2017-10-24 13:07:42

标签: excel vba excel-vba copy-paste

我可以保护我的工作表,但我想允许用户在 editinRange 中手动粘贴来自其他Excel的值,但我不希望该用户也使用粘贴进行格式化。

这是我目前的代码。

const ffmpeg = require('fluent-ffmpeg');
new ffmpeg(url).screenshots({
  timestamps: [0],
  filename: 'thumb.png',
  folder: '.'
})

我的编码挑战说明了。

enter image description here

我去看下面的建议链接并从那里部分复制的代码中复制。现在,当我尝试复制一些excel文件数据时,代码会生成错误通知。我希望代码不关心格式化等。它只是将值复制并粘贴到我的工具中。

  

Range类的PasteSpecial方法失败

enter image description here

Private ws As Worksheet 


Sub protectSheet()

Dim editingRange As Range
Set editingRange = ws.Range(ws.Cells(4, 2), ws.Cells(22, 10))

    ws.Protect

    With editingRange
        .EnableOutlining = True
        .Protect UserInterfaceOnly:=True
        .Protect Password:="", _
        DrawingObjects:=True, Contents:=True
    End With

End Sub

0 个答案:

没有答案