在Excel2003中突出显示选中单元格所在行和列的技巧(1)
在Excel2003中突出显示选中单元格所在行和列的
方法
快递客服问题件处理详细方法山木方法pdf计算方法pdf华与华方法下载八字理论方法下载
打开Excel2003,按住ALT+F11在跳出的VB编码编辑器中双击打开需要的工作
表
关于同志近三年现实表现材料材料类招标技术评分表图表与交易pdf视力表打印pdf用图表说话 pdf
如
Sheel1,在弹出的对话框中复制粘帖以下代码,然后关闭对话框及编辑器,即可获得功能。
代码:
Private Sub Worksheet_Change(ByVal target As Range)
If Application.CutCopyMode <> False Then
Application.CutCopyMode = False
Call ColorBand(target)
End If
End Sub
'- - - - - - - - - - - - - - - - - - - - -
Private Sub Worksheet_SelectionChange(ByVal target As Range)
If Application.CutCopyMode = False Then
Call ColorBand(target)
Else
Exit Sub
End If
End Sub
'- - - - - - - - - - - - - - - - - - - - -
Private Sub ColorBand(ByVal rngTarget As Range)
With rngTarget.Parent
.Cells.Interior.ColorIndex = 0
.Columns(rngTarget.Column).Cells.Interior.ColorIndex = 42
.Rows(rngTarget.Row).Cells.Interior.ColorIndex = 42
End With
End Sub
其中Cells.Interior.ColorIndex=数字,数字代表颜色,可以改变颜色为你喜欢的
突出显示即为单击选中一个单元格,其所在行和列的背景颜色都改变,在单击选中另一
个单元格时,选中的单元格所在行和列的颜色改变。而上次选中的单元格所在的行和列的颜
色自动都恢复为其本身的颜色。
如按Ctrl选中多个单元格,则只有第一个选中的单元格所在行和列会改变颜色,
如按住鼠标拖选一个区域的单元格,则只有所选区域左上角的单元格所在行和列改变颜
色。
附:每次运行Excel自动打开(附带打开)固定的工作簿的方法
将需要自动打开的工作簿的快捷方式放到C:\Prograrn Files\Microsoft Office\Office10\XLStart
文件夹中,以后每次启动时,Excel都会自动打开相应工作簿。
修改过程截图如下:
打开Excel后按
ALT+F11打开如图
的VB代码编辑框
双击打开需要运
行功能的工作簿