具体的には、 MID$(A$[D],I,1)と書いているところを 消して、その消したところに A$[D][I]と書いたら、OKです。