儲存不會自動停止，該怎麼改？

帖子: 48
主題: 8
精華: 0
積分: 60
點名: 0
作業系統: windows7
軟體版本: office2010
閱讀權限: 20
註冊時間: 2013-4-9
最後登錄: 2019-12-17

2^#

發表於 2013-8-5 01:10 | 顯示全部帖子

RE: 儲存不會自動停止，該怎麼改？(檔案已更新)

本帖最後由 ahsiek 於 2013-8-5 01:11 編輯

回復 2# luhpro
原來是上傳的檔案不能開啟，因為我無法打開上傳後的檔案，所以不知道檔案沒有上傳好。
謝謝你的提醒。我重新再傳一次，希望這次能夠順利，且請各位達人們可以幫我想想辦法，謝謝。

數值記錄.rar (243.58 KB)

詢問的問題如下：
1.       AA(工作表)開始後無法自動停止，我設定在ROW33後就停止儲存
結果，在ROW33是停了，但它就跑到ROW2、3，就在那裡繼續作動作。
這是我哪裡寫錯了嗎？
2.       BB(工作表)也是如此，這兩個工作表的錄製是一樣的。所以也是不會自動停下來。
3.       AA(工作表)，一旦按下開始動作，若我再去BB(工作表)按下任意鍵，則AA(工作表)和BB(工作表)都不會動了。
4.       AA(工作表)，若按下終止鍵，結果連BB(工作表)也跟著不會動了。

請問我是哪裡寫錯了，我一直找不出原因來。
期望各位達人大大們，能幫我看一下問題，謝謝。

帖子: 48
主題: 8
精華: 0
積分: 60
點名: 0
作業系統: windows7
軟體版本: office2010
閱讀權限: 20
註冊時間: 2013-4-9
最後登錄: 2019-12-17

3^#

發表於 2013-8-5 15:23 | 顯示全部帖子

b]回復 4# GBKEE
寫在模組裡。

數值記錄.rar (247.16 KB) [

帖子: 48
主題: 8
精華: 0
積分: 60
點名: 0
作業系統: windows7
軟體版本: office2010
閱讀權限: 20
註冊時間: 2013-4-9
最後登錄: 2019-12-17

4^#

發表於 2013-8-6 12:28 | 顯示全部帖子

回復 8# stillfish00

原來如此，因為我是看一個版本改寫的，沒想到錯誤一堆。
謝謝。能使用了，我會好好研究的。

不過我可以再問一個問題嗎？
SetTimer1和SetTimer2都是找Function mainFunc(sSheetName As String) As Long
可是因為BB工作表要複製和貼上的儲存格和AA工作表不一樣，找同一個Function會讓BB工作表的所儲存的內容會搞錯。
是不是能夠再寫一個 Function mainFunc(sSheetName As String) As Long 讓SetTimer2去找呢？
BB工作表要複製的是
.Cells(i, "A") = Format(Time, "Hh:Mm:Ss")
.Cells(i, "E").Resize(, 3).Value = .Cells(3, "B").Resize(, 3).Value

可以再麻煩你這個部份嗎？謝謝。

帖子: 48
主題: 8
精華: 0
積分: 60
點名: 0
作業系統: windows7
軟體版本: office2010
閱讀權限: 20
註冊時間: 2013-4-9
最後登錄: 2019-12-17

5^#

發表於 2013-8-6 13:40 | 顯示全部帖子

回復 10# stillfish00
謝謝stillfish00大大的幫忙，應該是沒有問題了。
真的非常感謝你。我也會努力學習VBA的，再次謝謝。

帖子: 48
主題: 8
精華: 0
積分: 60
點名: 0
作業系統: windows7
軟體版本: office2010
閱讀權限: 20
註冊時間: 2013-4-9
最後登錄: 2019-12-17

6^#

發表於 2013-8-7 14:04 | 顯示全部帖子

回復 10# stillfish00
我可以再問一個問題嗎？若除了AA(2) & BB(2)工作表外，還有個CC的工作表，CC的工作表裡面有DDE連結和公式。
而我在CC工作表上會整理一些資料或做更改時，BB工作表竟然停止儲存了。
我可以確定是CC工作表和BB(2)工作表並沒有連結，想請問我該如何更改才不會讓BB(2)工作表停止儲存呢？[attach]數值記錄[/attach]

數值記錄.rar (286.5 KB)

數值記錄

帖子: 48
主題: 8
精華: 0
積分: 60
點名: 0
作業系統: windows7
軟體版本: office2010
閱讀權限: 20
註冊時間: 2013-4-9
最後登錄: 2019-12-17

7^#

發表於 2013-8-8 15:53 | 顯示全部帖子

回復 14# stillfish00

不要緊，謝謝你，stillfish00大大。
我盡量不要有變動，應該就沒有問題了。
總之，還是謝謝你的幫忙和指導。 :)

