【無料】PDFをドロップしてフォルダに振り分けるバッチファイル

@echo off
setlocal enabledelayedexpansion

:=====定数=====
set CD=%~dp0
set USAGE=【使用方法】pdfファイルをbatファイルへドラッグ＆ドロップしてください。（複数ファイル可）
set err=0

:=====メイン処理=====
:ドラック＆ドロップされない場合はusage表示
if '%1%' == '' (
  echo %USAGE%
  echo.
  pause
  exit /b
)

:フォルダ作成
for %%a in (%*) do (
  :元ファイル
  set orgfile=%%~a
  :拡張子
  set ext=%%~xa
  :ファイル名
  set filename=%%~na
  :ファイル名（拡張子あり）
  set file=!filename!!ext!
  :作成フォルダ絶対パス
  set folder=%CD%!filename!
    
  :ファイル名不正確認
  if not "%CD%" == "!folder!" (
    if "!ext!" == ".pdf" (
      if not exist "!folder!" (
        mkdir "!folder!"
        echo 次のフォルダを作成しました。
        echo ⇒!folder!
        echo.
      ) else (
        echo 次のフォルダは既に存在します。
        echo ⇒!folder!
        echo.
      )
      if not exist "!folder!\!file!" (
        move "!orgfile!" "!folder!" > nul 2>&1
        echo 次のファイルを移動しました。
        echo ⇒!file!
        echo.
      ) else (
        echo 次のファイルは既に存在しているため、移動はスキップします。
        echo ⇒!folder!\!file!
        echo.
      )
    ) else (
      echo pdfファイルではないため、次のファイルはスキップします。
      echo ⇒!file!
      echo.
    )
  ) else (
    echo ファイル名が不正のため、次のファイルはスキップします。
    echo ⇒!file!
    echo.
  )
)

echo 処理を完了しました。
echo.
:pause