質問をすることでしか得られない、回答やアドバイスがある。

15分調べてもわからないことは、質問しよう!

新規登録して質問してみよう
ただいま回答率
85.50%
Windows 10

Windows 10は、マイクロソフト社がリリースしたOSです。Modern UIを標準画面にした8.1から、10では再びデスクトップ主体に戻され、UIも変更されています。PCやスマホ、タブレットなど様々なデバイスに幅広く対応していることが特徴です。

Windows

Windowsは、マイクロソフト社が開発したオペレーティングシステムです。当初は、MS-DOSに変わるOSとして開発されました。 GUIを採用し、主にインテル系のCPUを搭載したコンピューターで動作します。Windows系OSのシェアは、90%を超えるといわれています。 パソコン用以外に、POSシステムやスマートフォンなどの携帯端末用、サーバ用のOSもあります。

コピー

元のオブジェクトを破壊することなく、オブジェクトの複製を生成することをコピーと呼びます。

バッチファイル

バッチファイル(Batch File)は、Windowsのコマンドラインインタープリターによって複数のコマンドを実行させる事が出来るスクリプトファイルです。

Q&A

解決済

1回答

868閲覧

[Windows バッチ]元のファイルから1年分のファイルを作成(コピー)したい

ojisanpgr

総合スコア1

Windows 10

Windows 10は、マイクロソフト社がリリースしたOSです。Modern UIを標準画面にした8.1から、10では再びデスクトップ主体に戻され、UIも変更されています。PCやスマホ、タブレットなど様々なデバイスに幅広く対応していることが特徴です。

Windows

Windowsは、マイクロソフト社が開発したオペレーティングシステムです。当初は、MS-DOSに変わるOSとして開発されました。 GUIを採用し、主にインテル系のCPUを搭載したコンピューターで動作します。Windows系OSのシェアは、90%を超えるといわれています。 パソコン用以外に、POSシステムやスマートフォンなどの携帯端末用、サーバ用のOSもあります。

コピー

元のオブジェクトを破壊することなく、オブジェクトの複製を生成することをコピーと呼びます。

バッチファイル

バッチファイル(Batch File)は、Windowsのコマンドラインインタープリターによって複数のコマンドを実行させる事が出来るスクリプトファイルです。

0グッド

0クリップ

投稿2020/08/06 18:43

前提・実現したいこと

windowsのバッチファイルを作っています。

元のファイル「2020年1月.xlsx」から、
「2020年2月.xlsx」
「2020年3月.xlsx」



と12ヶ月分のファイルを原本から作成(コピー)したいです。

発生している問題・エラーメッセージ

現状では「20202.xlsx」のファイルしか作成されません

該当のソースコード

windows

1if not "%~0"=="%~dp0.\%~nx0" "%~dp0.\%~nx0" >"%~dp0LOG.TXT" 2>&1 <nul %* 2 3rem echo off 4set n=0 5 6for %%f in ( *.xlsx ) do call :copyFile %%f 7exit /b 8 9:copyFile 10 11if "%n%"=="12" (goto :finish) 12 13set str=%1 14set y=%str:~0,4% 15set m=%str:~5,1% 16set /a n=n+1 17set /a m=m+1 18echo %m% 19if %m% geq 13 (/a m=1,/a y=y+1) 20set date2=%y%%m% 21copy %1 %date2%.xlsx 22 23goto :copyFile 24 25:finish 26set n=0 27pause 28goto :EOF

試したこと

「遅延環境変数の展開」を試してみました(上記では元に戻しています)

補足情報(FW/ツールのバージョンなど)

ここにより詳細な情報を記載してください。

気になる質問をクリップする

クリップした質問は、後からいつでもMYページで確認できます。

またクリップした質問に回答があった際、通知やメールを受け取ることができます。

バッドをするには、ログインかつ

こちらの条件を満たす必要があります。

guest

回答1

0

自己解決

自己解決しました

windows

1setlocal enabledelayedexpansion 2 3if not "%~0"=="%~dp0.\%~nx0" "%~dp0.\%~nx0" >"%~dp0LOG.TXT" 2>&1 <nul %* 4 5rem echo off 6set n=0 7 8for %%f in ( *.xlsx ) do ( 9 10 set str=%%f 11 set y=!str:~0,4! 12 set m=!str:~5,1! 13 14 for /l %%i in (0,1,12) do ( 15 16 set /a m=m+1 17 if !m! == 13 ( 18 set /a m=1 19 set /a y=y+1 20 ) 21 set date2=!y!年!m!月 22 copy %%f !date2!.xlsx 23 24 ) 25 goto :finish 26 27) 28 29:finish 30set n=0 31endlocal

投稿2020/08/06 21:05

編集2020/08/06 21:11
ojisanpgr

総合スコア1

バッドをするには、ログインかつ

こちらの条件を満たす必要があります。

あなたの回答

tips

太字

斜体

打ち消し線

見出し

引用テキストの挿入

コードの挿入

リンクの挿入

リストの挿入

番号リストの挿入

表の挿入

水平線の挿入

プレビュー

15分調べてもわからないことは
teratailで質問しよう!

ただいまの回答率
85.50%

質問をまとめることで
思考を整理して素早く解決

テンプレート機能で
簡単に質問をまとめる

質問する

関連した質問