[[20210125060154]] 『ブックを閉じる前にテーブル列のデータをクリア』(まる) ページの最後に飛ぶ

[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]

 

『ブックを閉じる前にテーブル列のデータをクリア』(まる)

ブックを閉じる前にsheet1の10行目からあるテーブルのG列に入っているデータをクリアしてから閉じたいです。

Private Sub Workbook_BeforeClose(Cancel As Boolean)

Worksheets("商品リスト").Range("B10").ListObject.ListColumns("購入数").ClearContents

End Sub

ThisWorkbookに上記コードを入力してもデバックしていまします。
どこがいけないのでしょうか?

< 使用 Excel:Excel2016、使用 OS:Windows10 >


それは特別のイベントプロシージャ内だからではないと思います。
標準モジュールの普通のプロシージャで実行してみたらどうなりますか?
どんなエラーメッセージが出ますか?
エラーメッセージをもとに、内容を調べてください。

(お手伝い) 2021/01/25(月) 07:08


 ListColumnオブジェクトにClearContensメソッドは無いです。※Deleteメソッドだけです。

 第一、列全体をクリアしていいんですか?(タイトルまで無くなりますけど)

 列全体なら   ・・・.ListColumns("購入数").Range.ClearContents
 DATAだけなら  ・・・.ListColumns("購入数").DataBodyRange.ClearContents

(半平太) 2021/01/25(月) 07:30


 dim v1 as Variant
 dim v2 as Variant
 Set v1 = Worksheets("商品リスト").Range("B10").ListObject
 Set v2 = Worksheets("商品リスト").Range("B10").ListObject.ListColumns("購入数")

 v1 はOKですか?エラーにならないですか?

 v2 はOKですか? なんというオブジェクトですか?
 v2はClearContentsというメソッドを持っているオブジェクトですか?

 ClearContentsは通常はRangeオブジェクトにつくメソッドですよね。
 v2に何かRangeに関係したプロパティはありませんか?
 ヘルプで調べてください。

 質問に回答する場合も、こんなことしているんですよ。
 質問者さんにもできることだとは思いませんか?

# 重なったけど一応。
(お手伝い) 2021/01/25(月) 07:37


見出しはのこしたままにしたいです。
ありがとうごさいます。
できました!

(まる) 2021/01/25(月) 07:51


コメント返信:

[ 一覧(最新更新順) ]


YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki. Modified by kazu.