·
1 years ago
It celar everything including the border lines and Cells format, I want to clear the Data only.
通常,您可以按住 按Ctrl 鍵選擇多個特定的單元格,然後根據需要清除單元格內容。 如果您始終需要不時地清除這些特定的單元格,則可以創建一個清除按鈕來一鍵清除它們。 在本文中,我將討論如何創建一個全部清除按鈕來清除某些特定的單元格內容。
首先,您應該創建一個形狀按鈕,然後應用代碼,最後將代碼綁定到形狀按鈕。 請執行以下操作:
1。 點擊 插入 > 形狀 > 矩形 選擇“矩形”形狀,然後根據需要拖動鼠標在圖紙的任意位置繪製一個矩形按鈕,請參見屏幕截圖:
2。 然後輸入文本並根據需要設置形狀按鈕的格式,請參見屏幕截圖:
3。 然後您應該插入VBA代碼,請按住 ALT + F11 鍵打開 Microsoft Visual Basic for Applications 窗口。 點擊 插入 > 模塊,然後將以下代碼粘貼到 模塊 窗口。
VBA代碼:清除特定單元格中的單元格內容:
Sub Clearcells() 'Updateby Extendoffice Range("A2", "A5").Clear Range("C10", "D18").Clear Range("B8", "B12").Clear End Sub
備註:在上面的代碼中: A2,A5 表示它將清除範圍內的單元格 A2:A5,而不僅僅是兩個單元格,您可以添加多個範圍,例如 範圍(“ B8”,“ B12”)。清除 腳本內的代碼要清除。
4。 然後保存並關閉代碼窗口,然後將代碼鏈接到形狀按鈕,右鍵單擊該按鈕,然後選擇 分配宏在 分配宏 對話框中選擇 透明單元 的代碼名稱 宏名 列錶框,然後單擊 OK 按鈕退出此對話框。 看截圖:
5。 現在,當您單擊 全部清除 按鈕,您定義的特定單元會立即清除,請參見屏幕截圖: