excel sheet1中填充色改变和它关联的sheet2也改变
发布网友
发布时间:2024-10-21 02:47
我来回答
共1个回答
热心网友
时间:2024-11-30 21:35
在sheet1的底部标签名上点鼠标右键,选“查看代码”,把下面代码粘贴进去就行了。
Dim c
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If c = "" Then c = Target.Address: Exit Sub
Sheets("sheet2").Range(c).Interior.ColorIndex = Range(c).Interior.ColorIndex
c = Target.Address
End Sub