Excel VBA質問箱 IV

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

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


48971 / 76732 ←次へ | 前へ→

【32687】Re:カット&ペースト
発言  ponpon  - 05/12/20(火) 20:00 -

引用なし
パスワード
   こんばんは。

こういう事でしょうか。

Sub test()
  
  Range("B1", Range("B65536").End(xlUp)).Cut Range("A65536").End(xlUp).Offset(1)
  Range("C1", Range("C65536").End(xlUp)).Cut Range("A65536").End(xlUp).Offset(1)
  Application.CutCopyMode = False
End Sub
0 hits

【32685】カット&ペースト TOTO 05/12/20(火) 19:39 質問
【32687】Re:カット&ペースト ponpon 05/12/20(火) 20:00 発言
【32694】Re:カット&ペースト TOTO 05/12/20(火) 22:34 質問
【32695】Re:カット&ペースト ponpon 05/12/20(火) 22:51 発言
【32714】Re:カット&ペースト TOTO 05/12/21(水) 10:41 お礼

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