VBA代碼清除FORMATTING並在Excel中的選定列中保留純文本數據

Question

我需要創建一個按鈕以添加到Excel（2010當前），該按鈕將刪除該列中的所有格式並僅保留純文本。我們目前的解決方案是將數據複製到記事本中去除格式，然後從記事本中將其複製回來。這種方法很有效，但如果我可以在Excel中創建一個按鈕來執行此操作，那麼這種方法會很不方便，而且會更容易。我已經看到了一些解決方案，但他們都沒有處理隨機選擇的列。幫幫我！

Answer 1

Range.ClearFormats method在這裏似乎很合適。

With Worksheets("Sheet1") 
    .Columns(1).ClearFormats 'clear formatting from column A 
End With 

'for a manually selected group of cells 
Selection.ClearFormats 'clear formatting from the cells currently selected 

FWIW，清除格式命令可以用於通過主頁►編輯►清除►清除格式（Alt鍵 + ħ + È + ˚F）色帶。您可以輕鬆地將該命令添加到QAT，而不是創建一個主要複製命令並將其分配給自定義按鈕的宏。

Answer 2

只需添加到Jeeped的回答是：

使用此代碼，你會清除整個列格式化（隨機選擇一個小區，運行這段代碼，整個列格式化已被清除）

Sub ClearColumn() 
i = ActiveCell.Column 
    ActiveSheet.Columns(i).ClearFormats 
End Sub 

Answer 3

Excel中已經有主頁選項卡上的按鈕：

只需選擇整列並單擊清除墊子