【VBA】クリップボードを利用する

VBA
この記事は約2分で読めます。

VBAをでクリップボードの値を読み込んだり、書き込んだりするには
DataObjectを使用します。

参照するライブラリ

DataObjectを利用するにはMicrosoft Forms 2.0 Object libraryに
参照設定を行う必要があります。
参照設定の設定方法についてはこちらをご覧ください。

VBAで参照設定を行う
VBAに標準で含まれていない機能があるときは 外部のライブラリを参照して、外部ライブラリ内の機能を利用します。 この外部ライブラリの機能を利用する設定を、参照設定と言います。

参照設定にMicrosoft Forms 2.0 Object libraryがない場合は
こちらをご覧ください。

【VBA】参照設定でファイルが見つからないのときの解決方法
VBAの参照設定を行うことによって、DictionaryやFileSystemObjectなどの 便利なオブジェクトを利用することができます。 ときどき、利用しようとしたライブラリファイルが見つからないことがあります。 その場合の...

コード

クリップボードに値を設定するプロシージャ

クリップボードに値を設定するコードは以下になります。

DataObjectに引数valの値を設定します。

DataObjectのPutInClipboarメソッドを使用して
DataObjectの値をクリップボードに転送します。

 

クリップボードから値を読み込むプロシージャ

クリップボードから値を読みこむコードです。

クリップボードの値をDataObjectに転送します。

DataObjectの値を戻り値として格納します。

 

クリップボードのテスト

テストコードは以下になります。

 

インプットボックスが表示されるので値を入力します。

setClipBoardプロシージャを利用して、「あいうえお」の文字列を
クリップボードに流し込みます。

readClipBoardプロシージャでクリップボードの値を読み込んで
メッセージボックスに表示します。

 

コメント