麻辣家族討論版版 » 管理公告 » 如何寫巨集清除有顏色儲存格的內容

新手上路 發表於 2016-5-20 09:35

如何寫巨集清除有顏色儲存格的內容

請教大大，如何寫巨集清除有顏色儲存格的內容
謝謝!

[attach]24329[/attach]

[attach]24327[/attach]

justintoolbox 發表於 2016-6-27 14:05

請使用底下代碼
Cells.Interior.Color = xlNone
試試看~

cjw 發表於 2016-10-25 10:01

Sub TEST_A()

For A = 1 To Cells(Rows.Count, "A").End(3).Row

If Cells(A, 1).Interior.ColorIndex <> xlNone Then

Cells(A, 1).Value = ""

End If

Next

End Sub

kim223824 發表於 2017-7-29 09:44

[i=s] 本帖最後由 kim223824 於 2017-7-29 09:46 編輯 [/i]

Sub TEST_B()
         Cells.ClearContents
End Sub

查看完整版本: 如何寫巨集清除有顏色儲存格的內容