kazz

Excel VBA Sample

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

選択セル範囲5000セル以内で、値が0か空白の場合のみ斜線を引くエラーセルはスルーする5000セル以上になると、フリーズしたようになる可能性があるので、指定している方が安全!Const MAX_PROCESS As Long = 5000S...
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モジュールの...
Excel VBA

VBA 型変換

キャスト変換関数説明変換後の型CBoolブール型のデータ型に変換BooleanCByteバイト型のデータ型に変換ByteCCur通貨型のデータ型に変換CurrencyCDate日付型のデータ型に変換DateCDbl倍精度浮動小数点数型のデー...
Excel VBA

VBA メッセージボックス (MsgBox関数)

基本構文MsgBox(prompt )prompt必須ダイアログ ボックス内にメッセージとして表示する文字列を指定最大文字数は、1 バイト文字で約 1,024 文字改行時は、ライン フィード (Chr(10)):「VbLf」私は、いつも「v...