Excelにある住所録の都道府県名の有無のみを調べたいのですが･･･ =IF(ISERROR(FIND("*都*",A1))=TRUE,"都","") などで4列にそれぞれの関数を入れて｢都｣｢道｣｢府｣…

Excelにある住所録の都道府県名の有無のみを調べたいのですが･･･
=IF(ISERROR(FIND("*都*",A1))=TRUE,"都","")
などで4列にそれぞれの関数を入れて｢都｣｢道｣｢府｣｢県｣を見つけることはできましたが､
4列全てをﾁｪｯｸする必要があることと
｢宇都宮市｣｢別府市｣のようなものも拾ってしまうことがあるので
一気に都道府県名が含まれているもののみを調べられたらと思っております｡
47都道府県名ﾘｽﾄを元に検索がかけられたら･･･と思い､いろいろ試してみましたが
うまく機能しませんでした｡
恐れ入りますが､どなたか教えていただけませんでしょうか？

=IF(AND(
ISERR(FIND($D$2,A2)),
ISERR(FIND($D$3,A2)),
ISERR(FIND($D$4,A2)),
ISERR(FIND($D$5,A2)),
ISERR(FIND($D$6,A2)),
ISERR(FIND($D$7,A2)),
ISERR(FIND($D$8,A2)),
ISERR(FIND($D$9,A2)),
ISERR(FIND($D$10,A2)),
ISERR(FIND($D$11,A2)),
ISERR(FIND($D$12,A2)),
ISERR(FIND($D$13,A2)),
ISERR(FIND($D$14,A2)),
ISERR(FIND($D$15,A2)),
ISERR(FIND($D$16,A2)),
ISERR(FIND($D$17,A2)),
ISERR(FIND($D$18,A2)),
ISERR(FIND($D$19,A2)),
ISERR(FIND($D$20,A2)),
ISERR(FIND($D$21,A2)),
ISERR(FIND($D$22,A2)),
ISERR(FIND($D$23,A2)),
ISERR(FIND($D$24,A2)),
ISERR(FIND($D$25,A2)),
ISERR(FIND($D$26,A2)),
ISERR(FIND($D$27,A2)),
ISERR(FIND($D$28,A2)),
ISERR(FIND($D$29,A2)),
ISERR(FIND($D$30,A2)),
ISERR(FIND($D$31,A2)),
ISERR(FIND($D$32,A2)),
ISERR(FIND($D$33,A2)),
ISERR(FIND($D$34,A2)),
ISERR(FIND($D$35,A2)),
ISERR(FIND($D$36,A2)),
ISERR(FIND($D$37,A2)),
ISERR(FIND($D$38,A2)),
ISERR(FIND($D$39,A2)),
ISERR(FIND($D$40,A2)),
ISERR(FIND($D$41,A2)),
ISERR(FIND($D$42,A2)),
ISERR(FIND($D$43,A2)),
ISERR(FIND($D$44,A2)),
ISERR(FIND($D$45,A2)),
ISERR(FIND($D$46,A2)),
ISERR(FIND($D$47,A2)),
ISERR(FIND($D$48,A2))
),"","有")

B2 のｾﾙに､以下のように式を入力｡

=IF(SUMPRODUCT(COUNTIF(A2,"*"&$D$2:$D$48&"*")),"有","")

んで､下にｺﾋﾟｰです｡