為什麼這篇excel range範圍鄉民發文收入到精華區:因為在excel range範圍這個討論話題中,有許多相關的文章在討論,這篇最有參考價值!作者candysherry (阿哈)標題Re: [問題] EXCEL VBA陣列索引超出範圍(錯誤代...
※ 引述《candysherry (阿哈)》之銘言:
: s大
: 小弟還是不太明白S大的意思
: 可以再解說詳細一點嗎?
: 謝謝
非常感謝S大 可以了ㄟ
解決我多年困擾的問題
不過 還有一個問題想要請教S大
Private Sub Worksheet_Calculate()
If ActiveWorkbook.Name = ThisWorkbook.Name Then
With Sheets("計算結果")
If Not IsError(Range("D9")) Then
If Not IsError(Range("B9")) Then
If Not IsError(Range("B10")) Then
If Not IsError(Range("A32")) Then
If Not IsError(Range("B32")) Then
If Not IsError(Range("G18")) Then
If Not IsError(Range("G20")) Then
If Not IsError(Range("G19")) Then
If Not IsError(Range("G21")) Then
If Not IsError(Range("G16")) Then
If Not IsError(Range("G17")) Then
If Not IsError(Range("G14")) Then
If Not IsError(Range("G15")) Then
If Not IsError(Range("G23")) Then
If Not IsError(Range("G24")) Then
If Not IsError(Range("h42")) Then
If Not IsError(Range("H43")) Then
If Not IsError(Range("H44")) Then
If Not IsError(Range("G46")) Then
End If
End If
If [D9] >= [B9] Or [D9] <= [B10] Then 播放wav
If [A19] >= [A9] Or [A19] <= [A10] Then 播放wav
If [D6] >= [A52] Or [D6] <= [A53] Then 播放Contact
If [D3] >= [b52] Or [D3] <= [b53] Then 播放Contact
End If
End If
End If
End If
End If
End If
End If
End If
End If
End If
End If
End If
End If
End If
End If
End If
End If
End With
End If
End Sub
以上是語法 現在雖然解決可以同時開兩個EXCEL
但卻只能有一個能用聲音提醒
如果要開兩個EXCEL 且兩個EXCEL 都能提醒
不知道語法要怎麼寫
再次感謝S大的協助
--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 1.170.153.105 (臺灣)
※ 文章網址: https://www.ptt.cc/bbs/Office/M.1597294555.A.D6A.html