日本免费全黄少妇一区二区三区-高清无码一区二区三区四区-欧美中文字幕日韩在线观看-国产福利诱惑在线网站-国产中文字幕一区在线-亚洲欧美精品日韩一区-久久国产精品国产精品国产-国产精久久久久久一区二区三区-欧美亚洲国产精品久久久久

excel無(wú)法復(fù)制粘貼的解決方法 excel無(wú)法復(fù)制粘貼

大家在日常使用 Excel 表格中,經(jīng)常會(huì)把一張表格中的部分?jǐn)?shù)據(jù)復(fù)制粘貼到另一張表格,有時(shí)候會(huì)提示:Excel 中不能對(duì)多重選定區(qū)域使用此命令的問(wèn)題,造成了不能夠復(fù)制的現(xiàn)象,下面小編就來(lái)教你如何解決Excel 中不能對(duì)多重選定區(qū)域使用此命令的難題 。
如下圖所示,我們用一個(gè)簡(jiǎn)單的例子來(lái)做說(shuō)明剖析:
我們想將左邊表格中的 A2,B3,C4,D5 單元格中的數(shù)據(jù)一次性復(fù)制出來(lái),粘貼到右邊表格對(duì)應(yīng)的位置 。

excel無(wú)法復(fù)制粘貼的解決方法 excel無(wú)法復(fù)制粘貼


當(dāng)我們通過(guò)按住 Ctrl 鍵,選中不連續(xù)的單元格 A2,B3,C4,D5 單元格后,右擊鼠標(biāo),點(diǎn)擊“復(fù)制”按鈕,發(fā)現(xiàn)會(huì)彈出一個(gè)錯(cuò)誤提示:“無(wú)法對(duì)多重選擇區(qū)域執(zhí)行此操作” 。復(fù)制粘貼以失敗告終 。

excel無(wú)法復(fù)制粘貼的解決方法 excel無(wú)法復(fù)制粘貼


首先我們要知道 Excel 中的“多重選定區(qū)域”是指:進(jìn)行多次選擇確定下來(lái)的區(qū)域,也就是按下 Ctrl 鍵進(jìn)行選擇得到的區(qū)域 。如下圖所示:我們通過(guò)按住 Ctrl 鍵選中不連續(xù)的單元格 B2,B4,B6 單元格,注意此時(shí)選定區(qū)域都在一列(或一行)中,此時(shí)右擊鼠標(biāo),可以實(shí)現(xiàn)正常的復(fù)制粘貼 。

excel無(wú)法復(fù)制粘貼的解決方法 excel無(wú)法復(fù)制粘貼


如下如所示:我們通過(guò)按住 Ctrl 鍵選中不連續(xù)的單元格 B2,B4,B6 單元格的同時(shí),再次選中一個(gè)另一列的 D6 單元格 。注意此時(shí)選定區(qū)域不在一列中,形成了多重區(qū)域,此時(shí)右擊鼠標(biāo),點(diǎn)擊“復(fù)制”按鈕后,就會(huì)出現(xiàn)“無(wú)法對(duì)多重選擇區(qū)域執(zhí)行此操作”的錯(cuò)誤提示 。

excel無(wú)法復(fù)制粘貼的解決方法 excel無(wú)法復(fù)制粘貼


方案|VBA 代碼解決方案
首先,我們依舊通過(guò)按住 Ctrl 鍵,選中不連續(xù)的單元格 A2,B3,C4,D5 單元格后,先不著急右擊點(diǎn)擊復(fù)制;而是右擊工作表“Excel 情報(bào)局”名稱標(biāo)簽,接著點(diǎn)擊“查看代碼”,彈出 VBA 代碼錄入界面,將下面一段代碼復(fù)制粘貼到 VBA 代碼錄入界面 。
代碼如下:
Sub 多重選定區(qū)域復(fù)制粘貼()On Error Resume NextDim SRange() As Range, UPRange As Range, TRange As RangeDim i As Long, AreaNum As LongDim MinR As Long, MinC As LongAreaNum = Selection.Areas.CountReDim SRange(1 To AreaNum)MinR = ActiveSheet.Rows.CountMinC = ActiveSheet.Columns.CountFor i = 1 To AreaNumSet SRange(i) = Selection.Areas(i)If SRange(i).Row < MinR Then MinR = SRange(i).RowIf SRange(i).Column < MinC Then MinC = SRange(i).ColumnNext iSet UPRange = Cells(SRange(1).Row, SRange(1).Column)Set TRange = Application.InputBox(prompt:="請(qǐng)輸入粘貼位置的左上角單元格", Title:="多重選定區(qū)域復(fù)制粘貼", Type:=8)Application.ScreenUpdating = FalseFor i = 1 To AreaNumSRange(i).CopyTRange.Offset(SRange(i).Row - MinR, SRange(i).Column - MinC).PasteSpecial Paste:=xlPasteValuesNext iApplication.ScreenUpdating = True      End Sub
excel無(wú)法復(fù)制粘貼的解決方法 excel無(wú)法復(fù)制粘貼


點(diǎn)擊上方的“運(yùn)行-運(yùn)行子過(guò)程/用戶窗體”,會(huì)彈出一個(gè)提示框:”請(qǐng)輸入粘貼位置的左上角單元格”,即我們要粘貼存放數(shù)據(jù)的起始位置 。
如果我們想要保持粘貼數(shù)據(jù)的相對(duì)位置不變,需要將這個(gè)起始位置設(shè)置為:我們復(fù)制的不連續(xù)的單元格中最上方的單元格所在行的最左邊單元格的位置,即 F2 單元格 。在這個(gè)提示框里面點(diǎn)擊自動(dòng)識(shí)別單元格位置即可 。
最后點(diǎn)擊“確定”,即可實(shí)現(xiàn)數(shù)據(jù)的復(fù)制粘貼 。如下圖所示:
【excel無(wú)法復(fù)制粘貼的解決方法 excel無(wú)法復(fù)制粘貼】
excel無(wú)法復(fù)制粘貼的解決方法 excel無(wú)法復(fù)制粘貼

推薦閱讀