ポタン100個つけるならフォームは考えないでワークシートでselectionchangeでいいと思う