Excel VBA質問箱 IV

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

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


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

17044 / 76732

←次へ　｜　前へ→


	【65148】Re:範囲ごとの転記について

Jaka - 10/4/19(月) 16:13 -


	引用なし

	パスワード

Dim データTb(1 To 12) As String
データTb(1) = ""
データTb(2) = ""
データTb(3) = ""
データTb(4) = ""
データTb(5) = ""
データTb(6) = ""
データTb(7) = ""
データTb(8) = ""
データTb(9) = ""
データTb(10) = "Q5:V19"　 '10月データ
データTb(11) = "W5:AB19"　'11月データ
データTb(12) = ""

入力した値 = 11 'だとして。（この辺の入力、取得は、自分で考えてください。）

Range("J5:O19").Value = Range(データ(入力した値)).Value
Erase データTb

エラー処理入れてません。

2 hits

▼

【65147】範囲ごとの転記について isausa 10/4/19(月) 15:51