![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?8acaa2e)
No.2
- 回答日時:
Sub test()
Dim c As Long
c = Cells(3, Columns.Count).End(xlToLeft).Offset(, 1).Column
If c < 15 Then c = 15
Range("I3:K8").Copy Destination:=Cells(3, c)
End Sub
No.1
- 回答日時:
sub test()
if range("i3").value = "" then
range("i3:k8").value = range("b3:d8").value
else
range("l3:n8").value = range("b3:d8").value
end if
end sub
この回答への補足
早速のご教示ありがとうございます。
説明を少し追加させて下さい。
コピー貼付けは、平均15回(最終がAY3からBA8位)くらい
横に行います。(時々は16回や17回の時もあります)
また、コピーは書式(罫線やセルの色)も一緒に行いたいのです。
どうかよろしくお願いいたします。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) エクセルのマクロについて教えてください。 1 2023/02/25 11:55
- Visual Basic(VBA) エクセルのマクロについて教えてください。 5 2023/07/05 09:30
- Visual Basic(VBA) 4月~3月まで12カ月横に並んだ表へ指定範囲を貼り付けたい。 Sheet2の指定範囲、Range(" 2 2022/11/30 16:37
- Excel(エクセル) エクセルのマクロでコピー後の貼り付け先を毎回指定したところにしたい 5 2022/08/12 10:47
- Visual Basic(VBA) エクセルのマクロについて教えてください。 4 2023/07/04 17:58
- Visual Basic(VBA) エクセルVBAで『A列』に新規で数値を入力し『B列』から右方向の空白セルにその値を貼り付ける方法 4 2022/11/05 08:37
- Excel(エクセル) エクセルのマクロについて教えてください。 3 2023/02/07 14:47
- Visual Basic(VBA) Excel vbaについて知恵もしくは、コード教えて下さいm(__)m ① 表にあるデータをコピー、 2 2022/09/01 23:57
- Excel(エクセル) マクロVBA別Excelブックにデータ転記 2 2022/07/10 23:35
- Excel(エクセル) 【マクロ】プリントスクリーンした画像をエクセルに貼付して印刷したい 6 2022/11/30 20:11
このQ&Aを見た人はこんなQ&Aも見ています
-
「どうして捨てられないの?」前妻の物を捨てられない男性の心理って?
前妻の物を捨てられない理由に加え、捨てるための手段はあるのかを専門家に聞いてみた!
-
エクセルのVBAでセルの貼り付け方向を指定する方法
Excel(エクセル)
-
EXCEL VBAで複数シートから該当列のみを別シート列方向に順番に貼り付け
Visual Basic(VBA)
-
マクロ 最終列をコピーして最終列の次の列に挿入する
Visual Basic(VBA)
-
-
4
繰り返し1行~28行までを順順にコピーする方法
Visual Basic(VBA)
-
5
エクセル:マクロ「Application.CutCopyMode = False」って?
Excel(エクセル)
-
6
エクセルで日付から日にちを削除したい
Excel(エクセル)
-
7
アクティブセルとそのセルに隣接する右隣の2つのセルをコピーしてシート2に貼り付ける
Excel(エクセル)
-
8
Excel マクロ:変数を複数使う場合
Excel(エクセル)
-
9
VBA 連続行データを5行ずつ隣の列に貼り付ける
Excel(エクセル)
-
10
VBAで特定の文字が入力されたセルを選択
Excel(エクセル)
-
11
VBAの構文 3列置きにコピーして別シートに貼付
Visual Basic(VBA)
-
12
VBAでセル入力の数式に変数を用いたい
Excel(エクセル)
-
13
マクロで貼り付け位置を可変させる方法が知りたいです。
Excel(エクセル)
-
14
マクロの「1列おきに貼り付け処理を行う方法」を知りたいです。
Excel(エクセル)
-
15
EXCELで特定のセルに表示された項目をヘッダーやフッターに出力するには
Excel(エクセル)
-
16
エクセルのエラーメッセージ「400」って?
Visual Basic(VBA)
-
17
エクセルVBAで、条件に一致するセルへ移動
Excel(エクセル)
-
18
もしセルが#N/A"なら~をする・・・には?"
Excel(エクセル)
-
19
VBAのコマンドボタンの文字列の改行方法は?
Visual Basic(VBA)
-
20
エクセル マクロで列を連続してコピーするにはどうしたらいいか教えてください
Excel(エクセル)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
横にコピーするマクロを教えて...
-
強調構文について It is only a...
-
エクセルのマクロについて教え...
-
ExcelVBA修正のお願い
-
エクセルのマクロについて教え...
-
エクセルのVBAコードについて教...
-
VBAマクロ実行時エラーの修正に...
-
Worksheets メソッドは失敗しま...
-
エクセルVBA 配列からセルに「...
-
エクセル マクロ オートフィ...
-
VBA シートをコピーする際に Co...
-
[EXCEL]ボタン押す→時刻が表に...
-
ワイルドカード「*」を使うとう...
-
【VBA】【ユーザーフォーム_Lis...
-
エクセルVBAが途中で止まります
-
「段」と「行」の違いがよくわ...
-
エクセルで特定の文字列が入っ...
-
Excel VBAでのWorksheet_Change...
-
マクロの「SaveAs」でエラーが...
-
LEFT関数とIF関数の組み合わせ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
横にコピーするマクロを教えて...
-
UWSCを使用して、ドロップダウ...
-
EXCELカレンダー出勤日黒色、休...
-
バイトを変換するスクリプト
-
true lifeの意味
-
【VBA】 IFの中にIF
-
強調構文について It is only a...
-
HTML ドロップダウンメニ...
-
ホームページの資料請求フォー...
-
条件に一致するデータの平均 ...
-
英文の和訳をお願い
-
英→和訳助けて下さい!!!
-
RGBを色コードに
-
excel vba
-
Excel、変数4つの和が25になる...
-
この「of」の用法、意味不明です。
-
この専門用語の意味は?
-
MT4 直前の足の四本値 つづき
-
VBAマクロ実行時エラーの修正に...
-
エクセル マクロ オートフィ...
おすすめ情報