ken3memo (三流君)

回答下書き、失敗。Excel VBA で シートをダブルクリックした時のイベント

http://q.hatena.ne.jp/1256929671 の質問に答えようとして、試行錯誤したけど失敗した、そんなお話です。

Excel VBA で シートをダブルクリックした時のイベントで処理しようとしたけど、、、

仕様を変えると怒られそうだけど

F列をダブルクリックしたら、クリップボードにコピーされているテキストを貼り付ける。

そんな処理だったら、できるかなぁ、、と思い、チャレンジしてみます。

http://www.youtube.com/watch?v=BTDlUtd60ek

シートのイベントにコードを書きたいので、

シートの名前の上にカーソルを

合わせてから右クリック、

コードの表示を選択する

次にコードの入力画面で、

Worksheetを選択する。

Worksheetを選択後、

BeforeDoubleClickを選択して、

下記のコードを書き込む(コピーする)

'F列をダブルクリックしたら、クリップボードにコピーされているテキストを貼り付ける。
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    If Target.Column = 6 Then 'Fの判断
        ActiveSheet.PasteSpecial Format:="テキスト", Link:=False, DisplayAsIcon:= _
                False
    End If
End Sub

↑を書き込み、作ってみたけど、

テスト段階で、Webページから２行、複数行コピーすると下の行にまでコピーされてしまい(まぁ単純貼り付けだから？)

質問の答えにならないことがわかったので、日記に残してみた。

(※動画を捨てればいいのに、未練たらたら？、もったいないと思っちゃダメなのにね・・・)

貼り付け方法を工夫しないとなぁ。

あっ、質問は：：：の置き換えだから、そもそも、単純貼り付けじゃマズイのかぁ。。。

クリップボードから取り出して、１つのセルに入れないと....

続きは http://d.hatena.ne.jp/ken3memo/20091102/1257102258 (11/02作成)を見てください。

※いつまで、下書きなんだ？？

ツイートする

Permalink | コメント(6) | トラックバック(0) | 06:32