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

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

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

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

No.1 ベストアンサー 回答者： hallo-2007 回答日時： 2011/07/06 18:21

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,"""")"
と　””　をふたつにしてみてください。

この回答へのお礼

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

お礼日時：2011/07/06 18:47

No.2 回答者： mu2011 回答日時： 2011/07/06 18:24

２重引用符の数が問題です。

Range("C8:C42").Formula = "=IF(LEN(E8)>2,C7+1,"""")"