お世話になります。
下記のような貼り付け入力するマクロがあります。
コピーして別シートで使うと☓400と出てエラーになってしまいます。
なぜですか?
またエラーせず使うにはどうすればいいですか?
拙い文ですみません。
足りない点は補足します。
よろしくお願い致します。
Sub Sample1() 'この行から
With Range("h16:h19")
.Copy
Cells(Rows.Count, "A").End(xlUp).Offset(1).Select
Selection.PasteSpecial Paste:=xlPasteAll, Transpose:=True
.ClearContents
Range("h16").Select
End With
End Sub 'この行まで
No.1ベストアンサー
- 回答日時:
現在の所、ご質問のマクロからエラー 400 が出るというのは、見当たらないのです。
また、
>(マクロコードを)コピーして別シートで使うと
という必要性はないはずです。別のブックというなら、あるかもしれません。標準モジュールに置く限りは、どのシートでも構いません。
あえて、いくつか想定するエラーに対処すれば、このようにはなりますが、不明です。別の原因があるか、ステップモードにして、どこでエラーが出るか特定していただいたほうがよいです。
Sub Sample1R()
Dim rw As Long
With ActiveSheet
rw = .Cells(Rows.Count, "A").End(xlUp).Offset(1).Row
'エラー処理をする
If rw < 3 Then Exit Sub '空のA列
.Range("H16:H19").Copy
.Cells(rw, 1).PasteSpecial Paste:=xlPasteAll, Transpose:=True
.Range("H16:H19").ClearContents
.Range("H16").Select 'これはなくてもよい
End With
End Sub
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) エクセルのマクロとシートの保護について教えてください。 1 2022/10/18 08:36
- Visual Basic(VBA) マクロを短くする 1 2023/01/15 00:11
- Visual Basic(VBA) オブジェクトが見つかりません 1 2023/06/24 19:43
- Visual Basic(VBA) エクセルのマクロについて教えてください。 4 2023/07/04 17:58
- Visual Basic(VBA) エクセルのマクロについて教えてください。 1 2022/10/13 08:41
- Visual Basic(VBA) エクセルのマクロについて教えてください。 5 2023/07/05 09:30
- Excel(エクセル) エクセル VBAでシートのコピーを作りたい 1 2023/05/18 07:42
- Visual Basic(VBA) Excelにて、シート1の行を削除するとシート2のシート1と同じ番号の行も削除したい 3 2022/05/08 04:24
- Excel(エクセル) vba 転記するときの最終行について 2 2022/09/03 09:31
- Visual Basic(VBA) マクロで最終行を取得してコピーしたい 3 2022/04/06 19:07
このQ&Aを見た人はこんなQ&Aも見ています
-
新NISA制度は今までと何が変わる?非課税枠の拡大や投資対象の変更などを解説!
少額から投資を行う人のための非課税制度であるNISAが、2024年に改正される。おすすめの銘柄や投資額の目安について教えてもらった。
-
エクセルのエラーメッセージ「400」って?
Visual Basic(VBA)
-
【Excel VBA】エラー番号400
Excel(エクセル)
-
特定のPCだけ動作しないVBAマクロがあります。その理由は?
Visual Basic(VBA)
-
-
4
excelのマクロでrangeの選択がうまくいきません。
その他(Microsoft Office)
-
5
VBA 400エラー 1004エラー
Visual Basic(VBA)
-
6
VBAでブックを非表示で開いて処理して閉じる方法
Excel(エクセル)
-
7
VBAでエクセルシートを更新(リフレッシュ)する方法を教えて下さい。
Excel(エクセル)
-
8
VBAでダブルコーテーション入りの数式をセルにセットしたい
Visual Basic(VBA)
-
9
マクロで画像挿入→エラー「リンクされたイメージを表
Excel(エクセル)
-
10
マクロの「SaveAs」でエラーが出るのを解消したいです(再)
Visual Basic(VBA)
-
11
VBA シートをコピーする際に Copyメソッドは失敗しましたのエラーが出てしまいます
Visual Basic(VBA)
-
12
Excel2019 マクロを使用し画像を貼り付けした際のリンク切れについて
Excel(エクセル)
-
13
バックグラウンドのプロセスのエクセルを閉じる方法
Visual Basic(VBA)
-
14
別インスタンスのエクセルを制御したい
Excel(エクセル)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
チケット何回もエラーは高額請求?
-
APEXをやっていたらこんなエラ...
-
自動改札のエラーって…
-
Eエクセルの計算方法で空欄を0...
-
送信エラー時、レポートメール...
-
SUM関数の範囲に#N/Aが...
-
VLOOKUP関数についての質問です...
-
Chatgptから送られてきたリンク...
-
もしセルが"#N/A"なら~をする...
-
Excelでエラー(#N/Aなど)値を...
-
普段から使っている乗車券が改...
-
VBAで「致命的なエラー」が出ま...
-
EXCELマクロで☓400とでます
-
Suicaのモバイル決済で、 バス...
-
ExcelでVBAを使用した際に、『...
-
ACCESS VBA でのエラー解決の根...
-
HDDをローレベルフォーマットす...
-
手帳型スマホケースにSuicaを入...
-
甲子園のスコアボードに
-
MDプレーヤーで"UTOC ERROR"...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Excelでエラー(#N/Aなど)値を...
-
SUM関数の範囲に#N/Aが...
-
自動改札のエラーって…
-
VBAで「致命的なエラー」が出ま...
-
もしセルが"#N/A"なら~をする...
-
ExcelでVBAを使用した際に、『...
-
Eエクセルの計算方法で空欄を0...
-
VLOOKUP関数についての質問です...
-
送信エラー時、レポートメール...
-
VLOOKUPで求めた数値をさらにVL...
-
ACCESS VBA でのエラー解決の根...
-
システムエラーです:&H80004005...
-
EXCELマクロで☓400とでます
-
エクセルのエラー文について
-
改札エラーについて
-
相手のエラーによる出塁でも出...
-
APEXをやっていたらこんなエラ...
-
Suicaのモバイル決済で、 バス...
-
■□■読み方■□■ #N/A, #VALUE!, ...
-
Excel関数について
おすすめ情報