taguti 52
のように名前を1列目、スコアを2列目にしました。一応できたのですがnext縛りというかなんというか、for文で数字だけとって、foreachで要素をとりたかったです。

sub name_score()
  dim names as variant
  names = array("taguti", "fkoji", "sugimoto", "tanaka", "higasi", "sajio", "kojima", "midori", "kobayasi")
  dim scores as variant
  scores = array(52,82,99,32,48,62,72,58,59)
  for i = 0 to 8
    cells(i + 1, 1).value = names(i)
    cells(i + 1, 2).value = scores(i)
  next i
end sub
###pythonのイメージ###
for i in range(1, 9):
    for name in names:
        cells(i, 1).value = name

pythonみたいな二重ループはVBAではできないのでしょうか?