ＥＸＣＥＬ 送料を自動で計算したい

ＥＸＣＥＬで送料の計算表を作っています。

ドロップダウンリストで重量と発送方法を選択すると
自動で送料が計算できるようにしたいのですが、
何かよい方法はないでしょうか？


ＡＢＣ
重量発送方法　　　　送料
0.3kg定形外○○円
0.5kgゆうパック
1.0kgクロネコ
1.5kg佐川
2.0kg・
・・
・・
・

よろしくお願いいたします。

No.2 ベストアンサー 回答者： imogasi 回答日時： 2007/06/30 09:20

エクセルの関数だけでは、作成が難しいと思う。

VBAでやっても複雑になると思う。
（１）オプションがあり、取り入れると複雑化し、取り入れないと、利用者からそっぽを向かれる。オプションとは、速達にしたり、保険をかけたり、配達日指定したりとかと、いったものを言っている。
（２）社内他の方も共用で、実務の問題であろうが、正確でないと責任問題になる。
ーーー
私の一案で、よりエクセルに即して、骨組みだけのアイデアを上げてみます。
（１）HLOOKUPのTRUE型の利用
（２）HLOOKUP関数内で、範囲の名前の利用
（３）入力規則・リストを利用
ーーーーーーーーーー
シートを４つ作成し名前を
サービス・条件
定型
郵パ
佐川
とする
ーー
サービス・条件シートのH1セルに　=sn(ROW())と入れて下方向に式を複写する。
この関数はユーザー定義関数で、
ツールーマクローVBE
VBEの画面で挿入ー標準モジュール
そこへ下記を貼り付ける。
Function sn(n)
If n > Sheets.Count Then
sn = ""
Exit Function
Else
sn = Worksheets(n).Name
End If
End Function
シート名を取る関数です。
結果
サービス・条件
定型
郵パ
佐川
ーーー
サービス・条件
シートのA1にサービス名を選択
B1に重量や長さ数字をいれる。
C3は結果の料金が出て、式は=HLOOKUP(B1,INDIRECT(A1),2,1)を入れておく。
ーーー
A1の入力規則は
データー入力規則ーリスト
範囲は$H$1:$H$5
---
定型シートのA1:I2
重量50100150250500100020004000
料金1201402002403905808501150
ーーー
郵パシートのH1:H2
長さ6080100120140160170
料金5007009001000110012001500
ーーー
佐川シートのA1:I2
重量506080100120140180200
料金3006008009001000110012001300
ーーー
定型シートのB1:I2を指定して
挿入ー名前ー定義ー名前を「定型」にする。
郵パシートのB1:H2を指定して
挿入ー名前ー定義ー名前を「郵パ」にする。
佐川シートのB1:I2を指定して
挿入ー名前ー定義ー名前を「佐川」にする。
ーーー
操作
サービス・条件シートを開く。
Ａ１をクリック。ドロップダウンから、佐川を選択。
Ｂ１に130を入力。
結果Ｃ１に１０００と出る。
ーーー
上記例は全て架空例です。ざっとアイデアだけを検証したのみなどで、表の重量と価格対応も１コマずれているかもしれないので修正すること。
多様なオプションを加えるには、工夫がいる。今のところ関数では良いアイデアなし。

この回答へのお礼

ご丁寧にありがとうございます。
じっくり読んでみます。

お礼日時：2007/06/30 11:12

No.1 回答者： redowl 回答日時： 2007/06/29 18:41

条件が足りないのでは？

発送場所が？？？　と、お届け地域が？？？
物品のサイズも・・・

下記でシミュレーションして、完成した計算表のチェックを・・・。
http://www.shipping.jp/search.html

この回答へのお礼

ありがとうございます。
分かりやすく説明しようと思って項目を省きましたが入れたほうが良かったですね。
発送場所とお届け地域も選択して、自動で送料を出したいです。
よろしくお願いいたします。

お礼日時：2007/06/29 18:44