如何在Excel中僅複製和粘貼非空白單元格？

我們大多數人都可能會遇到此問題，當我們複製包含一些空白單元格的數據列表，然後將它們粘貼到另一列時，空白單元格也會被粘貼。 當我們不需要空白並且只希望粘貼非空白單元格時，這非常煩人。 在這種情況下，我們如何才能快速便捷地僅複製和粘貼Excel中的非空白單元格？ 以下是一些解決您的快速技巧：

使用轉到特殊命令僅複製和粘貼非空白單元格

使用Kutools for Excel僅複製和粘貼非空白單元格

使用過濾器功能僅複製和粘貼非空白單元格

使用數組公式僅複製和粘貼非空白單元格

僅複製和粘貼帶有VBA代碼的非空白單元格

使用轉到特殊命令僅複製和粘貼非空白單元格

隨著 去特別 命令，您可以先選擇所有數據，然後將其複制並粘貼到其他位置。

1。 選擇您要使用的數據列表。

2。 然後點擊 首頁 > 查找和選擇 > 去特別，請參見屏幕截圖：

3。 在 去特別 對話框，檢查 常量 選項，請參見屏幕截圖：

4。 然後點擊 OK，並且僅在列表中選擇了值單元格。

5。 然後將數據複製並粘貼到所需的位置。 並且僅粘貼了非空白單元格值。 看截圖：

備註：此方法僅適用於常量，不適用於公式單元格。

使用Kutools for Excel僅複製和粘貼非空白單元格

有沒有比以上更簡單的方法？ 當然， Excel的Kutools's 選擇非空白單元格s實用程序可以幫助您首先選擇非空白單元格，然後復制並粘貼它們。

後 免費安裝 Kutools for Excel，請執行以下操作：

1.選擇單元格範圍，然後單擊 庫工具 > 選擇 > 選擇非空白單元格。 看截圖：

2.然後選擇非空白單元格，按 按Ctrl + C 複製它們，然後選擇要輸出粘貼結果的單元格，按 按Ctrl + V 粘貼選定的非空白單元格。 看截圖：

使用過濾器功能僅複製和粘貼非空白單元格

篩選 功能可以幫助您首先過濾非空白單元格，然後可以根據需要將其複制並粘貼到其他單元格中。

2。 點擊 數據 > 篩選，請參見屏幕截圖：

3。 然後點擊所選列表中單元格右上角的下拉按鈕，然後取消選中 空白 下拉菜單下的選項。 看截圖：

4。 然後點擊 OK，所有非空白的單元格都已被過濾掉，如下圖所示：

5。 最後，您可以復製過濾的數據並將其粘貼到所需的任何位置。

備註：值和公式都通過這種方式生效。

使用數組公式僅複製和粘貼非空白單元格

要僅複製和粘貼非空白單元格，您還可以應用以下數組公式。

1。 除了數據之外，在空白單元格中輸入以下公式：

=LOOKUP("zzzzz",CHOOSE({1,2},"",INDEX(A:A,SMALL(IF($A$1:$A$15<>"",ROW($A$1:$A$15)),ROWS($B$1:B1)))))

備註：在以上公式中， A1：A15 是您要使用的數據列表。您可以根據需要進行更改。

2。 然後按 Shift + Ctrl + 輸入 鍵，然後選擇單元格B1，並將填充手柄拖到您要包含此公式的範圍內，並且所有非空白單元格值都已提取。 看截圖：

3。 由於它們是公式，因此將它們複製到其他位置時，應該將它們複製並粘貼為值。

備註：此公式僅適用於常數，不適用於公式單元格。

僅複製和粘貼帶有VBA代碼的非空白單元格

如果您對VBA代碼感興趣，則可以執行以下代碼來完成此任務。

1。 按住 ALT + F11 鍵，然後打開 Microsoft Visual Basic for Applications窗口.

2。 點擊 插入 > 模塊，然後將以下代碼粘貼到 模塊窗口.

VBA代碼：在Excel中僅複製和粘貼非空白單元格

Sub PasteNotBlanks()
'Update 20140325
Dim rng As Range
Dim InputRng As Range, OutRng As Range
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Range :", xTitleId, InputRng.Address, Type:=8)
If InputRng.Columns.Count > 1 Then
    MsgBox "Please select one column."
    Exit Sub
End If
Set OutRng = Application.InputBox("Out put to (single cell):", xTitleId, Type:=8)
InputRng.SpecialCells(xlCellTypeConstants).Copy Destination:=OutRng.Range("A1")
End Sub

3。 然後按 F5 鍵以運行此代碼，將出現一個提示框，提醒您選擇要使用的數據范圍。 看截圖：

4。 然後點擊 OK，則會彈出另一個提示框，讓您選擇一個單元格來放置數據。

5. 點擊 OK 完成此代碼，並且只有非空白單元格值已粘貼到您指定的位置。

備註：此代碼僅可用於常量。