アフィリエイト広告を利用しています

2017年08月26日

クリップボードにコピーする

ExcelにIDやパスワードをまとめて登録しています。何かのサイトにログインするときはそれらをクリップボードにコピペして使用しています。コピー前にそれらを選択するのが面倒なので、ボタンクリックでコピーできるようにしました。

Excel vba で以下のコマンドを記述

Sub ClipboardCopy()
 Dim text As String
 Dim CBoard As New DataObject

 text = "コピーする文字列"
 With CBoard
 .SetText text
 .PutInClipboard
 End With
End Sub

 .SetText text '変数 text の値をDataObjectに入れる
 .PutInClipboard ’DataObjectのデータをクリップボードに入れる

まず、DataObjectにデータをコピーし、次にDataObjectからクリップボードにデータをコピーします。

DataObjectはデータの一時待避所、またはデータ運び屋とでも解釈すれば良いのだろうがややこしい。変数からクリップボードに受け渡しできればいいと思う。

DataObjectオブジェクトを使用するには、Microsoft Forms 2.0 Object Libraryを参照設定します。私のPCではすでに参照設定されていたので、特に意識することなく上記のコマンドを実行できました。


゜+.――゜+.――゜+.――゜+.――゜+.――゜+.――゜+.――゜+.――゜+.――゜



posted by db-engineer at 00:00 | Comment(0) | Access、Excel

この記事へのコメント
コメントを書く

お名前:

メールアドレス:


ホームページアドレス:

コメント:

※ブログオーナーが承認したコメントのみ表示されます。

検索
最新記事
カテゴリーアーカイブ
プロフィール
db-engineerさんの画像
db-engineer
プロフィール
タグクラウド