Excel VBA Sample VBA 日付シート作成
VBA 指定された年月の日付シート作成' 指定された年月の日付シートを作成する'「main」シートのセル【C5】に年、セル【D5】に月をもとに'その月の日付のシートを作成'ユーザ誤って削除した日がある場合は、その日だけのシートを作成' 作成...
Excel VBA Sample
Excel VBA Sample Excel VBA Sample VBA 指定シート以外のシート削除
'指定シート以外を削除するSub DeleteSheetsExcept() Const WS_DEF As String = "DEF" Const WS_MAIN As String = "main" Dim ws As Workshee...
Excel VBA Sample VBA 条件書式の削除
選択範囲の条件付き書式の削除Option Explicit'=== 高速化 ===Private Sub EnterFast(Optional ByRef prevCalc As XlCalculation = xlCalculationA...
Excel VBA Sample VBA 書式クリア
値は保持して書式だけクリア'==============================' 書式：値は保持して書式だけクリア'==============================Public Sub ClearFormatsKeep...
Excel VBA Sample VBA 0 の表示/非表示：シート全体
0 の表示：シート全体（ビュー設定）'==============================' 0 の表示：シート全体（ビュー設定）'==============================Public Sub ShowZero_...
Excel VBA Sample VBA 斜線削除
右上斜線：削除（選択範囲）'==============================' 右上斜線：削除（選択範囲）'==============================Public Sub DeleteDiagonal() Di...
Excel VBA Sample VBA 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...