VB

需求：我有一张很长的excel数据表（仿真结果保存在这张数据表中）大概每171行是一组数据，1、我要将这整个表中分成若干个包含171行数据的excel表。2、分好之后将171行进行筛选，如规划成功，碰撞车辆作为筛选关键字每一类放在一起，拷贝到sheet2中（方便画散点图）3、对每一类画散点图

1、excel中选择某行，Rows（selectrow）.Select 其中selectrow=RO1& " :"&RO2 

2、如何查看筛选完的数据有多少行

For Each rngCell In [a1].CurrentRegion.SpecialCells(xlCellTypeVisible).Areas

       cnt=cnt+rngCell.Rows.Count

Next rngCell

拼接字符串 drawRow1="=sheet2!$B$" & CSTr(startr) &"$B$" &CSTr(endr)

3、画图可以选择excel中录制宏，然后看vb中的代码