excel中不同列多段递增数据的抓取，求各位大侠帮忙

andriyzhou

excel中不同列多段递增数据的抓取，求各位大侠帮忙
具体情况：
      多列数据，每列中有多段需要的递增数据，划定了递增范围（49.5-90.5），要怎么通过VBA代码实现？
请各位大神帮忙，不胜感激。

基本的要求输出

之前对vb有一定了解，现在工作上继续生成目标数据，还请各位大神指点一二。

andriyzhou

希望得到各位的帮忙

约定的童话

简单写了一下，马上下班了，代码放在sheet1里面运行，运行完整理下数据！好用记得评分
Sub 筛选()
Dim i, m
For m = 3 To 9 Step 2
For i = 2 To [a65536].End(xlUp).Row
  If 49.5 < Cells(i, m) And Cells(i, m) < 90.5 Then
     Range(Cells(i, m).Offset(0, -1), Cells(i, m)).Copy Sheets("sheet2").Cells(i, m)
     End If
Next
Next
End Sub