12
返回列表 上一主題 發帖

請問此功能有其他的方式解決嗎?

Andy2483
　暱稱: 厚臉皮的學生

碩士班Rank: 5Rank: 5

帖子
1567 
主題
40 
精華
0 
積分
1591 
點名
0  
作業系統
Windows 7 
軟體版本
Excel 2010 & 2016 
閱讀權限
100 
性別
男 
來自
台灣 
註冊時間
2020-7-15 
最後登錄
2026-2-2 
1# 跳轉到 »
發表於 2024-1-3 07:46 | 顯示全部帖子
回復 1# 藍天麗池


    謝謝前輩發表此主題與範例
前輩敘述的情境與範例不一樣,可以再補充一下?
用行動裝置瀏覽論壇學習很方便,謝謝論壇經營團隊
請大家一起上論壇來交流

TOP

Andy2483
　暱稱: 厚臉皮的學生

碩士班Rank: 5Rank: 5

帖子
1567 
主題
40 
精華
0 
積分
1591 
點名
0  
作業系統
Windows 7 
軟體版本
Excel 2010 & 2016 
閱讀權限
100 
性別
男 
來自
台灣 
註冊時間
2020-7-15 
最後登錄
2026-2-2 
2#
發表於 2024-1-4 09:35 | 顯示全部帖子
回復 3# 藍天麗池


    謝謝前輩回復
後學很想學DDE, Worksheet.Calculate 事件 (Excel) 怎麼應用
工作領域不在這區塊,尚未研究,請前輩稍等其他厲害的前輩幫忙
用行動裝置瀏覽論壇學習很方便,謝謝論壇經營團隊
請大家一起上論壇來交流

TOP

Andy2483
　暱稱: 厚臉皮的學生

碩士班Rank: 5Rank: 5

帖子
1567 
主題
40 
精華
0 
積分
1591 
點名
0  
作業系統
Windows 7 
軟體版本
Excel 2010 & 2016 
閱讀權限
100 
性別
男 
來自
台灣 
註冊時間
2020-7-15 
最後登錄
2026-2-2 
3#
發表於 2024-1-4 10:35 | 顯示全部帖子
本帖最後由 Andy2483 於 2024-1-4 14:23 編輯

回復 3# 藍天麗池


    謝謝前輩
後學學習 Private Sub Worksheet_Calculate()方案如下,請前輩參考
模擬結果:

範例檔:
變動紀錄_20240104.zip (17.29 KB)
用行動裝置瀏覽論壇學習很方便,謝謝論壇經營團隊
請大家一起上論壇來交流

TOP

Andy2483
　暱稱: 厚臉皮的學生

碩士班Rank: 5Rank: 5

帖子
1567 
主題
40 
精華
0 
積分
1591 
點名
0  
作業系統
Windows 7 
軟體版本
Excel 2010 & 2016 
閱讀權限
100 
性別
男 
來自
台灣 
註冊時間
2020-7-15 
最後登錄
2026-2-2 
4#
發表於 2024-1-4 20:27 | 顯示全部帖子
回復 9# 藍天麗池


    謝謝前輩回覆
明天再下載來研究看看
用行動裝置瀏覽論壇學習很方便,謝謝論壇經營團隊
請大家一起上論壇來交流

TOP

Andy2483
　暱稱: 厚臉皮的學生

碩士班Rank: 5Rank: 5

帖子
1567 
主題
40 
精華
0 
積分
1591 
點名
0  
作業系統
Windows 7 
軟體版本
Excel 2010 & 2016 
閱讀權限
100 
性別
男 
來自
台灣 
註冊時間
2020-7-15 
最後登錄
2026-2-2 
5#
發表於 2024-1-5 14:47 | 顯示全部帖子
或許 同一個儲存格裡有指數連接間隔符號 再連接變動量，這樣的方式可以符合需求，例如：
120__0
123__3
125__2
126__1
這樣的方式不增加欄位，又能兩種數據都看得到又能保留
用行動裝置瀏覽論壇學習很方便,謝謝論壇經營團隊
請大家一起上論壇來交流

TOP

Andy2483
　暱稱: 厚臉皮的學生

碩士班Rank: 5Rank: 5

