|
▼UO3 さん:
UO3さん、レスありがとうございます。
うーむ、、、なかなか単純にはいかなそうですね。
取り敢えず、
任意セルをコピー → 特定セルに貼り付け → そのセルの値で検索
というマクロで目的の動作をすうようにしました。
マクロもっと勉強しなくては(汗
>▼いち さん:
>
>h tp://officetanaka.net/excel/vba/tips/tips20.htm
>ht p://www.moug.net/tech/exvba/0150103.html
>
>ここに田中さんが執筆された参考記事が。
>
>これをベースにして以下サンプルコードを。
>
>'MicroSoft Forms 2.0 Object Library に参照設定
>'あるいは、ユーザーフォームを挿入し、解放すると自動的に参照設定される。
>
>コードの先頭の、このコメント、留意願います。
>
>Sub Test()
>'MicroSoft Forms 2.0 Object Library に参照設定
>'あるいは、ユーザーフォームを挿入し、解放すると自動的に参照設定される。
> Dim cb As New DataObject
> Dim v As Variant
> Dim s As String
>
> v = Application.ClipboardFormats
>
> If v(1) Then
> MsgBox "クリップボードには何もありません"
> Else
> cb.GetFromClipboard ''クリップボードからDataObjectにデータを取得する
> v = cb.GetText ''DataObjectのデータを取得
> If VarType(v) <> vbString Then
> MsgBox "このテーマで扱える形式のデータはクリップボードにはありません"
> Else
> s = Left(v, Len(v) - 1)
> MsgBox s
> End If
> End If
>
>End Sub
>
>
>>クリップボードの値を検索するマクロというのは可能でしょうか?
>>
>>「セルの値をコピー → その値をA列から検索」ということがしたいのです。
>>
>>コピーするセルは不特定です。
>>
>>どうぞ、ご教示よろしくおねがいします。
|
|