前提・実現したいこと
現在ユーザーフォームからボタンをクリックして
シートの内容を削除するよう実装しています。
CallではなくFunctionで呼び出したいです。
発生している問題・エラーメッセージ
オブジェクトは、このプロパティまたはメソッドをサポートしていません
エラーが出るソースコードではFunctionを使用しているのですが、
呼び出し方をCall All_Clear_Sheet (CONVERT_SHEET)
にして関数側をSub All_Clear_Sheet (CONVERT_SHEET)
にした場合にはエラーは表示されません。
何故エラーが出力されているのでしょうか。
よろしくお願いします。
該当のソースコード
vba
1'シートの内容を削除 2Function All_Clear_Sheet(CONVERT_SHEET As Worksheet) 3 CONVERT_SHEET.Activate 4 CONVERT_SHEET.Cells.Clear 5End Function 6 7'ボタンを実行 8Private Sub CommandButton1_Click() 9Dim CONVERT_BOOK As Workbook 10Dim CONVERT_SHEET As Worksheet 11 12Set CONVERT_BOOK = ThisWorkbook 13Set CONVERT_SHEET = CONVERT_BOOK.Worksheets("変換") 14 15All_Clear_Sheet (CONVERT_SHEET) 16End Sub 17
補足情報(FW/ツールのバージョンなど)
office2010
回答3件
あなたの回答
tips
プレビュー
バッドをするには、ログインかつ
こちらの条件を満たす必要があります。