Excel VBA質問箱 IV

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

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


70943 / 76738 ←次へ | 前へ→

【10297】Re:'Cells'メソッド
回答  Jカーター  - 04/1/16(金) 13:13 -

引用なし
パスワード
   ▼sa さん:
こんにちは。
とりあえず
Selectして,シートを指定しない書き方はやめて
シートを指定して書きましょう。
(こっちの方が普通の書き方です)
------------------------------------------------------------------------
  With Sheets(1)
    hen = .Range(.Cells(2, 2), .Cells(52, n + 1)).Value
    .Cells(2, 20).Resize(UBound(hen, 1), UBound(hen, 2)).Value = hen
  End With

これでも駄目な場合は
駄目なパソコンと動くパソコンの違いを調べてはどうですか?

ちなみに配列をセルに展開するのにループはいらないと思います。
0 hits

【10292】'Cells'メソッド sa 04/1/16(金) 10:13 質問
【10293】Re:'Cells'メソッド INA 04/1/16(金) 11:13 回答
【10296】Re:'Cells'メソッド sa 04/1/16(金) 12:37 質問
【10297】Re:'Cells'メソッド Jカーター 04/1/16(金) 13:13 回答
【10306】Re:'Cells'メソッド しのしの 04/1/17(土) 0:11 回答
【10330】Re:'Cells'メソッド sa 04/1/19(月) 11:00 お礼

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