欧美bbbwbbbw肥妇,免费乱码人妻系列日韩,一级黄片

excel怎設(shè)置復(fù)制時(shí)提示不能對(duì)多重選定區(qū)域使用此命令？

  發(fā)布時(shí)間：2015-01-20 17:00:16   作者：佚名   我要評(píng)論
excel怎設(shè)置復(fù)制時(shí)提示不能對(duì)多重選定區(qū)域使用此命令？在excel日常使用時(shí)，您是否經(jīng)常在復(fù)制時(shí)遇到“不能對(duì)多重選定區(qū)域使用此命令”而導(dǎo)致無(wú)法復(fù)制的情況？這個(gè)非常令人苦惱，下面分享解決這個(gè)苦惱的辦法，需要的朋友可以參考下

在excel日常使用時(shí)，您是否經(jīng)常在復(fù)制時(shí)遇到“不能對(duì)多重選定區(qū)域使用此命令”而導(dǎo)致無(wú)法復(fù)制的情況？這個(gè)非常令人苦惱，因?yàn)榻?jīng)常是辛辛苦苦按著Ctrl鍵挨個(gè)選擇了單元格準(zhǔn)備復(fù)制，一旦無(wú)法復(fù)制還得重新一個(gè)一個(gè)的選擇一遍。本例教你快速、永久性解決這個(gè)問(wèn)題。

1、先來(lái)說(shuō)一下這個(gè)提示產(chǎn)生的原因：

1）用鼠標(biāo)選擇了非矩形區(qū)域；

2）雖然最終選區(qū)整體是矩形區(qū)域，但是每個(gè)選取不同。比如說(shuō)先選中A1，點(diǎn)Ctrl再選擇B1，然后用鼠標(biāo)選擇A2:B2，這樣的區(qū)域也是復(fù)制不了的；

3）選擇了正確的要復(fù)制區(qū)域，但是手一抖，多選擇了一個(gè)單元格，如下圖：

2、首先，按照下圖所示方法在“個(gè)人宏工作簿”中錄制一個(gè)空宏。

3、按Alt+F11打開(kāi)VBA界面，并將下述代碼更新在“個(gè)人宏工作簿”的模塊中。

Sub 多區(qū)域復(fù)制粘貼()

   

復(fù)制內(nèi)容到剪貼板
  1. On Error Resume Next   
  2.   
  3.     Dim SRange() As Range, UPRange As Range, TRange As Range   
  4.   
  5.     Dim i As Long, AreaNum As Long   
  6.   
  7.     Dim MinR As Long, MinC As Long   
  8.   
  9.     AreaNum = Selection.Areas.Count   
  10.   
  11.     ReDim SRange(1 To AreaNum)   
  12.   
  13.     MinR = ActiveSheet.Rows.Count   
  14.   
  15.     MinC = ActiveSheet.Columns.Count   
  16.   
  17.     For i = 1 To AreaNum   
  18.   
  19.         Set SRange(i) = Selection.Areas(i)   
  20.   
  21.         If SRange(i).Row < MinR Then MinR = SRange(i).Row   
  22.   
  23.         If SRange(i).Column < MinC Then MinC = SRange(i).Column   
  24.   
  25.     Next i   
  26.   
  27.     Set UPRange = Cells(SRange(1).Row, SRange(1).Column)   
  28.   
  29.     Set TRange = Application.InputBox(prompt:="選擇粘貼區(qū)域的最左上角單元格", Title:="多區(qū)域復(fù)制粘貼", Type:=8)   
  30.   
  31.     Application.ScreenUpdating = False   
  32.   
  33.     For i = 1 To AreaNum   
  34.   
  35.         SRange(i).Copy   
  36.   
  37.         TRange.Offset(SRange(i).Row - MinR, SRange(i).Column - MinC).PasteSpecial paste:=xlPasteValues   
  38.   
  39.     Next i   
  40.   
  41.     Application.ScreenUpdating = True   
  42.   
  43. End Sub   
  44.   

4、返回Excel工作表界面，我們利用自定義快速訪問(wèn)工具欄的方法將該宏綁定在快速訪問(wèn)工具欄，這樣以后可以直接點(diǎn)擊調(diào)用。

5、操作完畢后，工具欄上將出現(xiàn)一個(gè)新的按鈕。這樣，基礎(chǔ)工作就已經(jīng)做好了。下面我們來(lái)測(cè)試一下具體功能。

6、用鼠標(biāo)選擇任意單元格區(qū)域（次序不論，按住Ctrl怎么選擇都可以），如下圖黃色單元格所示：

7、點(diǎn)擊快速訪問(wèn)工具欄上剛剛插入的按鈕，彈出如下提示：

8、我們只需要選擇任意一個(gè)空單元格（想要粘貼區(qū)域的最左上角單元格），這時(shí)原選中區(qū)域的內(nèi)容就按照原來(lái)的格式保持相對(duì)位置不變粘貼到了新的單元格區(qū)域。

9、上述方法優(yōu)點(diǎn)：

1）任意選中區(qū)域可以原樣粘貼到其他單元格；

2）可以完成將篩選狀態(tài)單元格粘貼到同樣篩選狀態(tài)的表格中；

3）在要粘貼的區(qū)域只要數(shù)據(jù)不和選中區(qū)域沖突，不影響被粘貼區(qū)域其他單元格。這樣可以實(shí)現(xiàn)修改部分?jǐn)?shù)據(jù)后進(jìn)行“更新”原始區(qū)域的功能。也就是只更新變動(dòng)過(guò)的單元格內(nèi)容，同時(shí)不影響被粘貼區(qū)域的字體格式、邊框等。

相關(guān)文章

最新評(píng)論