Windows標準のコピー([Ctrl] + [C])コマンドでなく、ボタンコントロールなどを押したタイミングでセルの内容をクリップボードにコピーする方法についてのメモです。 簡単な内容であれば、普通にセルをコピーで問題ないですが、加工した結果などをセルに出力せずにクリップボードに入れる時などに使えるTIPSだと思います。 内容 実際のクリップボードの操作 Private Sub SendToClipBoard(vStr As String) Dim oDO As New DataObject Call oDO.SetText(vStr) Call oDO.PutInClipboard Set oDO = Nothing End Sub まずクリップボードの内容にアクセスするためのDataObjectオブジェクトを生成します。 作成したオブジェクトにテキストデータをセットし、クリップボード