[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]
『範囲を指定した右端の空白セルへ貼り付けたい』（リオ）
列の項目として横に４月〜3月（C列からN列まで）並んだ表があります。
9月まではデータが入っていますが空白の月10月分のデータとして「Range("Q9:Q22").Copy」して貼り付けたいのですが下記コードを変更することで可能でしょうか。教えてください。
Sub test1()
Worksheets("A表").Range("Q9:Q22").Copy
Cells(9, Columns.Count).End(xlToLeft).Offset(, 1).PasteSpecial Paste:=xlPasteValues
End Sub
＜ 使用 Excel：Office365、使用 OS：Windows10 ＞
>空白の月10月分のデータとして? （?） 2022/11/29(火) 17:13:00
[ 一覧(最新更新順) ]
YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki.
Modified by kazu.