![](https://cdn-ak-scissors.b.st-hatena.com/image/square/bac801e05b1c4cd99dcfb75c3438b97658520ab5/height=288;version=1;width=512/https%3A%2F%2Fqiita-user-contents.imgix.net%2Fhttps%253A%252F%252Fcdn.qiita.com%252Fassets%252Fpublic%252Farticle-ogp-background-412672c5f0600ab9a64263b751f1bc81.png%3Fixlib%3Drb-4.0.0%26w%3D1200%26mark64%3DaHR0cHM6Ly9xaWl0YS11c2VyLWNvbnRlbnRzLmltZ2l4Lm5ldC9-dGV4dD9peGxpYj1yYi00LjAuMCZ3PTk3MiZoPTM3OCZ0eHQ9JUU2JThDJTg3JUU1JUFFJTlBJUUzJTgzJTk1JUUzJTgyJUE5JUUzJTgzJUFCJUUzJTgzJTgwJUU0JUJCJUE1JUU0JUI4JThCJUUzJTgxJUFFJUUzJTgzJTkxJUUzJTgzJUFGJUUzJTgzJUJDJUUzJTgzJTlEJUUzJTgyJUE0JUUzJTgzJUIzJUUzJTgzJTg4JUUzJTgzJTk1JUUzJTgyJUExJUUzJTgyJUE0JUUzJTgzJUFCJUU1JTg2JTg1JUUzJTgxJUFFJUU2JTk2JTg3JUU1JUFEJTk3JUU1JTg4JTk3JUUzJTgyJTkyJUU0JUI4JTgwJUU2JThCJUFDJUU3JUJEJUFFJUU2JThGJTlCJUUzJTgxJTk5JUUzJTgyJThCVkJTY3JpcHQmdHh0LWFsaWduPWxlZnQlMkN0b3AmdHh0LWNvbG9yPSUyMzIxMjEyMSZ0eHQtZm9udD1IaXJhZ2lubyUyMFNhbnMlMjBXNiZ0eHQtc2l6ZT01NiZzPWYxNTdjODhiNWIyNTZiNjc4YjUyMjE1YmEzMTU4MmRl%26mark-x%3D142%26mark-y%3D57%26blend64%3DaHR0cHM6Ly9xaWl0YS11c2VyLWNvbnRlbnRzLmltZ2l4Lm5ldC9-dGV4dD9peGxpYj1yYi00LjAuMCZoPTc2Jnc9NzcwJnR4dD0lNDBhbXBlcnNhbmQmdHh0LWNvbG9yPSUyMzIxMjEyMSZ0eHQtZm9udD1IaXJhZ2lubyUyMFNhbnMlMjBXNiZ0eHQtc2l6ZT0zNiZ0eHQtYWxpZ249bGVmdCUyQ3RvcCZzPTkwZDc0YTYyODM1NGEwNjJmYmYzMWM0MmZjYTgzNzI2%26blend-x%3D142%26blend-y%3D436%26blend-mode%3Dnormal%26txt64%3DaW4g6YGL5Za26ICF44Ku44Or44OJ%26txt-width%3D770%26txt-clip%3Dend%252Cellipsis%26txt-color%3D%2523212121%26txt-font%3DHiragino%2520Sans%2520W6%26txt-size%3D36%26txt-x%3D156%26txt-y%3D536%26s%3D2c09b3741627f6db2a408e3e8575f20e)
エントリーの編集
![loading...](https://b.st-hatena.com/bdefb8944296a0957e54cebcfefc25c4dcff9f5f/images/v4/public/common/loading@2x.gif)
エントリーの編集は全ユーザーに共通の機能です。
必ずガイドラインを一読の上ご利用ください。
指定フォルダ以下のパワーポイントファイル内の文字列を一括置換するVBScript - Qiita
記事へのコメント0件
- 注目コメント
- 新着コメント
このエントリーにコメントしてみましょう。
注目コメント算出アルゴリズムの一部にLINEヤフー株式会社の「建設的コメント順位付けモデルAPI」を使用しています
![アプリのスクリーンショット](https://b.st-hatena.com/bdefb8944296a0957e54cebcfefc25c4dcff9f5f/images/v4/public/entry/app-screenshot.png)
- バナー広告なし
- ミュート機能あり
- ダークモード搭載
関連記事
指定フォルダ以下のパワーポイントファイル内の文字列を一括置換するVBScript - Qiita
ちょっと必要だったので作りました。 拡張子とあと他ちょこっといじればExcelとかWordにも転用できると... ちょっと必要だったので作りました。 拡張子とあと他ちょこっといじればExcelとかWordにも転用できると思います。 テンポラリな用途なのでかなり乱暴に書いてます。 置換作業前に開いてるファイルの保存を必ずして下さい。 作業中のファイルが消えてしまいます(やっちまいました)。 msgbox "Powerpointが起動中の場合は、終了してから操作を行なって下さい。" Dim folderPath folderPath = InputBox("フォルダパスを入力して下さい。","指定フォルダ以下のファイルの文字列を置換します。") Dim sysObj Set sysObj = CreateObject("Scripting.FileSystemObject") if sysObj.FolderExists(folderPath) = false then msgbox "不正なフォルダです