Excelシートのこのチュートリアルの例に従って、ランタイムエラー「1004」が発生します:アプリケーション定義またはオブジェクト定義のエラー。
これが私のVBAです。
Private Sub Worksheet_Calculate()
Worksheets("Input Quantities").Range("B51").Validation.InputMessage = Worksheets("Input Quantities").Range("B42")
End Sub
注(回答のコメントを保持する):
Range("B51")
検証が適用されていない場合、このコードは失敗します。(元のエラー)Me
代わりに使用できますWorksheets("Input Quantities")
。(添え字の範囲外エラーを修正します-おそらくシート名のスペルミス、または末尾のスペース)。この記事はインターネットから収集されたものであり、転載の際にはソースを示してください。
侵害の場合は、連絡してください[email protected]
コメントを追加