新しく質問する

エクセルでの入力金額を500円単位で繰り上げる方法

役に立った:1件
  • 質問者:an4921
  • 投稿日時:2008/02/26 20:26
  • 困り度:すぐに回答が欲しいです
  • 友達に紹介
  • ブログに書く
  • 教えて!gooお気に入り

エクセルで入力されている数字(金額)を500円単位で繰り上げる方法を教えていただけないでしょうか?

【例(1)】
10,001円→10,500円  
【例(2)】
10,499円→10,500円
【例(3)】
10,501円→11,000円 
【例(4)】
10,999円→11,000円

A1に数字を入力しています。
可能であれば、最終的にはA列に数字を入力すれば、変換されていく形がベストです。
新たにB列に結果を出すというのは避けたいのですが・・・

宜しくお願いします。

この質問への回答は締め切られました。
このQ&Aは役に立ちましたか?(役に立った:1件)
  • 参考になった:0件
  • 回答者:marbin
  • 回答日時:2008/02/26 20:35

VBAで↓が使えるようです。

WorksheetFunction.Ceiling

通報する

  • 参考になった:0件

No.4ベストアンサー20pt

  • 回答者:mshr1962
  • 回答日時:2008/02/26 20:35

方法は2つ
基準値で切り上げ(正の数値のみ対応)
=CEILING(A1,500)
倍にして千円単位で切り上げて2で割る
=ROUNDUP(A1*2,-3)/2

※CEILINGでA1に負の値(A1<0)の可能性がある場合は
=CEILING(A1,SIGN(A1)*500)
で対応できます。

通報する

この回答へのお礼

負の値がある場合の事も考えていただきまして、
ありがとうございます。

きっとそういう疑問を持っている方もいらっしゃる
と思いますので、良回答に選ばさせていただきました。

  • 参考になった:0件
  • 回答者:zap35
  • 回答日時:2008/02/26 20:32

=CEILING(A1,500)

通報する

  • 参考になった:0件
  • 回答者:marbin
  • 回答日時:2008/02/26 20:32

>可能であれば、最終的にはA列に数字を入力すれば、変換されていく形がベストです。

ユーザー定義書式で出来るのかもしれませんがわかりません。
VBAなら可能です。
シートのChangeイベントを使います。

通報する

  • 参考になった:0件

No.1ベストアンサー10pt

  • 回答者:marbin
  • 回答日時:2008/02/26 20:29

CEILING関数を使います。

=CEILING(A1,500)

参考までに
FLOOR関数も調べてみてください。

通報する

この回答へのお礼

素早い返答ありがとうございました!!

  
このQ&Aは役に立ちましたか?(役に立った:1件)

このページのトップへ

Facebook公式ページ

公式Twitter