|
オタピョンさんこんにちは。
コメントだけですが。
> この質問は、3月4日に質問しましたが返信がもらえませんでした。
> 自分なりに、考えましたが、上手くいきません。
質問確認しましたが、文章が理解できない点が多々ありました。
第三者はシートの構造を見えませんので…。
> ダブルクリックは、 Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Excel.Range, Cancel As Boolean) だと分かりました。
記載モジュールを気をつけてください。
> B列は If .Column <> 2 Then Exit Sub だと思います。
列がB列ではない場合、Subを終了させる。
> 行末は Worksheets("Sheet1").Range("B65536").End(xlUp).Row + 1
結合セルを対象にしない場合は上記の様な記述と
Worksheets("Sheet1").Range("B65536").End(xlUp).Offset(1).Row
違いは、自分で試してみてくださいね。
> クリップボードを経由しないですぐに行えるコピペは、よく分かりません。
Copy についてHelpを参照してみてください。
引数としては、Destinationの事だと思いますが。
|
|