Excel VBA テクニック集
セルのクリア





Excel VBA テクニック集
シート内のセルの内容をクリアする方法です。

使い方は、ファイル一覧を使った応用の、「マクロ専用ファイル」によるマクロ実行に、下記コードを入れます。
・完全にクリア
    Excel_App.ActiveSheet.Range("A1:Z30").Clear

・計算式・文字・値だけクリア
    Excel_App.ActiveSheet.Range("A1:Z30").ClearContents

・計算結果を残して、計算式のみをクリア
    Excel_App.ActiveSheet.Range("A1:Z30").Value = Excel_App.ActiveSheet.Range("A1:Z30").Value

・数字のみクリア(文字・計算式はそのまま)
    Excel_App.ActiveSheet.Range("A1:Z30").SpecialCells(xlConstants, xlNumbers).ClearContents

・文字列の中の空白のクリア
    Excel_App.ActiveSheet.Range("A1:Z30").Replace what:=Space(1), Replacement:="", LookAt:=xlPart, SearchOrder:=xlByRows, MatchCase:=False  '半角のスペース
    Excel_App.ActiveSheet.Range("A1:Z30").Replace what:=StrConv(Space(1), VbWide), Replacement:="", LookAt:=xlPart, SearchOrder:=xlByRows, MatchCase:=False '全角のスペース

・文字列の中の改行のクリア
    Excel_App.ActiveSheet.Range("A1:Z30").Replace what:=vbLf, Replacement:="", LookAt:=xlPart, SearchOrder:=xlByRows, MatchCase:=False

・条件付き書式のみのクリア
    Excel_App.ActiveSheet.Range("A1:Z30").FormatConditions.Delete

「こだわりハウス」写真館| 数学公式集| ピンポイントストリートビュー| FaceBook| Excel Vba テクニック集| Excel 計算式解析・他解析| 富山の建築家| Excel 計算式解析・他解析| 積分の定義・積分の記号の意味の研究|