標題: 計算儲存格數值變動的次數? [打印本頁]

---

作者: jazzcarr    時間: 2018-3-2 13:51     標題: 計算儲存格數值變動的次數?

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

---

作者: jackyq    時間: 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

---

作者: jackyq    時間: 2018-3-5 20:21

若要進階的 play , pause,  stop  

麻煩自己 google

---

作者: jazzcarr    時間: 2018-3-6 11:04

大感謝 謝謝您的大力幫忙

---

作者: jazzcarr    時間: 2018-3-6 11:18

又有新問題了 但不是VBA的 關於畫圖
http://forum.twbts.com/viewthread.php?tid=20592&extra=

---

歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)