VBAについて、シートの指定行以下を全削除したいです

Question

前提・実現したいこと

指定行以下の行を全削除したいです。

発生している問題・エラーメッセージ

型が一致しません

該当のソースコード

 Dim R As Variant
 R = Range("C1").Value
 Rows(R & ":" & Cells.Rows.Count).Delete

試したこと

補足情報（FW/ツールのバージョンなど）

C1セルに、指定行が入力されています。
宜しくお願いします。

Comments

[itagagaki]

試してみたらエラーは出ず動きましたよ。
エラーは別の場所で起こっているのでは？

[choco_fashioned]

回答ありがとうございます。
おっしゃる通り、ワークシートの方に問題がありました。お手数おかけしました。

Answer 1

Rows(R & ":" & Rows.Count).Delete Shift:=xlUp

Answer 2

EntireRow を使うと安定して動作すると思います。

'Rows(R & ":" & Cells.Rows.Count).Delete
Rows(R & ":" & Rows.Count).EntireRow.Delete

Answer 3

初めまして。
Rowsが範囲を掴めていないようです。
以下のコードに置き換えでどうでしょうか。

 'Rows(R & ":" & Cells.Rows.Count).Delete
 Range(Cells(R, 1), Cells(Rows.Count, Columns.Count)).Delete