駐車場の料金算出 ~ユーザー定義関数~

ユーザー定義関数

昨日書いた記事[駐車場の料金算出]なんですが、検証が甘く正確な数字にならない点がありました。考え方だけ・・・という形として記事は残しておきますが、計算式をそのまま使う事は止めてください。

そして今回ユーザー定義関数で作ってみました。

ユーザー定義関数



ユーザー定義関数の作り方を参考にしてください。

VBAコードは・・・



以下になります。

このコードをそのままモジュールにコピー&ペーストしてください。(データの入ったエクセルファイルのモジュールに)

29-1.jpg



使い方



使い方としては、セルに=Tyuusya(入庫時間,出庫時間,分込み計算の判定)となります。

29-2.jpg



分込みの判定とは・・・前回書いたように30分でも10分でも料金を計算するかどうかの判定です。

0、もしくは設定しないと時間単位(分を切り捨て)の算出

1に設定すると分も含めた算出になります。



それと、時間の設定や料金帯が変わった場合にも対応させる為、設定部分を作っております。

変更したい場合は—-設定-----内を変更すればOKです。



24時間駐車した場合の料金は

6:00~22:00→400円/h

22:00~6:00→ 70円/h

で計算すると6300円になったので6300円にしています。

コメントをどうぞ

メールアドレスが公開されることはありません。

  • ▼お小遣い稼ぎしませんか?月3万円稼げます!▼
    日々の生活にhappyをプラスする|ハピタス
    クレジットカード・FX口座を作るだけ
COLUMN XLSTART STDEV コピペ DATE VLOOKUP COUNTIF TODAY 目標 INDEX 日付 図形 バーコード 偏差値 条件付き書式 テンプレート 印刷 NA() クイズ ワイルドカード 検索 SUMIF 無料 作業効率UP HLOOKUP ユーザー定義関数 グラフ フロー図 MATCH SUM
  • 関西在住の30代サラリーマン。事務職で毎日Excelと戯れています。
    システム導入なんて資金が無い!Excelでなんとかやりたい零細中小の社長さん・事務員さんの力になればと思います。
    詳しいプロフィール


PAGE TOP ↑