別のシートでコードを呼び出して実行する

シート1にボタンを作成してコードシートを作成し、基本的には新しいシートを作成し、シート2のコードをこの新しいシートにコピーしてコードを実行しますこの新しいシートでは、シート1に最終結果を表示し、この新しいシートを削除します。しかし、私はコードを実行する上で問題があり、コードを実行していません。別のシートでコードを呼び出して実行する

新しいシートの名前はCalcsです。

Private Sub CommandButton2_Click() 

Dim MySheet As Worksheet 
Set MySheet = ThisWorkbook.Sheets("Calcs") 

Call MySheet.Mycode 

End Sub

出典

2016-07-05 Aus Mazin

どこが落ちますか？コードをステップ実行することがわからない場合は、エラーの原因となっている行を見つけてください。 'Mycode'サブも投稿できます – Tom

これが' CommandButton2_Click'のサブ全体であれば、それを変数に割り当てる前にワークシートを作成していません。 –

@Tom表示されるエラーは次のとおりです。このオブジェクトはこのプロパティまたはメソッドをサポートしています。この行の秋MySheet.Mycodeを呼び出してください。 –

Mysheetには、コードを呼び出すときにコードが含まれていません。新しいシートを削除する場合、新しいシートにコードを格納することは実際にはありません。なぜコードをパブリックとしてモジュールに格納しないのですか？

出典

2016-07-05 13:39:04 Kelaref

別のシートでコードを呼び出して実行する

答えて

関連する問題