質問: vbgreen end if end if
回答: ちょっとした疑問ですけど。 ・誰(何番目の人?)が何色になるのか? ・なぜ『select case』を条件としているのか?(ある意味人数分だけ『case ~』を必要とする事に意味があるのか?) ・仮定として『同じ名前の人が2回以上出てくる』事があるのか? 例えばcolorの配列を作成して任意の色を指定しておく。 出てきた順にcolor配列のインデックスを用いて色の塗分けをする。(countで人数を数えるとか打ち込んだ行番号を補正し利用するなど。)