Невозможно отладить «Ошибка удаления метода класса Range»

Question

Я пытаюсь удалить выбранные диапазоны и сдвинуть остальные ячейки вверх, но продолжаю зацикливаться на следующей ошибке

Ошибка времени выполнения «1004»:

Невозможно отладить "Ошибка удаления метода класса Range"

Я не вижу, что именно я делаю неправильно, буду признателен за любые указатели.

Mainfile = "Travelex Order.xls"
SecFile = "EURUSD.xls"
SheetOne = "Bulk Order"
SheetTwo = "EURUSD Breakdown"
SheetThree = "PDF Gen2"
SheetFour = "EURUSD"
SheetFive = "Rate Check"

Workbooks(Mainfile).Worksheets(SheetOne).Range("A23:C96").Copy
Workbooks(Mainfile).Worksheets(SheetFive).Range("A2").PasteSpecial Paste:=xlPasteValues

Count = 2

Do
    If Workbooks(Mainfile).Worksheets(SheetFive).Range("A" & Count).Value <> "" And Workbooks(Mainfile).Worksheets(SheetFive).Range("B" & Count).Value = "" And Workbooks(Mainfile).Worksheets(SheetFive).Range("C" & Count).Value = "" Then

        Workbooks(Mainfile).Worksheets(SheetFive).Range("A" & Count & ":C" & Count).Delete Shift:=xlToUp

    End If
    Count = Count + 1
Loop Until Count > 80

Я попытался сделать следующее изменение, но мне не повезло

Workbooks(Mainfile).Worksheets(SheetFive).Range("A" & Count & ":C" & Count).Delete Shift:=xlToUp

до

Range("A" & Count & ":C" & Count).Delete Shift:=xlToUp

Я всегда получаю сообщение об ошибке в этой строке.

Answer 1

Я испортил синтаксис, как прокомментировал Рори, это должно быть xlUp.