No.1

VBA有一些系統(tǒng)設(shè)置,。如果利用好這些設(shè)置參數(shù)，對應(yīng)用系統(tǒng)編程會有很好的幫助,。

本節(jié)將介紹一個容易被忽略的屬性,。

Excel工作表中有一個小細節(jié)，就是當選擇某個區(qū)域進行復制時,，該區(qū)域會被虛線框包圍,。

這只是一個系統(tǒng)的明顯標志。它的意思是告訴操作者這個區(qū)域已經(jīng)被復制或剪切了,。

一個非常簡單的提示功能,。

但是在應(yīng)用中，尤其是熟練操作Excel后,，你會發(fā)現(xiàn)這個虛線框有時候并不需要,，而且并不美觀，甚至不美觀,。

No.2

那么如何去除呢,？

一般這個操作可以消除虛線框，保存工作表(Ctrl S),，按Esc鍵,。

當然，最重要的是介紹這種方法,。

設(shè)置應(yīng)用程序,。CutCopyMode屬性。

CutCopyMode可以返回或設(shè)置剪切或復制模式的狀態(tài),。

返回三個值,，即False、xlCopy和xlCut,。

示例代碼

私有命令button 1 _ click()dim cobj as object set cobj=range(' A4 ')with range(' A3 '),。value='這是一個CutCopyMode的例子！-'copy'' date.copy' cobj以select case應(yīng)用程序結(jié)束,?！癱utcopymode case is=false msgbox”不是剪切復制模式！Case Is=xlCopy MsgBox '復制模式,！Case Is=xlCut MsgBox '切割模式,！End SelectcObj。paste special xlPasteAllApplication。CutCopyMode=FalseRange('A1 '),。選擇結(jié)束Sub

焦點

消除虛線框的一個簡單方法是將CutCopyMode值設(shè)置為False,。

代碼如下：

申請。CutCopyMode=False

顯然,，上面的代碼非常簡單,，只需將其設(shè)置為False以去掉虛線框。