看板 Office 關於我們 聯絡資訊
(若是和其他不同軟體互動之問題 請記得一併填寫) 軟體: 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://www.ptt.cc/bbs/Office/M.1515630346.A.F90.html
soyoso: a3:a21每日更新數值來看,可以巨集方式來協助 01/11 08:44
soyoso: 複製方面可range.copy,worksheets.paste或 01/11 08:45
soyoso: range.pastespecial 01/11 08:46
soyoso: 或以range = range.value方式 01/11 08:46
soyoso: 當日日期以date,要改日期格式以format,取得最右側有資料 01/11 08:48
soyoso: 欄號以range.end;觸發以上程序內動作就要看是要開啟、關 01/11 08:49
soyoso: 關、存檔前、存檔後...分別有workbook_open、beforesave、 01/11 08:51
soyoso: aftersave、beforeclose... 01/11 08:52
soyoso: 判斷當天日期是否已存在sheet2,有range.find、工作表函數 01/11 09:04
soyoso: countif、match 01/11 09:04
ssgf: 感謝大大回覆,想請問上述內容都是可以使用錄製巨集來完成 01/11 09:06
ssgf: 嗎?還是說只有sheet1每日更新的部份呢? 01/11 09:06
soyoso: 部分應可錄製的到,如複製貼上,取得最右側有資料儲存格、 01/11 09:11
soyoso: range.find方面;如要以儲存格格式來改變日期格式也可以錄 01/11 09:12
soyoso: 製的到;其他觸發、判斷if和儲存格內填入當日日期方面再自 01/11 09:13
soyoso: 行調整 01/11 09:14
soyoso: 上述回文的動作為將sheet1每日報值如儲存格a3:a22複製到 01/11 09:16
soyoso: sheet2內 01/11 09:16
ssgf: 糟糕,講真的有看沒有懂,excel底子太差了 01/11 09:29
ssgf: https://i.imgur.com/dggqeOW.jpg 01/11 17:46
ssgf: 小弟錄完巨集如上圖,但這只是把sheet1 copy到sheet2的同個 01/11 17:47
ssgf: 欄位而已,不是我想要的阿,要怎麼修改呢? 01/11 17:47
soyoso: 如要依序貼上於sheet2右側的話,可用range.end來取得最右 01/11 18:01
soyoso: 側有值儲存格,再右移一個儲存格或以range.offset來偏移 01/11 18:02
soyoso: 公式如要以"=today()"的話,請要選擇性貼上值,不然無法正 01/11 18:07
soyoso: 常呈現歷史資料的日期 01/11 18:08
soyoso: 或是用date就會是當天日期 01/11 18:10