關于excel按篩選顏色的VBA代碼
一、原因所在
您在使用工作并的時候，大概使用了窗口菜單中的新建命令來新建你的excel文件后保存，因此，就會出現這種情況。
也許是中毒了，office可能中毒了。
二、解決的辦法
①解決辦法
找到office的安裝目錄，如C:Program FilesMicrosoft OfficeOFFICE11，里面有個文件夾，名稱是：XLSTART
把這個文件夾和里面的所有內容全部刪除，這樣就可以避免上述的問題的產生了。
萬一按照上述的方
在excel中，使用可視化的簡單操作方法，是很難根據顏色來篩選的，因此，我們只能使用VBA代碼來實現。
以下代碼的功能是：除首行外，將當前單元格所在列數據與當前單元格不同顏色的行隱藏起來，數據首行為標題列。
如果你有其它的需求，請自行修改代碼。
Sub FilterColor()
Dim UseRow, AC
UseRow = Cells.SpecialCells(xlCellTypeLastCell).Row
If ActiveCell.Row > UseRow Then
MsgBox "超出范圍，請選擇有數據或有意思的單元格!", vbExclamation, "錯誤"
Else
AC = ActiveCell.Column
Cells.EntireRow.Hidden = False
For i = 2 To UseRow
If Cells(i, AC).Interior.ColorIndex <> ActiveCell.Interior.ColorIndex Then
Cells(i, AC).EntireRow.Hidden = True
End If
Next
End If
End Sub
法解決之后，打開excel文件提示安裝什么之類的，請您使用第②種方法來解決。
②解決辦法
建議查殺病毒，然后，還在出問題，那么，請重新安裝一下OFFICE就行了。
③解決辦法
還有一種可能，就是你的電子表格中了宏病毒了，你到網上下載一個“宏病毒專殺”軟件安裝并查殺，就可以解決問題了，注意，得把360殺毒這些軟件關閉掉。
【excel按篩選顏色的VBA代碼】相關文章：
小班數學按物體的顏色分類教案06-20
小班數學教案《按顏色分類》03-02
小班數學《按顏色分類》教案優秀09-26
按顏色特征排序小班科學教案（通用8篇）08-13
excel實訓心得03-09
網頁惡意代碼是什么11-14
寬帶691錯誤代碼怎么解決11-27
關于Excel的Hour函數介紹09-22
Excel日期和時間函數11-27
關于Excel工程函數大全11-27