akashi_keirin https://blog.hatena.ne.jp/akashi_keirin/ 素人がExcelVBAによる「一人働き方改革」に挑むブログ https://akashi-keirin.hatenablog.com/ WordVBA WordのDocument上からテキストボックスを一掃できない やたらとテキストボックスがベタベタ貼り付けられた文書に出会った。 文章をコピペしようにも、巻き添えでテキストボックスが選択されてしまうのでうっとうしいことこの上ない。 で、マクロで一掃してやろうと思って次のコードを書いた。 文書内のシェイプを一掃する（はずの）コード リスト１ 標準モジュール Public Sub removeAllShapes() Dim Doc As Document Set Doc = ActiveDocument Dim shp As Word.Shape For Each shp In Doc.Shape… 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Fakashi-keirin.hatenablog.com%2Fentry%2F2019%2F02%2F15%2F175045" title="Document内のテキストボックスを一掃すること能わず……(Word) - 素人がExcelVBAによる「一人働き方改革」に挑むブログ" class="embed-card embed-blogcard" scrolling="no" frameborder="0" style="display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;"></iframe> https://cdn-ak.f.st-hatena.com/images/fotolife/a/akashi_keirin/20190215/20190215174830.jpg Hatena Blog https://hatena.blog 2019-02-15 17:50:45 rich https://akashi-keirin.hatenablog.com/entry/2019/02/15/175045 1.0 100%