craftone https://blog.hatena.ne.jp/craftone/ craftoneの日記 https://craftone.hatenablog.com/ Office パワーポイントで同じ色のオートシェイプを形状に関係なく選択する方法（マクロのソースコードなど）をお教えください。また、同じ色で同じ形状のオートシェイプのみを選択する方法もすぐにわかれば合わせてお願いできると助かります。これは素晴らしい。 自分が実際欲しかったのは追加質問の「ラインまたは枠の色が同じものだけについて選択する」だったので、コピペ用にメモ。 Sub SelectSameLineColor() Dim ShapesCount As Integer Dim ArrayIndex As Integer ShapesCount = ActiveWindow.Selection.SlideRa… 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Fcraftone.hatenablog.com%2Fentry%2F20080430%2F1209534728" title="パワーポイントで同じ色のオートシェイプを形状に関係なく選択するマクロ - craftoneの日記" class="embed-card embed-blogcard" scrolling="no" frameborder="0" style="display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;"></iframe> Hatena Blog https://hatena.blog 2008-04-30 14:52:08 rich https://craftone.hatenablog.com/entry/20080430/1209534728 1.0 100%