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少写了一位)
温馨提示:答案为网友推荐,仅供参考