kazz

Excel VBA Sample

VBA 0 の表示/非表示:シート全体

0 の表示:シート全体(ビュー設定)'==============================' 0 の表示:シート全体(ビュー設定)'==============================Public Sub ShowZero_...
Excel VBA Sample

VBA 斜線削除

右上斜線:削除(選択範囲)'==============================' 右上斜線:削除(選択範囲)'==============================Public Sub DeleteDiagonal() Di...
Excel VBA Sample

VBA 0と空白セルのみ斜線を引く

選択セル範囲5000セル以内で、値が0か空白の場合のみ斜線を引くエラーセルはスルーする5000セル以上になると、フリーズしたようになる可能性があるので、指定している方が安全!'==============================' ...
Excel VBA Sample

VBA エラートラップとユーザ定義

エラートラップのMyテンプレート同じ処理コードを書くのは嫌だから、すぐにパーツ化するすごく便利だし、メンテナンス性が向上するただ、エラー制御や処理中断した場合が面倒になってくるんだよね。それで、今回は、すっきりで、テンプレートをつくってみた...
Excel VBA Sample

VBA ファイルオブジェクト利用 コピーと移動

ファイルのコピー(CopyFile)Dim fso As ObjectSet fso = CreateObject("Scripting.FileSystemObject")fso.CopyFile "C:\MyTest\sample.tx...
Excel VBA Sample

VBA ファイルオブジェクト 小ネタ

ファイル存在確認(FileExists)' === ▼ 1. ファイル存在確認(FileExists) ===Public Sub Tip_FileExists() Dim fso As Object: Set fso = CreateOb...
Excel VBA Sample

VBA Dir関数 vs FileSystemObject(FSO) 比較

どちらを利用したら良いか?NoやりたいことDir関数(標準VBA)例FSO(参照設定要)例備考1ファイルの存在確認If Dir(path) <> "" ThenIf fso.FileExists(path) ThenDirはvbNormal...
Excel VBA Sample

VBA エラー制御

VBA エラートラップの基本構文On Error GoTo ラベル名→ エラー発生時に指定のラベルにジャンプ(最も一般的)On Error Resume Next→ エラーを無視して次の行に進む(慎重に使う)On Error GoTo 0→...
Excel VBA

VBA Select Case

基本形Select Case 変数  Case 1    ’処理を記述  Case 2    ’処理を記述  Case Else    '上記以外の処理を記述End SelectOr 条件Select Case 変数  Case 1, 2 ...
Excel VBA

VBA ショートカットキー

移動キー操作説明Ctrl + PageDown1 画面下へCtrl + PageUp1 画面上へCtrl + ↓次のプロシージャCtrl + ↑前のプロシージャCtrl + Homeモジュールの先頭に移動するCtrl + Endモジュールの...