作者ssgf (花中人)
看板Office
標題[問題] 如何每日自動複製，作成歷史紀錄
時間Thu Jan 11 08:25:43 2018
(若是和其他不同軟體互動之問題 請記得一併填寫)
軟體: excel
版本: 2016
小弟的sheet1 A3:A21 每日去更新數值
然後我想要他能自動幫我把每日的數值複製到sheet2，並自動產生日期排列下去，做為歷
史記錄，如下兩圖所示
請問這是要用巨集來寫嗎？excel不熟，請大大們幫忙了，謝謝。
https://i.imgur.com/QXRBLuw.jpg
https://i.imgur.com/IAHoFVI.jpg
--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 39.8.161.132
※ 文章網址: https://webptt.com/m.aspx?n=bbs/Office/M.1515630346.A.F90.html
1F：→ soyoso: a3:a21每日更新數值來看，可以巨集方式來協助 01/11 08:44
2F：→ soyoso: 複製方面可range.copy，worksheets.paste或 01/11 08:45
3F：→ soyoso: range.pastespecial 01/11 08:46
4F：→ soyoso: 或以range = range.value方式 01/11 08:46
5F：→ soyoso: 當日日期以date，要改日期格式以format，取得最右側有資料 01/11 08:48
6F：→ soyoso: 欄號以range.end；觸發以上程序內動作就要看是要開啟、關 01/11 08:49
7F：→ soyoso: 關、存檔前、存檔後...分別有workbook_open、beforesave、 01/11 08:51
8F：→ soyoso: aftersave、beforeclose... 01/11 08:52
9F：→ soyoso: 判斷當天日期是否已存在sheet2，有range.find、工作表函數 01/11 09:04
10F：→ soyoso: countif、match 01/11 09:04
11F：→ ssgf: 感謝大大回覆，想請問上述內容都是可以使用錄製巨集來完成 01/11 09:06
12F：→ ssgf: 嗎？還是說只有sheet1每日更新的部份呢？ 01/11 09:06
13F：→ soyoso: 部分應可錄製的到，如複製貼上，取得最右側有資料儲存格、 01/11 09:11
14F：→ soyoso: range.find方面；如要以儲存格格式來改變日期格式也可以錄 01/11 09:12
15F：→ soyoso: 製的到；其他觸發、判斷if和儲存格內填入當日日期方面再自 01/11 09:13
16F：→ soyoso: 行調整 01/11 09:14
17F：→ soyoso: 上述回文的動作為將sheet1每日報值如儲存格a3:a22複製到 01/11 09:16
18F：→ soyoso: sheet2內 01/11 09:16
19F：→ ssgf: 糟糕，講真的有看沒有懂，excel底子太差了 01/11 09:29
21F：→ ssgf: 小弟錄完巨集如上圖，但這只是把sheet1 copy到sheet2的同個 01/11 17:47
22F：→ ssgf: 欄位而已，不是我想要的阿，要怎麼修改呢？ 01/11 17:47
23F：→ soyoso: 如要依序貼上於sheet2右側的話，可用range.end來取得最右 01/11 18:01
24F：→ soyoso: 側有值儲存格，再右移一個儲存格或以range.offset來偏移 01/11 18:02
25F：→ soyoso: 公式如要以"=today()"的話，請要選擇性貼上值，不然無法正 01/11 18:07
26F：→ soyoso: 常呈現歷史資料的日期 01/11 18:08
27F：→ soyoso: 或是用date就會是當天日期 01/11 18:10