【Excel】消費税計算の数式を登録できませんか？

質問

Excel2003を使用しています。
消費税の計算をする際、例えばA1に税込の数値がある場合は[=A1*0.05/1.05]と数式を入力して画面上で計算しています。
消費税の数式を入力するセルの位置が一定なので、これを利用してマクロをボタンに登録して押したら呼び出す設定のような感じで、消費税の数式を登録できないでしょうか？
セルの位置が一定とは、A3セルに数値が入っていたら、斜め下のB4セルに[=A3*0.05/1.05]、A10セルに数値が入っていたら、同じく斜め下のB11セルに[=A10*0.05/1.05]と入力するのですが、可能でしょうか？
もし、マクロを使用することで可能であれば、参考までに例を示していただけるとありがたいです。よろしくお願いします。

回答No.4

hana-hana3 · ベストアンサー

通常は記入欄（列）が固定ならコピーすれば対象セルが自動的に変化します。

ＶＢＡで行うなら下記のような文になります。
ActiveCell.Offset(1, 1).Formula = "=" & ActiveCell.Address(False, False) & " * 0.05/1.05"

お礼

回答ありがとうございます。
教えていただいたものを参考にマクロでやってみたところ、うまくいきました。お世話になりました。

回答No.5

Wendy02

こんにちは。

>もし、マクロを使用することで可能であれば、参考までに例を示していただけるとありがたいです。
使い勝手は、保証はできませんが……。

コントロールツールのボタンにつけた場合。

Private Sub CommandButton1_Click()
'税込みの消費税を取り出す
With ActiveCell
If VarType(.Value) = vbDouble Then
　 .Offset(1, 1).FormulaLocal = "=TRUNC(R[-1]C[-1]*0.05/1.05)"
End If
End With
End Sub

お礼

Wendy02さん、お世話になっております。
以前、教えていただいたことも参考にして、個人用マクロブックへ登録しました。
回答ありがとうございました。

回答No.3

ebikichi

B4をコピーし、B5から下へず～っとドラッグしてペーストしてください

お礼

回答ありがとうございます。
ある範囲の計に対して消費税を計算したりするので、必要なときだけ消費税の計算式をボタンを押すような簡単な操作で呼び出すように設定することができれば…と思い、質問させていただきましたので、今回に関してはコピペ以外の方法を考えています。
説明不足で申し訳ありません。

回答No.2

ysko614

まず、マクロの登録をしましょう。
まず、A3のセルを選択している状態で、
メニューの[ツール]から[マクロ]で、[新しいマクロの記録]を選択します。※マクロ名は適当でかまいません。
画面上に小さなマクロの記録というツールバーが表示されますが、ここでは記録の終了の隣の相対参照・絶対参照の切り替えボタンをクリックして、相対参照にします。これをする事によって設定する場所が常に変わります。
その上で、A3からB4のセルに移動し、[=A3*0.05/1.05]と式を入力します。これで記録の終了ボタンを押して下さい。
後は、設定したい場所のあるセルをクリックして、マクロを実行し、斜め右側のセルに式が入るのをご確認下さい。
マクロの記録の際に相対参照にするのがポイントです。ご確認くださいませ。

お礼

マクロの記録は今までにも使ったことがありますので試してみます。
ありがとうございました。

回答No.1

takase_000

A3に入力されるとB4に結果が表示されるわけですよね。
ということであれば、B4のセルを普通にコピーして、計算結果を表示したいエリアに貼り付けると自動的に式の内容も変化し、貼り付けられます。
例えば、
B5に貼り付けると[=A4*0.05/1.05]、
B6に貼り付けると[=A5*0.05/1.05]といった具合です。

お礼

回答ありがとうございます。
ある範囲の計に対して消費税を計算したりするので、必要なときだけ消費税の計算式をボタンを押すような簡単な操作で呼び出すように設定することができれば…と思い、質問させていただきましたので、今回に関してはコピペ以外の方法を考えています。
説明不足で申し訳ありません。