如何去掉Excel表格中的复制框虚线 excel表格虚线框怎么取消

No.1
VBA 中有一些系统设置,如果很好地利用这些设置参数,对于应用系统编程是一个很好帮助作用 。
本节将介绍一个 容易被忽略的一个属性 。

如何去掉Excel表格中的复制框虚线 excel表格虚线框怎么取消


Excel 操作工作表中,有一个很小的细节,就是当选择某一个区域进行复制的时候,这个区域就会被一个虚线框包围 。
这只是一个系统的明显标识,它是意义在于告诉操作人,这个区域进行了复制或者剪切 。
一个很简单的提示作用 。
但是,在应用中,特别是对于熟练操作 Excel 之后,会发现,有时候并不需要这个虚线框,而且也并不好看,甚至不美观 。

如何去掉Excel表格中的复制框虚线 excel表格虚线框怎么取消


No.2
那么如何把它去除呢?
一般这样来操作可以实现消除虚线框,保存工作表(Ctrl+S),按 Esc 键 。
当然了,最重要的还是要介绍一下这个方法 。
设置 Application.CutCopyMode 属性
CutCopyMode 可以返回或设置剪切或复制模式的状态 。
【如何去掉Excel表格中的复制框虚线 excel表格虚线框怎么取消】 返回三个值,分别为 False、xlCopy、xlCut 。

如何去掉Excel表格中的复制框虚线 excel表格虚线框怎么取消


示例代码
Private Sub CommandButton1_Click()Dim cObj As ObjectSet cObj = Range("A4")With Range("A3").Value = "https://www.iketao.cn/2022/09/27/45b51dc95976334c/这是一个 CutCopyMode 示例!--'Copy' " & Date.Copy 'cObjEnd WithSelect Case Application.CutCopyModeCase Is = FalseMsgBox "不是剪切复制模式!"Case Is = xlCopyMsgBox "复制模式!"Case Is = xlCutMsgBox "剪切模式!"End SelectcObj.PasteSpecial xlPasteAllApplication.CutCopyMode = FalseRange("A1").SelectEnd Sub 划重点
去掉虚线框的一个简单方法就是设置 CutCopyMode 值为 False 。
如下代码:
Application.CutCopyMode = False
很显然,上面代码十分简单,只要设置为 False 就可以去掉虚线框 。

    推荐阅读