不懂VBA也编程

xiaomils

太厉害了，学习！

fuexcel77

收藏经典好好学习

tony_rico

感谢山菊花大师的整理与分享, 好人一生平安 !

chinaaxi

厉害的人啊

澧州城头

占个好位 学习

KANGFEIFEI

太厉害了，都是高手

此人不好惹

山菊花 发表于 2016-2-19 22:45
问题：如何突出显示被引用的单元格？

1、右键单击工作表标签，选择“查看代码”，将下面的代码粘贴到光 ...

大神，有没有办法，只要输入公式被引用的单元格就会自动显示，这个只对现有的被引用的单元格有用，我再输入公式被引用的公式就不会再显示了

山菊花

此人不好惹 发表于 2022-7-27 10:58
大神，有没有办法，只要输入公式被引用的单元格就会自动显示，这个只对现有的被引用的单元格有用，我再输 ...

这个要求实在不切实际，在实际运用中不可取。

把代码写在Change过程中就行。鼠标右键点击工作表标签，把下面的代码粘贴到VBE窗口：

1. Private Sub Worksheet_Change(ByVal Target As Range)
   
2.     Dim Rng As Range, o As Range
   
3.     On Error Resume Next
   
4.     For Each Rng In Target
   
5.         If o Is Nothing Then
   
6.             Set o = Rng.DirectPrecedents
   
7.         Else
   
8.             Set o = Union(o, Rng.DirectPrecedents)
   
9.         End If
   
10.     Next
    
11.     If o Is Nothing Then Exit Sub
    
12.     o.Interior.ColorIndex = 6 '颜色号 3 - 56，可自行修改
    
13. End Sub

复制代码

838225419

多谢楼主分享