彰化一整天的論壇

 找回密碼
 立即註冊
查看: 290|回復: 9

老師幫我看一下為什麼這樣

[複製鏈接]
發表於 2018-3-25 09:50:41 | 顯示全部樓層 |閱讀模式
未命名.png
我是那邊寫錯了我這是要讓excel自動存檔的

回復

使用道具 舉報

發表於 2018-3-25 12:57:26 | 顯示全部樓層
time是內建函數.您把您的函數改成time1就可以.
回復 支持 反對

使用道具 舉報

 樓主| 發表於 2018-3-25 19:12:00 | 顯示全部樓層
未命名.png
我改了結果變成這樣

回復 支持 反對

使用道具 舉報

 樓主| 發表於 2018-3-25 21:57:42 | 顯示全部樓層

我上傳了
我用遠端控制傳的檔案所以沒有改巨集麻煩老師幫我看一下
回復 支持 反對

使用道具 舉報

發表於 2018-3-26 08:32:07 | 顯示全部樓層
windbjo4 發表於 2018-3-25 21:57
我上傳了
我用遠端控制傳的檔案所以沒有改巨集麻煩老師幫我看一下

上面的
sub time
也要改成
time1
回復 支持 反對

使用道具 舉報

 樓主| 發表於 2018-3-26 09:58:02 | 顯示全部樓層
自動存檔.xlsm (12.65 KB, 下載次數: 38)
回復 支持 反對

使用道具 舉報

發表於 2018-3-26 10:05:47 | 顯示全部樓層

您打錯字了.是call 不是Gall
  1. Sub Time1()

  2.     Application.OnTime Now + TimeValue("00:01:00"), "Autosave"

  3. End Sub

  4. Sub Autosave()

  5.     ThisWorkbook.Save
  6.    
  7.     Call Time1

  8. End Sub
複製代碼

自動存檔.xlsm

13.61 KB, 下載次數: 0

售價: 1 金錢  [記錄]  [購買]

回復 支持 反對

使用道具 舉報

 樓主| 發表於 2018-3-26 10:58:08 | 顯示全部樓層
  1. Sub Time1()

  2. Application.OnTime Now + TimeValue("00:01:00"), "Autosave"

  3. End Sub

  4. Private Sub Workbook_Open()

  5. Call Time1

  6. End Sub
複製代碼


Autosave要放在哪
回復 支持 反對

使用道具 舉報

發表於 2018-3-26 11:12:48 | 顯示全部樓層

excel_auto_save_01.jpg

1.原本的程式放在模組

excel_auto_save_02.jpg

2.Wordkbook中的OPEN再去呼叫它.就會變成開啟檔案會自動存檔.


自動存檔.xlsm

14.69 KB, 下載次數: 6

售價: 2 金錢  [記錄]

回復 支持 反對

使用道具 舉報

 樓主| 發表於 2018-3-26 12:15:58 | 顯示全部樓層
我懂了原來是模組阿
謝謝老師
回復 支持 反對

使用道具 舉報

您需要登錄後才可以回帖 登錄 | 立即註冊

本版積分規則

 ㄚ母滴雞湯
 員林香純滴雞精

Archiver|手機版|小黑屋|彰化一整天的論壇(Excel,Office)  |网站地图

GMT+8, 2018-12-12 20:08 , Processed in 0.125341 second(s), 22 queries .

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

快速回復 返回頂部 返回列表