Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 6 Then Call calc09()
サブcalc09()はフォームコードモジュール(frm01)の中にあります
私は試しました:
If Target.Column = 6 Then Call frm01.calc09()
また、Sub calc09()の名前をPublic Sub calc09()に変更しましたが、結果はありません。
エラーメッセージが表示されました:
コンパイルエラー:サブまたは関数が定義されていません