エントリーの編集
![loading...](https://b.st-hatena.com/bdefb8944296a0957e54cebcfefc25c4dcff9f5f/images/v4/public/common/loading@2x.gif)
エントリーの編集は全ユーザーに共通の機能です。
必ずガイドラインを一読の上ご利用ください。
ファイル名と同名のフォルダを自動作成して移動させる方法はありますか?
記事へのコメント0件
- 注目コメント
- 新着コメント
このエントリーにコメントしてみましょう。
注目コメント算出アルゴリズムの一部にLINEヤフー株式会社の「建設的コメント順位付けモデルAPI」を使用しています
![アプリのスクリーンショット](https://b.st-hatena.com/bdefb8944296a0957e54cebcfefc25c4dcff9f5f/images/v4/public/entry/app-screenshot.png)
- バナー広告なし
- ミュート機能あり
- ダークモード搭載
関連記事
ファイル名と同名のフォルダを自動作成して移動させる方法はありますか?
Excelで代用する方法です。 1.新規でExcelを開き、Wordファイルが保存されているフォルダのパス をセルA... Excelで代用する方法です。 1.新規でExcelを開き、Wordファイルが保存されているフォルダのパス をセルA1に入力します。 例)C:\MyData\Docs\Word 2.[Alt]+[F11] で VB Editor を開き、標準モジュールに次のとおり 記述(コピペ)します。 ' Sub CrtFileNameDir() Dim FPath, TargetFile, DName FPath = Range("A1").Value If FPath = "" Then Exit Sub TargetFile = Dir$(FPath & "\*.doc") Do While TargetFile <> "" DName = Left(TargetFile, InStrRev(TargetFile, ".") - 1) On Error GoTo Er MkDir FPath &