返回列表下一主題上一主題發帖

計算儲存格數值變動的次數?

jazzcarr

中學生 Rank: 2

帖子: 26
主題: 10
精華: 0
積分: 84
點名: 0
作業系統: win10
軟體版本: excel2010
閱讀權限: 20
性別: 男
註冊時間: 2016-6-10
最後登錄: 2018-8-20

1^# 跳轉到 » 倒序看帖

打印

字體大小: tT

發表於 2018-3-2 13:51 | 只看該作者

計算儲存格數值變動的次數?

例如 A1儲存格被修改
B1儲存格的數值會增加1
要怎麼寫或錄VBA呢？
又A1被更改後可以播放
C目錄下的音效檔案wav或mp3嗎？

樓主熱帖

jackyq

中學生 Rank: 2

帖子: 323
主題: 6
精華: 0
積分: 313
點名: 0
作業系統: xp
軟體版本: 2k
閱讀權限: 20
性別: 男
註冊時間: 2015-6-24
最後登錄: 2026-1-5

2^#

發表於 2018-3-5 20:20 | 只看該作者

' 放 sheet 裡面

Private Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" (ByVal lpszSoundName As String, ByVal uFlags As Long) As Long

Private Sub Worksheet_Change(ByVal Target As Range)

If Target.Address = "$A$1" Then
[B1] = Val([B1]) + 1

wav_file = "c:\Windows XP 啟動.wav"
Call sndPlaySound(wav_file, 1)
End If

End Sub

TOP

jackyq