переход от последней ячейки к первой

[vostok]

Добрый вечер всем. Хочу понять, как работает переход от последней выделенной ячейки к первой. Суть такая: на защищенном листе не защищены всего 3 ячейки (для ввода данных). Если по мере ввода выделять следующую ячейку мышкой, то все ОК, но если подтверждать ввод нажатием enter, то после 3-й ячейки, перед тем, как опять перейти в 1-ю, у меня комп задумывается слегка, а на тачке на 800 мГц (есть и такая еще) задумывается надолго, секунд на 8. Что он делает в это время? Перебирает все ячейки листа? Пробовал скрыть все нижние ненужные строки - не взлетело. Просто в это время ничего нельзя делать, а это неудобно. Может как-то кодом упростить ему переход в первую ячейку. Ячейки такие: B4,F4,I4.
Спасибо.
Хотя, провел сейчас эксперимент, создал новую книгу, снял защиту с 3-х ячеек, защитил лист, - и надо же, скачет, не задумывается, выходит, проблема в самой рабочей книге.

[Казанский]

Переход между незащищенными ячейками удобно делать с помощью Tab и Shift+Tab.
Если у Вас переход происходит по Enter, то, видимо, используется макрос, а макрос написан не оптимально.

[vostok]

Да нет, кода под Enter нет, только макросы на кнопках. Я пошел дальше: в рабочей книге последовательно удалил: макросы (модули), пару кодов, удалил другие листы, снял все обьединения ячеек, удалил все автофигуры и примечания, остался голый лист, но, - тормозит, собака! Я фшоке. Проблема, похоже, нерешаема.
А буков Tab и Shift+Tab нет как класса, используется ноутбучная клавиатура, кстати по Tab тоже задумывается.

ЗЫ Когда последовательно кастрировал рабочую книгу, не сохранял, но сейчас стоило сохранить, задумываться перестал, в итоге так и не знаю, что ему мешало...

[Казанский]

Этот макрос или в модуле листа

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

или в модуле книги

Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)

Можно было установить уровень безопасности средний и отключить макросы при открытии книги.

А ноутбуков без кнопки Tab я не видел.

[vostok]

Пардон, я имел в виду цифровую клавиатуру для ноутбуков
код есть такой в книге:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Cells.Count > 1 Then Exit Sub
If Not Intersect(Target, Range("F4:F6")) Is Nothing Then
With Target(1, 2)
.Value = Now
End With
End If
End Sub
Но его я удалял в ходе дознания, - не помогало, сейчас я все удалял с сохранением.
А макросы нужны для работы, для ввода внесенных данных, в основном, в длинющий список ниже, кстати, его когда полностью удаляю, тормозов нет, непонятно, в этом списке только столбец с условным форматированием и столбец с обьединенными ячейками, их я тоже пробовал расформатировать и разобьединить.