帖子: 48
主題: 8
精華: 0
積分: 60
點名: 0
作業系統: windows7
軟體版本: office2010
閱讀權限: 20
註冊時間: 2013-4-9
最後登錄: 2019-12-17

8^#

發表於 2013-8-15 10:31 | 顯示全部帖子

回復 14# stillfish00

Stillfish00 大大，我又有個問題想請教你。
如附上的檔案CC工作表

數值記錄.rar (313.9 KB)
CC工作表是BB工作表的延伸，複製的格數多了三個。B3-G3的數值複製到H4-M4的格子裡，以此類推。
我也照方法改好了CC工作表。
但是，開始動作後，L4 和M4的儲存格會出現#DIV/0!，而接下來的儲存格就沒有問題。
(CC工作表上的B3-G3的百分比是亂數處理，真正的表格是有公式連結，所以你看檔案時，是不會有問題的。)
我想問的是，我很確定F3 & G3的格子都是有數值的，而L4 & M4是複製F3& G3的數值，為什麼還會出現#DIV/0!呢？
若真的是因為F3&G3的公式，而導致L4&M4出現#DIV/0!的話，有什麼方法可以讓L4&M4單純儲存數值就好呢？

真的麻煩你了，希望我的敘述你能看得懂。謝謝。

帖子: 48
主題: 8
精華: 0
積分: 60
點名: 0
作業系統: windows7
軟體版本: office2010
閱讀權限: 20
註冊時間: 2013-4-9
最後登錄: 2019-12-17

9^#

發表於 2013-8-15 15:03 | 顯示全部帖子

回復 17# stillfish00

謝謝你的回覆，我重新用F8一個一個對，在按下開始那一瞬間，F3 & G3 出現的數值是#DIV/0!，但就那一瞬間，馬上就有數值出來了。
我想，應該是那一瞬間被記錄下來，所以L3 & M3 才會記錄#DIV/0!。
我再想看看該怎麼處理才好。
謝謝你的回覆。

帖子: 48
主題: 8
精華: 0
積分: 60
點名: 0
作業系統: windows7
軟體版本: office2010
閱讀權限: 20
註冊時間: 2013-4-9
最後登錄: 2019-12-17

10^#

發表於 2013-9-11 13:05 | 顯示全部帖子

回復 17# stillfish00

TO  stillfish00大大

如果我複製BB工作表，改名為CC 工作表，裡面的程式都和BB工作表一樣，只是改個名，換個時間(改為1小時記錄一次)
如果改時間是10分鐘或是20分鐘記錄一次時，一切都很順利。
但若改為一個小時記錄一次時
如：
Sub SetTimer3(sSheetName As String)

  Const MAX_ROW = 270 '最多270

  If mainFunc3(sSheetName) < MAX_ROW And Not gbStop3 Then Application.OnTime Now + TimeValue("01:00:00"), "'SetTimer3 """ & sSheetName & """'"

End Sub

它除了記錄一個小時的數值外，還會記錄別的時間的。
如： 12：00：21 按下開始，為第一筆的記錄
      12：09：02 為第二筆的記錄
      13：00 ：21 為第三筆的記錄
      13：09：02 為第四筆的記錄

請問為什麼會這樣呢？我需要的是一個小時一筆資料就好。
我試過若是短時間的記錄，就不會有這樣的情形。
能知道是什麼原因造成的嗎？
謝謝