本人不懂vba..在网上搜到如下方法
即禁用了第五列 2到10行的粘贴功能,里面的确设定了2到10行的代码,但是实际操作,发现整个第五列都不能粘贴,当然这个不是问题,本来我就希望禁止掉整列的粘贴功能
问题是如果我双击其他单元格,再选中文本复制,然后双击第五列某单元格,再进行粘贴,发现仍然可以粘贴
也就是说下面代码仅禁止了整个单元格的粘贴,但是不能禁止双击进去直接粘贴文本
请大神帮忙
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column = 5 Then
If Target.Row > 1 And Target.Row < 11 Then
Application.CutCopyMode = False
Else
Application.CutCopyMode = True
End If
End If
End Sub
即禁用了第五列 2到10行的粘贴功能,里面的确设定了2到10行的代码,但是实际操作,发现整个第五列都不能粘贴,当然这个不是问题,本来我就希望禁止掉整列的粘贴功能
问题是如果我双击其他单元格,再选中文本复制,然后双击第五列某单元格,再进行粘贴,发现仍然可以粘贴
也就是说下面代码仅禁止了整个单元格的粘贴,但是不能禁止双击进去直接粘贴文本
请大神帮忙
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column = 5 Then
If Target.Row > 1 And Target.Row < 11 Then
Application.CutCopyMode = False
Else
Application.CutCopyMode = True
End If
End If
End Sub