Excel VBA質問箱 IV

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

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


9795 / 76734 ←次へ | 前へ→

【72496】Re:sheet1のデータをsheet2に整形して抽出する方法
発言  kanabun  - 12/8/16(木) 9:28 -

引用なし
パスワード
   ▼タケル さん:よこから失礼します

>'アプリケーション定義またはオブジェクト定義のエラー(上手く行く時もある)
>   Sheets("sheet1").Select
>   Sheets(1).Range(Cells(i + 1, "G"), Cells(i + Y, "G")).Select
>   Selection.Copy

Cellsのまえにシートの指定がないため、上記のエラーが(アクティブな
シートが "Sheet1"でないとき)発生する、という説明がありました。

そのとおりなんで、上の3行は


   Sheets(1).Select
   Range(Cells(i + 1, "G"), Cells(i + Y, "G")).Copy

の2行か、
より簡潔には

   Sheets(1).Cells(i + 1, "G").Resize(Y).Copy

の一行ってことですよね?
(下は シートの選択が不要です)
2 hits

【72481】sheet1のデータをsheet2に整形して抽出する方法 タケル 12/8/15(水) 14:45 質問
【72484】Re:sheet1のデータをsheet2に整形して抽出... UO3 12/8/15(水) 19:54 発言
【72487】Re:sheet1のデータをsheet2に整形して抽出... タケル 12/8/15(水) 22:17 回答
【72488】Re:sheet1のデータをsheet2に整形して抽出... タケル 12/8/15(水) 22:36 お礼
【72496】Re:sheet1のデータをsheet2に整形して抽出... kanabun 12/8/16(木) 9:28 発言
【72501】Re:sheet1のデータをsheet2に整形して抽出... UO3 12/8/16(木) 15:57 発言
【72490】Re:sheet1のデータをsheet2に整形して抽出... UO3 12/8/15(水) 22:40 発言

9795 / 76734 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free