Excelのマクロで・・・

質問

こんな表があります。
　　　Ａ　　Ｂ　　Ｃ　　Ｄ　　Ｅ　　Ｆ　　Ｇ
１　ＸＸ　ＸＸ　ＸＸ
２　ＹＹ　ＹＹ　ＹＹ
３　ＺＺ　ＺＺ　ＺＺ

ここでＡ１、Ｂ１、Ｃ１の変数を読み込み「ある計算」をさせてＤ１～Ｇ１にその答えを書き出させる、Ａ２～Ｃ２の変数を読み込み「ある計算」をさせてＤ２～Ｇ２にその答えを書き出させる・・・というのを作りたいのですがデータの読み込みと書き出し方法がわかりません。
どうすればいいのでしょうか？簡単なことなのでしょうがエクセルのヘルプが入っていないので・・・（大学のＰＣなので自分で入れることも不可能です）

（縦は同一の変数で対応しています）

必要ならば補足いたします。

回答No.4

arukamun · ベストアンサー

No.1と3のarukamunです。

＞簡単な式だとこの方法でできるのですが今回は式が非常に複雑すぎるのでこの方法が使えません。（どうしても途中の計算式の結果を出す必要があり、そのデータは表に残せないため）

マクロにするにしてもかなり計算が複雑なので、何度も使う数は事前に計算しておきたいですよね。
表に残せないというのは、単に表示したく無いという事でしょうか。
もしそうであれば、表示したくない列を選択して、[書式]→[列]→[表示しない]という事も可能です。

＞２度も回答していただいたのですが申し訳ありません。
いえいえ、気になさらずに。

お礼

たびたびありがとうございます。

この方法でなんとかできました＾＾

回答No.3

arukamun

No.1のarukamunです。
折角補足して頂いたのですが、式が解りにくいので簡単な例を挙げたいと思います。
Ｄ列は
Ｄ＝Ａ＋Ｂ＋Ｃ
Ｅ列は
Ｅ＝Ａ×Ｂ×Ｃ
Ｆ列は
Ｆ＝Ａ＾３＋Ｂ＾２＋Ｃ
Ｇ列は
Ｇ＝√Ａ＋√Ｂ＋√Ｃ

としたいとして

Ｄ１セルに
=A1+B1+C1
Ｅ１セルに
=A1*B1*C1
Ｆ１セルに
=A1^3+B1^2+C1
Ｇ１セルに
=A1^0.5+B2^0.5+C2^0.5

とすると、それぞれ式を理解して結果を出してくれると思います。
次に、Ｄ１セルからＧ１セルをドラッグして、コピー（編集→コピー、またはＣｔｒｌ＋Ｃ）して、Ｄ２セルとＤ３セルをドラッグして、ペースト（編集→貼り付け、またはＣｔｒｌ＋Ｐ）をすると、Ｄ２、Ｅ２、Ｆ２、Ｇ２、Ｄ３、Ｅ３、Ｆ３、Ｇ３が勝手に計算すると思います。

この様にセルに式を入れることで計算させる事が可能です。
ご理解頂けましたでしょうか。

お礼

回答ありがとうございます。

簡単な式だとこの方法でできるのですが今回は式が非常に複雑すぎるのでこの方法が使えません。（どうしても途中の計算式の結果を出す必要があり、そのデータは表に残せないため）

２度も回答していただいたのですが申し訳ありません。

回答No.2

taknt

まず、マクロの作成の仕方、実行の仕方は わかりますでしょうか？

それがわかれば、次にセルの値を取得。
計算。
セルに値をセットですね。

とりあえず、参考ＵＲＬの質問などを
参考にしてみてください。

参考URL：

http://www.ae.wakwak.com/cgi-bin/sbox/~efc21/wwwlng.cgi

回答No.1

arukamun

特定のセルに答えを出すだけであれば、マクロを使わずにワークシート関数で可能だと思います。

どのような計算をするのかを書いて頂けると回答しやすいのですが、補足して頂けますか。

補足

A# = H# ^ 3 / A1# / A2# / A3# * F3# / F4# + H# ^ 2 / A2# / A3# * F3# / F1# + H# / A3# * F3# / F2# + 1
B# = B1# * H# ^ 2 / A2# / A3# * FCa# * F3# / F6# + B2# * H# / A3# * FCa# * F3# / F5# + B3# * FCa# * F3# / F7#
P# = B#
Q# = A# - B# * TC# + B# * TP#
R# = -1 * A# * TC#
X1# = (-1 * Q# + Sqr(Q# * Q# - 4 * P# * R#)) / 2 / P#
X2# = (-1 * Q# - Sqr(Q# * Q# - 4 * P# * R#)) / 2 / P#
X3# = X1# * FCa#
ACa# = X3#

このようなことを３回計算して最後にログ計算です。
変数はTC#、TP#、H#であとは全部定数です。