Excelに詳しい方、お力いただければ幸いです。

アルゴリズムとしては、バックトラックを使用する性質の問題なのではないでしょうか？

迷路の解法と同じだと思います。

初めてなので、うまく投稿できたかな・・・？

ぜんぜん、ちがってたらすみません。

とくにVBAなどのマクロを使わずに

セル計算のみで作りました。＝の判定のためにIF関数は使ってます。でもこれは関数なのでVBAじゃないですよね？

というわけで　セル計算のみです。

ただし、経路がつながっているかどうかは判定していないので、つながってない経路分も表示はしてしまいます。（数値は影響しませんが）

また、オレンジを動かすこともできません。

ロジックなどは↑のページに書いておきました。

うぅ、初めてなので、とんちんかんな回答だったらすみません。

URLダミーです。

1)　オレンジの駅から始めて、

2)　上のセルに線路があるか見る。

　ある＞１駅進んで、着いた駅にフラグを立てる。通った線路にカウント＋１。

　ない＞何もせず。

3)　2)を右下左ともに繰り返す。以上で距離１駅の場合が終了。

4)　同様に距離２駅の駅を探し、フラグを立て、通った線路にそれぞれカウント＋１。

5)　距離を増やしながら繰り返し、フラグの立って無い駅が見つからなければ終了。

既にフラグの立った駅に着いた場合は何もしないこと。（短い他ルートがあるか、同距離で既に他のルートでカウントされたとみなされる）

思わず考えてしまったので、いちおう回答してみます。マクロはマニュアル見ながらでないと組めないので、マクロで実現できるか？とか、不備があるとか、もっと手っ取り早い方法があるとか、十分に考えられますが…。

簡単なアイディアだけです。

事前準備

１．目的地＝オレンジが一つだけかどうかのチェック。

２．孤立している（目的地につながっていない）〓‖がないかどうかのチェック。

３．最短経路を出すロジック。

　　これをどうするのかで論理がだいぶ変わってくるのでは。

　　縦優先か横優先か決めていいのなら、という前提で。

　　縦優先　->縦、横どちらからもいける場合、〓を消す。

４．探索ループ用セルの初期化

探索ループ

どこかに計算用のセルを準備する。

◎　のセルにはその◎につながっている〓‖の数

〓‖のセルには、〓‖そのものか、もしくはカウンタ

１．◎部分（座標軸によって全部検索）につながっている〓‖の数を埋める（上書）。

２．◎部分が1のセルだけ、その隣接する〓‖を、自分の４辺に隣接する数字を全部足し併せて、1を加えた数字にする

３．◎部分が1のセルの数字を0にする

４．◎部分が1以上のセルがなくなればループ終了処理

もう一度、1へ。

最後に残った ブランクの〓‖のセルに0を埋めていく。