不知道大家有沒有這樣的感覺,當你查看Excel數據表中某行記錄時,由于數據表中的字段較多,需要拖動水平滾動條才能將整個表格的內容看完,這樣很容易“看走眼”,不小心就會將上面一行或下面一行的內容錯看成當前記錄的數據。這樣的數據交給領導,可是要挨批噢,其實通過下面的幾行VBA代碼,你就可以輕輕松松地查看記錄了,操作步驟如下:
打開某工作表(假設為“Sheet1”),單擊“工具”菜單中的“宏”,選擇“Visual Basic編輯器”命令,雙擊左側窗口中對應的工作表標簽名稱,在彈出的代碼窗口中輸入如下VBA代碼:
Private Sub WorksheetSelectionChange(ByVal Target As Range)
If Target.EntireRow.Interior.ColorIndex10 Then
Target.EntireRow.Interior.ColorIndex = 10Else
Target.EntireRow.Interior.ColorIndex = 0End IfEnd Sub
關閉代碼窗口回到Excel工作表中,若需要查看某行記錄,只需單擊該行中的任一單元格,此時該行將會自動填充綠色并高亮顯示(若需改為其它顏色只需改變代碼中相應的數值即可),再次單擊該行中任一單元格將取消背景色的填充。另外可同時使多行記錄填充背景,以方便查看或對比表格中的數據。
編輯提示:雖然單擊記錄前的行號可選定整行記錄,相對之下,本文提供的方法在日常辦公中更為方便和快捷。
打開某工作表(假設為“Sheet1”),單擊“工具”菜單中的“宏”,選擇“Visual Basic編輯器”命令,雙擊左側窗口中對應的工作表標簽名稱,在彈出的代碼窗口中輸入如下VBA代碼:
Private Sub WorksheetSelectionChange(ByVal Target As Range)
If Target.EntireRow.Interior.ColorIndex10 Then
Target.EntireRow.Interior.ColorIndex = 10Else
Target.EntireRow.Interior.ColorIndex = 0End IfEnd Sub
關閉代碼窗口回到Excel工作表中,若需要查看某行記錄,只需單擊該行中的任一單元格,此時該行將會自動填充綠色并高亮顯示(若需改為其它顏色只需改變代碼中相應的數值即可),再次單擊該行中任一單元格將取消背景色的填充。另外可同時使多行記錄填充背景,以方便查看或對比表格中的數據。
編輯提示:雖然單擊記錄前的行號可選定整行記錄,相對之下,本文提供的方法在日常辦公中更為方便和快捷。