Re: [算表] 如何用Excel 的macro貼上相對應日期的資料

[icene (kkk)]

日資料sheet1 月資料sheet2
日資料sheet1的E1是日期 7/10

if sheet2.range("A65536").end(xlup)=sheet1.range("E1") then

   sheet2.range("A65536").end(xlup)=sheet1.Range("E1")

   sheet2.range("A65536").end(xlup).offset(0,1).resize(1,3).value = _
   sheet1.Range("A1:C1").VALUE

Else

   sheet2.range("A65536").end(xlup).offset(1,0)=sheet1.Range("E1")

   sheet2.range("A65536").end(xlup).offset(1,1).resize(1,3).value = _
   sheet1.Range("A1:C1").VALUE

end if




※ 引述《stricher (vx)》之銘言：
: 軟體: Excel
: 版本: 2003
: 我現在已經有一個每天日統計會產生的sheet
: 每天都會變
: 裡面譬如說含有
: 日期是 7/10 號
:  A   B   C
:  1   2   3
: 的資料，
: 我還有另外一個做月統計的sheet
: 資料像是這樣
:        A   B   C
: 7/1    ...
: 7/2    ...
: ..
: 7/10   1   2   3
: 我需要把每天將日統計資料貼在月統計的資料上，我要怎麼寫?

--
※ 發信站: 批踢踢實業坊(ptt.cc) 
◆ From: 61.217.213.244
推 ZZZZ0:太強了！！！