Excel 2007 VBA で実行時エラーが出る

質問

Excel 2007 VBA で下記の様に入力し、実行すると、
実行時エラー　１００４
　アプリケーション定義またはオブジェクト定義のエラーです。
と表示され、ストップしてしまいます。

' 登録番号を付ける
Range("C7").Value = 1
Range("C8:C42").Formula = "=IF(LEN(E8)>2,C7+1,"")"

初心者で、どうしても原因がわかりません。
教えて下さい、お願いします。

回答No.1

hallo-2007 · ベストアンサー

Range("C8:C42").Formula = "=IF(LEN(E8)>2,C7+1,"")"
の式ですが
””で文字列の区切りなのでRange("C8:C42").Formula = "=IF(LEN(E8)>2,C7+1,"
のところで区切られてしまうのです。
Range("C8:C42").Formula = "=IF(LEN(E8)>2,C7+1,"""")"
と　””　をふたつにしてみてください。

お礼

早速にありがとうございました。
また親切に、教えて頂き感謝しています。
７０歳のじいさんで、もう遅いとは思いますが、今後も勉強をしていきます。

回答No.2

mu2011

２重引用符の数が問題です。
Range("C8:C42").Formula = "=IF(LEN(E8)>2,C7+1,"""")"

お礼

ありがとうございました。
解決できました。
お礼が遅くなり申し訳ありませんでした。