中文字幕理论片,69视频免费在线观看,亚洲成人app,国产1级毛片,刘涛最大尺度戏视频,欧美亚洲美女视频,2021韩国美女仙女屋vip视频

這個(gè)需要用到代碼，方法如下：1.打開(kāi)需要應(yīng)用的excel。2.按ALT+F11，會(huì)彈出代碼編輯框。3.在左邊會(huì)顯示出上下兩個(gè)類別框里，名字分別是Project-VBAProject和Properties-sheet1（這個(gè)sheet幾是你當(dāng)前編輯的表單）(注意：如果什么也新出來(lái)的窗口什么也不顯示的話，就->視圖->工程資源管理器 就會(huì)出來(lái)了，此時(shí)你可以在Project-VBAProject和Properties-sheet1上直接右鍵查看代碼，在里面直接粘貼第六條的代碼即可）4.在上面的框邊有三個(gè)小圖標(biāo)，view code（查看代碼）,view project（查看項(xiàng)目），toggle folder（打開(kāi)或折疊文件夾）。5.選擇view code，會(huì)彈出一個(gè)編輯框。6.在編輯框里黏貼下面的語(yǔ)言：Private Sub Worksheet_SelectionChange(ByVal Target As Range)    With Target        '清除工作表單元格的背景色        .Parent.Cells.Interior.ColorIndex = xlNone        '設(shè)置選中區(qū)域所在行的背景色        .EntireRow.Interior.Color = vbGreen        '設(shè)置選中區(qū)域所在列的背景色        .EntireColumn.Interior.Color = vbGreen    End WithEnd Sub7. 貼完之后，關(guān)閉對(duì)話框。關(guān)閉編輯框，返回到excel。8.這時(shí)候你再點(diǎn)擊任意單元格，就會(huì)自動(dòng)出現(xiàn)你要的效果了。備注:上面語(yǔ)言中的漢語(yǔ)不用刪除，漢語(yǔ)可以可以幫助你了解該行的意思，同時(shí)也不會(huì)影響編輯效果。如果對(duì)行或列的色彩不滿意，可以參考下面的色彩代碼，自行修改。vbBlack      黑vbRed        紅vbGreen      綠vbYellow     黃vbBlue       藍(lán)vbMagenta    洋紅vbCyan       青vbWhite      白上面的辦法對(duì)已經(jīng)有填充色的表格是個(gè)災(zāi)難，它會(huì)清楚原有顏色。你也可以試試下面的方法：Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range) On Error Resume Next Cells.FormatConditions.Delete With Target.EntireRow.FormatConditions .Delete .Add xlExpression, , "TRUE" .Item(1).Interior.ColorIndex = 7 End With End Sub這個(gè)雖然只能顯示行不能顯示列，但是不會(huì)破壞原有填充色。回答完畢，希望是你要的。