VBAには標準でクリップボードを操作する関数が用意されていないため、何らかの代替手段が必要です。今回はAPI呼び出しを使用します。 64bit対応 以下の記事に32bitのコードが掲載されています。 クリップボードに情報を送信する | Microsoft Docs 2018.09.26 64bitでは必要に応じて Long を LongPtr や LongLong に修正する必要があります。 Option Explicit #If VBA7 And Win64 Then Private Declare PtrSafe Function OpenClipboard Lib "user32.dll" (ByVal hWnd As LongPtr) As Long Private Declare PtrSafe Function EmptyClipboard Lib "user32.dll" (
![64bit VBAでクリップボードに文字列を設定・取得 - Qiita](https://cdn-ak-scissors.b.st-hatena.com/image/square/a6833d4746fa57b7153ca888230e91391f06a9ab/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-dGV4dD9peGxpYj1yYi00LjAuMCZ3PTk3MiZoPTM3OCZ0eHQ9NjRiaXQlMjBWQkElRTMlODElQTclRTMlODIlQUYlRTMlODMlQUElRTMlODMlODMlRTMlODMlOTclRTMlODMlOUMlRTMlODMlQkMlRTMlODMlODklRTMlODElQUIlRTYlOTYlODclRTUlQUQlOTclRTUlODglOTclRTMlODIlOTIlRTglQTglQUQlRTUlQUUlOUElRTMlODMlQkIlRTUlOEYlOTYlRTUlQkUlOTcmdHh0LWNvbG9yPSUyMzIxMjEyMSZ0eHQtZm9udD1IaXJhZ2lubyUyMFNhbnMlMjBXNiZ0eHQtc2l6ZT01NiZ0eHQtYWxpZ249bGVmdCUyQ3RvcCZzPTg5MzBiNDc5MmJjZGMzMjBjZDcyYmE2MDZlMzI4ZmY2%26mark-x%3D142%26mark-y%3D57%26blend64%3DaHR0cHM6Ly9xaWl0YS11c2VyLWNvbnRlbnRzLmltZ2l4Lm5ldC9-dGV4dD9peGxpYj1yYi00LjAuMCZoPTc2Jnc9NzcwJnR4dD0lNDA3c2hpJnR4dC1jb2xvcj0lMjMyMTIxMjEmdHh0LWZvbnQ9SGlyYWdpbm8lMjBTYW5zJTIwVzYmdHh0LXNpemU9MzYmdHh0LWFsaWduPWxlZnQlMkN0b3Amcz1lNDI2MWNhOTVmYzBlMzhiYWQ5MGM1MThmNDE0ZTYzOA%26blend-x%3D142%26blend-y%3D486%26blend-mode%3Dnormal%26s%3Dbf37a1c2ebc1054dc42e2813607d4158)