マクロの作成

Excelで計算をマクロで実施をいたいのですが、
式を最終行まで自動でコピーする方法がわかりません。

マクロでなければ、セルをダブルクリックすればいいのですが、
マクロでは出来ません。

簡単に式を繰り返す方法を教えてください。

No.2 ベストアンサー 回答者： mitarashi 回答日時： 2008/07/04 00:02

単純に、選択範囲に、同じ式をいっぺんに貼り付ける例です。

外していたらすみません。
'選択範囲にまとめて式を貼り付ける　C1に、=A1＋B1を貼り付ける例
Sub test()
Dim targetRange As Range
Dim topRow As Long

Set targetRange = Selection
'R1C1形式のとき
'通常に見本の式を入れておいて、ツール／オプションで、
'一旦R1C1形式で参照するに切り替えて式を確認し、f2で編集して先頭にシングルクォーテーションを
'つけて文字列に変換しておいて利用すると楽
targetRange.FormulaR1C1 = "=RC[-2]+RC[-1]"
'A1形式の時は少々面倒
topRow = targetRange.Cells(1).Row
targetRange.Formula = "=A" & topRow & "+ B" & topRow
End Sub
trim(str(toprow))とかしなくてもいきなり文字列が合成できてしまうんですね。融通ききすぎ．．．

No.1 回答者： rukuku 回答日時： 2008/07/03 04:31

はじめまして

失礼ですが、nakaji2008さんが、どの程度マクロを理解しているかを教えてください。
EXCELのマクロでも
１．単に操作を記録する
２．ＶＢＡを使ってプログラムする
という２通りの方法があります。

＞式を最終行まで自動でコピーする
１．どのセルにどのような式が入っているのか
２．最終行というのは65,536行（バージョンが2007なら1,048,576行）なのか、元データが入っている最終行なのか

また、「どのようなことをしたいのか」を教えてもらえると回答がしやすくなります。

この回答への補足

マウスでのマクロがメインになります。
多少しかＶＢＡはわかりません。

式を最終行までというのは、データが入っている最終行になります。

例えば売上集計表で、
日付　商品名　単価　数量　金額　のデータベースの時に、
金額をマクロで最終行までコピーをしたいのですが。

補足日時：2008/07/04 13:08