Метод select для диапазона

[Чудик]

Ну почему для

Код: Выделить всё


With MyBook
.Sheets("Основное сырье - цех" & ns + 1).Range(.Cells(mm, 1), .Cells(EndLmd - 4, i)).Select
End MyBook


Выдает ошибку, что данный метод не применим?
В свое время я вычитал, что в качестве параметра для Range необходимо указывать значение типа String. До сих пор я придерживался этого и не имел проблем. Но сейчас у меня никак не получается преобразовать переменные в строковый параметр.
Вопрос - нельзя ли как-то это обойти, чтоб работало...

[GSerg]

Код: Выделить всё

End MyBook

Как тебе это удалось?

Код: Выделить всё

With MyBook.Sheets("Основное сырье - цех" & ns + 1)
  .Range(.Cells(mm, 1), .Cells(EndLmd - 4, i)).Select
End With

[Чудик]

Очепятка. Конец рабочего дня. Excuse me


Но вопрос остается.

[GSerg]

Мдя? А разве я не ответил?

[Igor_123]

Код: Выделить всё

With MyBook
.Sheets("Основное сырье - цех" & ns + 1).Range(.Cells(mm, 1), (.Cells(EndLmd - 4, i)).Select
End With

У книги нет метода Cells. поэтому нормальное сообщение

Конец рабочего дня. Excuse me

Только это и спасает от праведного гнева

[Чудик]

Да, с утра сообразил. Всех благодарю.