Archive for 8月, 2019

コマンドの複数行の実行結果を変数に代入

金曜日, 8月 30th, 2019

無線LANのMACアドレスとコンピュータ名を取得し、サーバー上にあるCSVファイルに書き込む

@ECHO OFF
NET USE Z: <サーバーへのパス> <パスワード> <ユーザー名>
@ECHO “MACアドレスを登録します”
FOR /F %%a IN (‘ECHO “%COMPUTERNAME%”^,’) DO SET PCNAME=%%a
FOR /F “delims=*” %%i IN (‘getmac /v /fo csv ^| findstr ワイヤレス’) DO @SET MAC=%%i
ECHO %PCNAME% %MAC%>>z:\hogehoge.csv
NET USE Z: /delete
@ECHO “MACアドレスの登録が完了しました”
PAUSE

実行結果を複数行格納

@echo off
setlocal enabledelayedexpansion
set RESULT=
for /f "usebackq tokens=*" %%i in (`dir`) do (
  set RESULT=!RESULT!^

%%i
)
echo !RESULT!
endlocal

for文の中で値を変化させたい場合はfor文全体を、「setlocal enabledelayedexpansion」と「endlocal」で挟む。
for文内で使用する変数は「%」ではなく「!」で囲む。

@echo off
 
setlocal enabledelayedexpansion
 
set sum=0
for /l %%n in (1,1,10) do (
  set /a sum=!sum!+%%n
  echo !sum!
)
 
endlocal

 

 

パスワード 生成 ジェネレータ サイト

金曜日, 8月 30th, 2019

強度/文字種/文字数/まとめて複数作成/テキスト形式ダウンロード

 

発音しやすい/読みやすい

 

8/10/14/16

 

関数 逆順

火曜日, 8月 27th, 2019
Function 逆順(単セル As Range)
    
    Dim i As Integer
    If 単セル.Count = 1 Then
        For i = Len(単セル) To 1 Step -1
            逆順 = 逆順 & Mid(単セル, i, 1)
        Next i
    Else
        逆順 = "引数は1つのセルを選んでね"
    End If
    
End Function

robocopy 堅牢なコピー

日曜日, 8月 25th, 2019

/b BackupOperators権限でコピー

/r:0 再試行数

/e 空のディレクトリもコピーする

/fp 出力にフルパス表示

ログの見方
スキップ:既にあるからコピーせずにスキップした

オプション詳しい

変数 bat

日曜日, 8月 25th, 2019

set 変数名=代入値
変数名はアルファベットか数字(数字からは×

echo %a%,%b%,%c%,%d%,%e%,%f%
set /p num=""
echo %num%
pause >nul

/a
計算する
変数を%で囲わなくていいのは/aだけ

割り算は小数点以下切り捨て

/p
入力値を変数へ代入

choice 選択肢入力

日曜日, 8月 25th, 2019

choice:選択肢の中から一つを選択する

@echo off
echo バッチファイルの拡張子は?
echo.
echo  1. bat
echo  2. txt
echo  3. c
echo  4. zip
choice /c 1234 /t 5 /d 2 /n /m "答え…"
if %errorlevel% equ 1 goto ok
cls
echo 不正解。正解は1番のbatです。
pause >nul
exit

:ok
cls
echo 正解。正解は1番のbatです。
pause >nul
exit

/c 1234
選択肢1/2/3/4にする
デフォルト:y/n
選択肢として使えるのは一文字なので10/11/12といった選択肢は用意できない

/t 5
時間切れになるまでの秒数
デフォルト:入力されるまで待ち

/n
選択肢の一覧を表示しない
デフォルト:行の最後に [1,2,3,4]?を表示

/m “答え…”
選択肢を聞くときに表示する文字列

choiceの入力結果は変数%errorlevel%に回答の順番が代入される
x/y/zの三択ならそれぞれ1/2/3が代入される

goto ok
条件を満たせばokへ飛び、それ以外なら続行

cls
画面クリア

exit
バッチファイルを終了

pause キー入力まで停止

日曜日, 8月 25th, 2019

pause キー入力まで停止

続行するには何かキーを押してください
↑を非表示にするなら >nul

@echo off
echo Hello,world!
pause

echo Hello,world!
pause >nul
 

@echo off

日曜日, 8月 25th, 2019

プロンプトの左側のカレントパスを非表示

echo Hello,world!
@echo off
echo Hello,world!
pause

24時間テレビ 死ぬまで努力しろ!

日曜日, 8月 25th, 2019

徳島FC 高校サッカー 癌 死ぬまで努力 負けても立ち上がること 明日は来る

Excel 標準フォント Meiryo UI 9pt

日曜日, 8月 25th, 2019

標準フォント
2013:MS Pゴシック
2016:遊ゴシック

ブックで使われる標準フォントはブックごとに設定(記録)されているので新規作成分から反映

ファイル>オプション>基本設定>新しいブックの作成時
次を規定のフォントとして使用:Meiryo UI
フォントサイズ:9

ただしオートシェイプやグラフ内の文字には反映されない→テンプレートで対応?