excel如何筛选到单独列?

1：用公式：如果你的数据是1对1的，则可将日期范围分别写在两个单元格内，如D1=4,D2=7,则做法为，在E1列可如下公式：if($d$1+row()-1>$d$2,"",vlookup(date(year(now()),month(now()),day($d$1+row()-1)),$A$1：$B$7,2,))
E列的每个单元格公式均相同
2:
用VBA,循环加判断 假设sheet名字为sheet1
sub gg()
dim i as interger
dim j as interger
dim k as interger
dim strat as string
dim end as string
start=sheets("sheet1").cells(1,4)
end=sheets("sheet1").cells(2,4)
k=1
for i=1 to 10000
if sheets("sheet1").cells(i,1)="" then exit for
for j=start to end
if sheets("sheet1").cells(i,1)=j then
sheets("sheet1").cells(k,5)=sheets("sheet1").cells(i,2)
k=k+1
end if
next j
end if

next i

end sub

不懂再问，qq1189281（不好意思，qq少写了一位）

D列中，日期段4日-5日数据如下：

D列E列
2006-04-04
2006-04-05

在E1单元格中编辑公式
=VLOOKUP(D1,$