クリップボードに格納する

「変数のデータをクリップボードに格納する: .xls」で、とても簡潔で分かりやすく説明されておられます！
セットとゲットを分岐してメモ。

' 「ツール」−「参照設定」で、
' 「Microsoft Forms 2.0 Object Library」にチェックを入れてから使用
' （ユーザーフォームを作成した場合は上記の操作は必要なし）

Dim hensuu1 As String
hensuu1 = "クリップボードにコピーする文字列"

Dim MyClipboard As New DataObject
With MyClipboard
    .SetText hensuu1 'テキスト文字列をDataObjectにコピー
    .PutInClipboard 'DataObjectのデータをクリップボードに移動
End With

' クリップボードの内容を直接変数として取得する場合
Dim hensuu2 As String

MyClipboard.GetFromClipboard
hensuu2 = MyClipboard.GetText