ExcelVBAを便利に利用する例題

‘■ワークシート名を順にイミディエイトに表示します。
Sub sample01()
Dim i As Integer
For i = 1 To Worksheets.Count
Debug.Print “シート名：” & Worksheets(i).Name
Next i
End Sub

‘■全シートをA1セルを選択させ[…]

バッチで使用できる比較演算子と判定内容例。

[数値比較]
数値の大小比較には、IFコマンド内で数値比較演算子を使用します。
EQU: 等しい (Equal to)
NEQ: 等しくない (Not Equal to)
LSS: より小さい (Less than)
LEQ: 以下 (Less than or Equal to)
GTR: より大きい (Greater than)
GEQ: 以上 (Gr[…]

コマンドラインで、現在のディレクトリを変更する「CHDIR」や
「CD」コマンドよりも、より強力な「PUSHD」コマンドがあります。

ヘルプより
PUSHD [パス | ..]

パス：
現在のディレクトリとして設定するディレクトリを指定します。
コマンド拡張機能を有効にすると、PUSHD コマンドは、通常のドライブ文字
とパスだけでなくネットワーク パスも受け付けるようになります。
ネットワ[…]

For文を使用してファイルの更新日付を取得するバッチを作成する方法
取得したいファイル名を”temp.txt”とします。

——————————
for %%i in (“C:Users999temp.txt”) do echo %%~ti
——————————

上記バッチを実行すると
更新日[…]

■aaa.txtの中身にhogeという文字列があるかどうかを検索する方法。
findstr “hoge” aaa.txt
if ERRORLEVEL == 1 goto FAIL
if ERRORLEVEL == 0 goto SUCCESS
:FAIL
echo “該当無し”
:SUCCESS
echo “該当有り”
ここで勘違いしやすいのは
if ERRORLEV[…]

バッチのIF文の構文
if 条件式 (
　 処理
)
// else ifとelseを書く場合
if 条件式 (
　 処理
) else if 条件式 (
　 処理
) else (
　　処理
)

条件が合致する場合、配下の処理が実行され、if文の処理は終了します。
条件が合致することをtru[…]

前月末日を取得するバッチ
rem 今月(本日)の取得
set dt=%date:~-10%
set yy=%dt:~0,4%
set mm=%dt:~5,2%
set dd=%dt:~8,2%
set KONGETSU=%yy%/%mm%
set TODAY=%yy%%mm%%dd%

rem 先月の計算[…]

■ディレクトリ配下の複数のファイルを１つのファイルに結合するコマンド

1.*を利用して複数のファイルを結合する。

C:tmp>copy /b C:tmpdata*.txt C:tmpall.txt
C:tmpdataA.txt
C:tmpdataB.txt
C:tmpdataC.txt
1 個のファイルをコピーしました。

2[…]

バッチファイル名の文字列を変数に代入する操作。
例)test.bat
echo %~n0 ： test
echo %~x0 ： .bat
echo %~nx0： test.bat

———————-
「%」は特別な文字のため、「%」を[…]

■テキストから引数を取得する方法(但し下記の記載だとdata.txtの最初の1行目のみ取得される)
SET /P DATA=nul
ping localhost -w 5000 > nul
上記はローカルホストへPINGコマンドを実行し、その結果を捨てる（null）処理。
-w オプションは、応答を待つタイムアウトの時間 (ミ[…]

バッチの変数の文字列操作について
SET V=ABCDEFGHIJKL

%V% 変数Vの値全体 「%V%」 ⇒「ABCDEFGHIJKL」
%V:~m% m文字目から、最後まで 「%V:~5%」 ⇒「FGHIJKL」
%V:~m,n% m文字目から、n文字分 「%V:~5,2%」⇒「FG」
%V:~,n% 先頭から、n文字分 「%V:~,5%」 ⇒「ABCDE」
「%V:ABC=%」⇒「DEFG[…]

バッチで「ネットワークドライブの割り当て」をする場合の記述方法

「Z：」ドライブに新しく割り当てると想定
割り当てるドライブレター：Z

手順1：すでに割り当てらている「Z：」があれば先に「切断」する。…割り当てされてなければメッセージが出るだけ。
NET USE /d Z:

手順2：「Z：」ドライブに割り当てる
NET USE Z: ＊＊＊

■例)サーバーやファイルサーバー上の特定[…]