用醒目顏色高亮顯示選中單元格所在的整行或是整列.docx

《用醒目顏色高亮顯示選中單元格所在的整行或是整列.docx》由會(huì)員上傳分享，免費(fèi)在線(xiàn)閱讀，更多相關(guān)內(nèi)容在教育資源-天天文庫(kù)。

1、以下為僅依靠VBA代碼方式實(shí)現(xiàn)高亮顯示：操作方式：打開(kāi)EXCEL，按ALT+F11調(diào)出VBA編輯菜單，把下列符合自己意愿的代碼復(fù)制到你需要實(shí)現(xiàn)高亮顯示的工作表上即可。如需要在“sheet3”上實(shí)現(xiàn)行列十字架式高亮顯示：注意事項(xiàng)：需要在哪張表實(shí)現(xiàn)高亮效果，就需要復(fù)制這樣一段VBA代碼，其次，如果想保存，必須保存為啟用宏的工作簿。1、選中某單元格實(shí)現(xiàn)整行高亮顏色顯示　　PrivateSubWorksheet_SelectionChange(ByValTargetAsRange)　　Rows().Interior.ColorIndex=0　　x=ActiveCell.Row　　Rows

2、(x).Interior.ColorIndex=10　　EndSub　　部分代碼解釋?zhuān)篟ows(x).Interior.ColorIndex=10，其中的10，指的是顏色的代碼，您可以從1到幾百中選擇一個(gè)顏色的值，此處可修改。以下為顏色參考：3?紅色6?黃色10?綠色11?深藍(lán)色14?青色18?梅紅色21?深紫色2、選中某單元格實(shí)現(xiàn)整列高亮顏色顯示??PrivateSubWorksheet_SelectionChange(ByValTargetAsRange)????Rows().Interior.ColorIndex=0????x=ActiveCell.Column????Co

3、lumns(x).Interior.ColorIndex=10????EndSub3、選中某單元格，實(shí)現(xiàn)單元格所在行與列高亮顏色顯示　PrivateSubWorksheet_SelectionChange(ByValTargetAsRange)????Cells.Interior.ColorIndex=xlNone????Rows(Target.Row).Interior.ColorIndex=10????Columns(Target.Column).Interior.ColorIndex=10????EndSub