Excel (VBA)

Excel VBAに関するフォーラムです。
  • 解決済みのトピックにはコメントできません。
このトピックは解決済みです。
質問

 
(Windows 10 Home : Excel 2010)
セル範囲のコピー
投稿日時: 21/07/15 10:07:52
投稿者: miyabi2000

Worksheets(2).Range(Cells(1, 1), Cells(変数, 1)).Value = Worksheets(1).Range(Cells(1, 2), Cells(変数, 2)).Valueと、セル範囲のコピーをしようとしたらエラーが出ました。
 
「アプリケーション定義またはオブジェクト定義のエラーです」と出ます。
 
何か理由があるのでしょうか。
 

回答
投稿日時: 21/07/15 10:34:29
投稿者: sk

引用:
Worksheets(2).Range(Cells(1, 1), Cells(変数, 1)).Value = Worksheets(1).Range(Cells(1, 2), Cells(変数, 2)).Value

Worksheets(2).Range(Worksheets(2).Cells(1, 1), Worksheets(2).Cells(変数, 1)).Value = Worksheets(1).Range(Worksheets(1).Cells(1, 2), Worksheets(1).Cells(変数, 2)).Value
 
引用:
アプリケーション定義またはオブジェクト定義のエラーです

引用:
何か理由があるのでしょうか。

いずれか一方、または両方の Worksheet オブジェクトの Range プロパティの各引数に対して、
そのワークシートとは別のワークシート(そのコードが記述されているのが標準モジュールなら
アクティブシート、シートモジュールならそのモジュールと紐づいているワークシート)の
セルを渡しているためです。

投稿日時: 21/07/15 11:15:55
投稿者: miyabi2000

sk様
 
 早速のご返信ありがとうございました。
 
 動作自体は問題なく動きました。
 ありがとうございます。
 
 理由の頂いた言葉について
 私の知識ではすぐに理解できないので
 ネット等で頂いた言葉を参考にして
 もう少し自分なりに勉強してみます。
 
 レベルが低くてすみません。
 
 本当にありがとうございました。