| 
    
     |  | ▼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列から検索」ということがしたいのです。
 >>
 >>コピーするセルは不特定です。
 >>
 >>どうぞ、ご教示よろしくおねがいします。
 
 |  |