繁体   English   中英

想要创建一个按时间顺序排列的行 # 然后根据字体颜色重置

[英]Want to create a chronological row # then reset based on font color

我想创建一个列,该列根据其左侧的列(基于字体颜色)按时间顺序对自身进行编号。 然后,当列中出现新的字体颜色时,我希望它重置,然后再次对行进行编号。 几乎创建一个行项目列。

我找到了一种有效的代码,但它不是我所需要的。

在此处输入图像描述

我尝试了其他代码,但我发现没有任何效果。

您可以使用此 function 来测试字体颜色:

Option Explicit
Function TextColour(RG As Range)
    Application.Volatile
    TextColour = RG.Font.Color
End Function

然后像这样使用它:

用法

例子:

在此处输入图像描述

暂无
暂无

声明:本站的技术帖子网页,遵循CC BY-SA 4.0协议,如果您需要转载,请注明本站网址或者原文地址。任何问题请咨询:yoyou2525@163.com.

 
粤ICP备18138465号  © 2020-2023 STACKOOM.COM