文字列を抜きとるにはMID$を使いましょう。 あと文字列を数字に代えるVALもセットで。 A$="00407502100329" LEVEL=VAL(MID$(A$,0,3)) HP=VAL(MID$(A$,3,3)) MP=VAL(MID$(A$,6,3)) MONEY=VAL(MID$(A$,9,5)) こんな風に1本のテキストを1つ1つほぐすことが出来ますよ。