投稿/コメントを表示します。

1行にリストアップするポイントは
gyosha = gyosha & ","& Range("A"&gyo).value
のようにすると”A"&gyo の値が","で区切られたリストとなる。
2017/10/12 07:00