重要なお知らせ

「教えて! goo」は2025年9月17日(水)をもちまして、サービスを終了いたします。詳細はこちら>

電子書籍の厳選無料作品が豊富!

エクセルで見積書を作っていたのですが途中で単価が変わって全部9掛けの金額にしなければならなくなりました。もうすでにセルに入っている金額全てを9掛けの金額に一度にする方法はありますでしょうか?
宜しくお願いします。

A 回答 (4件)

こんにちは。

maruru01です。

本来は、単価をどこかのセルに入力しておき、金額の欄には、

=単価×個数

のような数式を入れておくものですが・・・
金額欄には直接数値が入力されている場合に9掛け(×0.9)する方法は以下の通り

・どこか関係ないセルに「0.9」と入力し、そのセルをコピーする
・9掛けしたいセルを、[Ctrl]や[Shift]を利用して全部選択する(何回かに分けてもいいけど)
・メニューの[編集]→[形式を選択して貼り付け]で、
 [貼り付け]:[値]にチェック
 [演算]:[乗算]にチェック
 と設定して、[OK]する
・全て終わったら、最初に「0.9」と入力したセルの内容は消去しても構わない

以上で出来ます。
    • good
    • 0
この回答へのお礼

遅くなって申し訳ございません。
簡単にすぐできました。ありがとうございました!

お礼日時:2003/11/06 15:05

ワークシートをコピーし新しく出来たワークシートの答えに9掛けすればどうですか?


現在の見積りのワークシートがsheet1だったらsheet1 にマウスポイントを持っていき→右クリック→移動またはコピーを選択→コピーを作成するにチェック→OKをクリック→sheet2が出来ます。
Sheet1の内容がそっくりコピー出来た筈ですので9掛したいセルの編集行で*0.9と入力し、下(右)にコピーするだけです。
もし9掛けがまた変更になる可能性があるようなら、関係のないセルにとりあえず0.9と入力しておいて9掛したいセルの編集行で*セル番地(とりあえず0.9と入力した番地)を絶対参照させておいて(セル番地入力後 f4キーをす)
こうしておけば仮に8掛けになったら0.9のところを0.8と入力するだけで一発でかわります。へたくそな説明でお分かりになりにくいかと思いますが・・・・・
    • good
    • 0
この回答へのお礼

ありがとうございました。ちょっと使いにくかったです…すいません…

お礼日時:2003/11/06 15:10

マクロを使えばよいと思います。



マクロ画面を開いて、
For I = 1 To YY '(YY = 対象の最後のセルまで)
Cells(I,XX)=val(Cells(I,XX)) * 9 '(XX = 対象セルの横向きの場所)
Next
と入力すればいいと思いますよ。

例えばセル1Bから16Bまでのデータを加算したいなら
For I = 1 To 16
Cells(I,2) = val(Cells(I,2)) * 9
Next
になります。
Office2000ならこれでいいはずですが、OfficeXPにも同じ構文で利用できるかは当方分かりかねます・・・。
近くにマクロが多少でも使える人がいれば聞いてみればどうでしょう。
    • good
    • 0
この回答へのお礼

ありがとうございます。しかし私あまりマクロがわからないものでわかりませんでした(*_*)

お礼日時:2003/11/06 15:08

見積書がどのような形式で作成されているかによって


簡単に出来るかどうかはわかりませんがワタシはこうやっていました
A列に元ネタがあったとして、
これを全てB列へコピーします
そしてA列の一番最初の行へ
B列のやはり同じ行のデーターを
0.9掛けてやります
例えばA1がそのセルだとすれば
「=B1*0.9」と入れます
あとはA1セルから最後のセルまでドラッグすればOKです
如何でしょうか?

これをやってから現在は掛け率等に対応できるように
あらかじめ設定を設けるようにしました
    • good
    • 0
この回答へのお礼

No1の方のようにしていましたのでちょっとこの方法は使いにくかったです…
でもありがとうございました。

お礼日時:2003/11/06 15:06

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!