先日以下の記事で、スクリーンショットを撮るたびに自動でシートに張り付けるマクロを紹介した。 thom.hateblo.jp 割とうまくいったのだが、実行中にタスクバーから他のExcelへ切り替えができないことが判明した。 サーバー管理業務でマニュアルがExcelで作られているものがあるので、Excelを閲覧しながら作業できない点はつらい。 また、ActiveSheetに張り付けしているため、別のシートがActiveになっていると意図しないところに張り付いてしまう。 終了させるためにセルにExitと書く点もあまりイケてない。 今回はそのあたりを改良したマクロを作成した。 コード Declare Function OpenClipboard Lib "user32" (Optional ByVal hwnd As Long = 0) As Long Declare Function Close