Excel VBA質問箱 IV

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

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


70231 / 76733 ←次へ | 前へ→

【11012】Re:なぜでしょう(>_<")
回答  りん E-MAIL  - 04/2/24(火) 8:05 -

引用なし
パスワード
   初心者 さん、こんにちわ。

>で計算式をコピーして列に出したいのですが、なぜか横にコピーしてしまいます。
>なぜでしょうか?

>行 = Columns(2).CurrentRegion.Rows.Count
↑たとえば行 = 5 だとして
>Selection.Copy

>Columns(2).Select
↑この行は意味がない(次でまたSelectしてるから)からパス

>Range(Cells(3, 2), Cells(行)).Select
↑Cells(3,2) = B3セル
 Cells()の引数がひとつの時、インデックス値は左上端から右に向かって連番になっているので、シート上の 5 番目のセルはE1になります。
 行が 5 の時は、Cells(5)="E1"セルを示すので、指定範囲のアドレスは B1:E3

>ActiveSheet.Paste

Selectは使わなくても、処理できます。

たとえば、B列の数式をC列にコピーしたいときは、
 Columns(2).Copy Destination:=Columns(3)
Sheet1のB1セルの数式をSheet2のC1:C15にコピーしたいときは、
  With Worksheets("Sheet2")
   Worksheets("Sheet1").Cells(1, 2).Copy Destination:=.Range(.Cells(1, 3), .Cells(15, 3))
  End With
0 hits

【11011】なぜでしょう(>_<") 初心者 04/2/24(火) 1:56 質問
【11012】Re:なぜでしょう(>_<") りん 04/2/24(火) 8:05 回答
【11050】Re:なぜでしょう(>_<") 初心者 04/2/25(水) 11:20 質問
【11058】Re:なぜでしょう(>_<") アイエネス 04/2/25(水) 19:17 回答
【11068】Re:なぜでしょう(>_<") 初心者 04/2/26(木) 10:52 質問
【11069】Re:なぜでしょう(>_<") Jaka 04/2/26(木) 17:24 発言
【11071】Re:なぜでしょう(>_<") アイエネス 04/2/27(金) 0:55 発言
【11090】Re:なぜでしょう(>_<") 初心者 04/2/27(金) 16:17 発言
【11096】Re:なぜでしょう(>_<") アイエネス 04/2/27(金) 23:33 発言
【11146】Re:なぜでしょう(>_<") 初心者 04/3/1(月) 13:03 お礼
【11065】Re:なぜでしょう(>_<") Kein 04/2/26(木) 0:26 回答

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