第1个回答 2020-04-05
假设工作表是Sheet1,试试这样:
工具->宏->Visual
Basic
编辑器->Microsoft
Excel对象->双击Sheet1
在右边的空白处输入
Private
Sub
Worksheet_SelectionChange(ByVal
Target
As
Range)
Range("b2").Font.ColorIndex
=
Range("a1").Font.ColorIndex
End
Sub
然后回到Excel工作簿
当修改Sheet1的A1的颜色后,选别的单元格时B1就会跟着变色了.
若想选其他单元格作相应变化,把代码里面的"b2","a1"作相应修改