この関数式の改良法について教えてください。

質問

旅費精算の事務をしているものでして、以下のような状況で急行券の代金を算出するために次の関数式を作りました。

H22繁忙・閑散：日にちが行でグループ分けして書いてあります。
運賃表：繁閑によってプラス200、マイナス200の調整をする駅の名称、路程、乗車賃、急行券等が書いてあります。
運賃表(2)：繁閑によってプラス400、マイナス400駅の名称、路程、乗車賃、急行券等が書いてあります。
I列：出発日です。
L列：到着駅です。

=IF(I5="","",IF(COUNTIF(H22繁忙・閑散!$A$1:$H$24,I5)>=1,IF(COUNTIF(運賃表!$A$2:$N$286,L5)>=1,VLOOKUP(L5,運賃表!$A$2:$N$286,5,0)-200,IF(COUNTIF(運賃表(2)!$A$2:$N$286,L5)>=1,VLOOKUP(L5,運賃表(2)!$A$2:$N$286,5,0)-400,"")),IF(COUNTIF(H22繁忙・閑散!$A$25:$H$46,I5)>=1,IF(COUNTIF(運賃表!$A$2:$N$286,L5)>=1,VLOOKUP(L5,運賃表!$A$2:$N$286,5,0),IF(COUNTIF(運賃表(2)!$A$2:$N$286,L5)>=1,VLOOKUP(L5,運賃表(2)!$A$2:$N$286,5,0),"")),IF(COUNTIF(H22繁忙・閑散!$A$47:$H$67,I5)>=1,IF(COUNTIF(運賃表!$A$2:$N$286,L5)>=1,VLOOKUP(L5,運賃表!$A$2:$N$286,5,0)+200,IF(COUNTIF(運賃表(2)!$A$2:$N$286,L5)>=1,VLOOKUP(L5,運賃表(2)!$A$2:$N$286,5,0)+400,""))))))

この関数でできることを変えずに、短くすることはできるでしょうか？
そして、2列に分けて処理せずにこの関数式から出された数字が200以下だった場合に、算出しているセルに何も表示させないようにするには、どうすればいいでしょうか？
officeのバージョンが2003なのでこれ以上長くするのには限界があるのです。（上記関数式（ここではAAAとします。）とすると、
IF(AAA<200,"",AAA)というような感じで入力しようとしましたが、長すぎてだめでした。）

詳しい方、アドバイスお願いいたします。

回答No.3

grumpy_the_dwarf

まず、運賃表を二つに分けるのをヤメます。で、運賃表にO列を新設
して、200または400と書いておきます。この列に、繁忙期は1、閑散
期は-1、通常期は0をかけ算して足せばいいわけですね。

で、繁忙・閑散表が適切に作ってあれば、countifの結果は0か1にし
かなりません。かけ算のためのパラメータは
=COUNTIF(H22繁忙・閑散!$A$1:$H$24,I5)-COUNTIF(H22繁忙・閑散!$A$47:$H$67,I5)
で求められます。

さらに、空白を返す条件(日付が入力されてない or 到着駅が運賃表
に載ってない)のチェックをまとめます。

=if(I5*countif(運賃表!$A$2:$O$286,L5),
vlookup(L5,運賃表!$A$2:$O$286,5,0)
+vlookup(L5,運賃表!$A$2:$N$286,15,0)*(countif(H22繁忙・閑散!$A$1:$H$24,I5)-countif(H22繁忙・閑散!$A$47:$H$67,I5)),
"")

こんな雰囲気になりますね。

お礼

ありがとうございます。

しかし、
=if(I5*countif(運賃表!$A$2:$O$286,L5),
vlookup(L5,運賃表!$A$2:$O$286,5,0)
+vlookup(L5,運賃表!$A$2:$N$286,15,0)*(countif(H22繁忙・閑散!$A$1:$H$24,I5)-countif(H22繁忙・閑散!$A$47:$H$67,I5)),
"")
が理解できませんでした。

=COUNTIF(H22繁忙・閑散!$A$1:$H$24,I5)-COUNTIF(H22繁忙・閑散!$A$47:$H$67,I5)
の部分も理解できません。

意味を教えていただけるとありがたいです。