標題: 在 office 2007 不能正常運作 [打印本頁]

---

作者: tinching    時間: 2014-9-21 15:15     標題: 在 office 2007 不能正常運作

各位大大：
     以下程式碼在office xp 運作是正常的，為何在 office 2007 裡便沒有反應？請各位指教！謝謝！

Private Sub Worksheet_Calculate()
If [E52] = 1 Then
    Dim spath As String, cmd As String
  
    spath = "D:\Ring.wav"  
  
    If Range("B51").Value = 1 Then
  
        cmd = "sndrec32 /play /close " & Chr(34) & spath & Chr(34)
   
        Shell cmd, 6
   
    End If
    End If
  
End Sub

---

作者: luhpro    時間: 2014-9-21 19:38

回復 1# tinching
你有換電腦嗎?
作業系統還是原來的那版嗎?
直接執行 sndrec32 看該程式是否還存在?

---

作者: tinching    時間: 2014-9-21 19:42

換了電腦，原本是windows xp，現在是windows 7。

---

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