用VBA怎么确认不规则波形的临界值

sr103023

我有一传数据，绘制成如下波形：

红色箭头是我要选取的点的位置，即波形和Y轴刻度值为50时的交点位置，一共有4个波形。
如果设这个点为i,那么i 对应的Y坐标的值>=50，i+1的值就<50，但是如果单纯这样判定的话，由于波形不稳定，在前段也会出现符合条件的点，但是却不是我们想找的点；
如果把判定条件改为在每个波形出现第一个波峰（MAX值）后，再判定i 对应的Y坐标的值>=50，i+1的值就<50，就符合要求，但是现在问题就是，VBA怎么写代码来判定波形的第一个max值？
求各位老师帮助下。
详细数据在附件。

coby001

这叫 滤波器
先对 波形 采样，数字化后，对数列进行处理即可，比如，把数列中 >55 且 <45 的数都删掉。

sr103023

coby001 发表于 2015-1-7 17:14
这叫 滤波器
先对 波形 采样，数字化后，对数列进行处理即可，比如，把数列中 >55 且

附件中的就是这些波形的数据，而且这4个波形只是列子，上下限值会变化，就是不会这种筛选........

coby001

VBA怎么写代码来判定波形的第一个max值？

http://club.excelhome.net/forum.php?mod=redirect&goto=findpost&ptid=1175463&pid=8013837