「岡山市 区名挿入 ＶＢＡ」その３以降、（さ）さまのを参考にさせていただきながら、自分でもがいてみました。ということでできあがり、テストも順調でした。
区名町名対照データ：
「ゆうすけ」の岡山市 政令指定都市対応 新区の分類 >> http://yuusuke.info/33/N33100.htm
ＶＢＡ、およその手順：
１：区名町名対照データをネットから引っ張ってきて、エクセルのシート上に展開
２：ＶＢＡを以下の考え方で対照し、必要なら書き換え元セルを書き直す。
２−０：区名町名対照データを配列に読み込む
２−１：被検索行政区町名をセルからよみこむ
２−２：「岡山市」を含んでいれば次へ （InStr）
２−３：「南区」などのように既に町名に区名を書き加えてあるものを対象からはずす
２−４：被検索行政区町名を、岡山市までのところで２分割し、配列に入れる
２−５：区名町名対照データと被検索行政区町名データを対照し、合致すれば、区名を得る
２−６：得た区名を、２分割した被検索行政町名の間にはさみこみ、エクセルのセルに書き込む
２−８：「児島郡灘崎町」のように旧郡で入力してある被検索町名データのセルを書き直す（例：児島郡灘崎町->岡山市南区灘崎町）
２−９：以上をひとまとまりとして、２−１に返ってすべての被検索町名対象データを書き直して終了
