Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


46060 / 76732 ←次へ | 前へ→

【35651】Re:別シートの行末へコピー
発言  ゆと  - 06/3/9(木) 8:04 -

引用なし
パスワード
   オタピョンさんこんにちは。
コメントだけですが。

> この質問は、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の事だと思いますが。

7 hits

【35624】別シートの行末へコピー オタピョン 06/3/8(水) 17:33 質問
【35640】Re:別シートの行末へコピー ponpon 06/3/8(水) 21:11 発言
【35670】Re:別シートの行末へコピー オタピョン 06/3/9(木) 19:55 お礼
【35651】Re:別シートの行末へコピー ゆと 06/3/9(木) 8:04 発言
【35671】ありがとうございます オタピョン 06/3/9(木) 20:03 お礼

46060 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free