帖子
1567 
主題
40 
精華
0 
積分
1591 
點名
0  
作業系統
Windows 7 
軟體版本
Excel 2010 & 2016 
閱讀權限
100 
性別
男 
來自
台灣 
註冊時間
2020-7-15 
最後登錄
2026-2-2 
6#
發表於 2024-1-5 20:45 | 顯示全部帖子
回復 19# 藍天麗池

[B6]=[B2]&"__"& [B2] -Val( [B5])
這樣的方式就可以不必多一欄 舉例如下：
B2是變動總委買

B1 總委買
B2  126
B3. 120__0
B4. 123__3
B5. 125__2
B6. 126__1
用行動裝置瀏覽論壇學習很方便,謝謝論壇經營團隊
請大家一起上論壇來交流

TOP

Andy2483
　暱稱: 厚臉皮的學生

碩士班Rank: 5Rank: 5

帖子
1567 
主題
40 
精華
0 
積分
1591 
點名
0  
作業系統
Windows 7 
軟體版本
Excel 2010 & 2016 
閱讀權限
100 
性別
男 
來自
台灣 
註冊時間
2020-7-15 
最後登錄
2026-2-2 
7#
發表於 2024-1-5 21:15 | 顯示全部帖子
回復 21# 藍天麗池
要運用變動量做運算只要用
Split([B6],"__")(1)  就可以取得了 不必拆一欄喔
用行動裝置瀏覽論壇學習很方便,謝謝論壇經營團隊
請大家一起上論壇來交流

TOP

Andy2483
　暱稱: 厚臉皮的學生

碩士班Rank: 5Rank: 5

帖子
1567 
主題
40 
精華
0 
積分
1591 
點名
0  
作業系統
Windows 7 
軟體版本
Excel 2010 & 2016 
閱讀權限
100 
性別
男 
來自
台灣 
註冊時間
2020-7-15 
最後登錄
2026-2-2 
8#
發表於 2024-1-5 21:36 | 顯示全部帖子
回復 23# 藍天麗池
我媽媽住院要到下星期三，不方便處理
如果具體的變動量要做什運算如果能夠具體說明或上傳更完整的範例
版上高手雲集也都能與前輩做交流
用行動裝置瀏覽論壇學習很方便,謝謝論壇經營團隊
請大家一起上論壇來交流

TOP

Andy2483
　暱稱: 厚臉皮的學生

碩士班Rank: 5Rank: 5

帖子
1567 
主題
40 
精華
0 
積分
1591 
點名
0  
作業系統
Windows 7 
軟體版本
Excel 2010 & 2016 
閱讀權限
100 
性別
男 
來自
台灣 
註冊時間
2020-7-15 
最後登錄
2026-2-2 
9#
發表於 2024-1-6 22:20 | 顯示全部帖子
回復 26# 藍天麗池
如果是這種邏輯我覺得
1.A1如果是為了顯示最後的差值，就不要再用公式計算，因爲B1值換位到C1時A1公式值都是0，A1值改由VBA給值
2. VBA裡寫：
如果跳動的B1<>C1,就令A1=B1-C1,再令C1=B1,這樣的方式只有B1變動時if 判斷式才會成立，且A1也不會是0
最後把A1值也填入A欄的第一個空白格
用行動裝置瀏覽論壇學習很方便,謝謝論壇經營團隊
請大家一起上論壇來交流

TOP

Andy2483
　暱稱: 厚臉皮的學生

碩士班Rank: 5Rank: 5

帖子
1567 
主題
40 
精華
0 
積分
1591 
點名
0  
作業系統
Windows 7 
軟體版本
Excel 2010 & 2016 
閱讀權限
100 
性別
男 
來自
台灣 
註冊時間
2020-7-15 
最後登錄
2026-2-2 
10#
發表於 2024-1-9 10:38 | 顯示全部帖子
本帖最後由 Andy2483 於 2024-1-9 11:12 編輯

回復 30# 藍天麗池


    可能是數據變動太快運算不及
實際需求是幾秒要記錄一次?
間隔時間到才運算

Option Explicit
Private Sub Worksheet_Calculate()
If Val(Format([A1], "SS")) Mod 3 = 0 Then'間隔3秒
   Call RecordPrice
   Call Price
End If
End Sub
用行動裝置瀏覽論壇學習很方便,謝謝論壇經營團隊
請大家一起上論壇來交流

TOP

        靜思自在 : 多做多得。少做多失。
12
返回列表 上一主題