[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]
『アクティブセルから最終まで』(マサ)
アクティブセルから最終までクリアするのですが 右列に1列ずれて3列分クリアするのではなく まとめられませんか? xlDownではなくxlupを使用してさくせいを できればと考えてます。
Range(ActiveCell, ActiveCell.End(xlDown)).ClearContents
ActiveCell.Offset(0, 1).Select
Range(ActiveCell, ActiveCell.End(xlDown)).ClearContents
ActiveCell.Offset(0, 1).Select
Range(ActiveCell, ActiveCell.End(xlDown)).ClearContents
宜しくお願いいたします。
< 使用 Excel:Office365、使用 OS:Windows10 >
Range(ActiveCell.Offset(, 2), Cells(Rows.Count, ActiveCell.Column).End(xlUp)).ClearContents
(きまぐれおじさん) 2021/11/24(水) 11:53
[ 一覧(最新更新順) ]
YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki.
Modified by kazu.