やっとマクロでのテキストボックスの読み書きが出来た