>>439
B2、B3・・・としたいなら

For b = 2 to 9
  (略) Formula1:="=IF(A2="""",A2,B" & b & ")"
Next

みたいにすればB2〜B9になる

本筋とは関係ないけどIFでA2が""の時A2を返すのってなんか無駄っぽい