Assa_13, а что вы хотите получить то? Для чего все эти цифры?
Лучше с файлом примером, чтобы не гадать дальше, что это за переменные, которые безусловно влияют на данные: currentRow, qntCurrency, paperHeight

StepanWolkoff, попробую объяснить на коротком примере (см. Вложение).
У меня есть некий документ. Документ условно разделен на 4 части:

1. заголовок документа (строки 1-2)
   
2. заголовок таблицы (строка 3)
   
3. содержимое таблицы (строки 4-22)
   
4. подвал документа (строки 23-24)
   

Мне необходимо анализировать вмещается ли все содержимое табличной части вместе с подвалом на одном печатном листе, и если  не вмещается, то ставить бряк после строки которая поместилась, и далее скопировать заголовок после бряка. Таким образом, у меня на первом листе получается заголовок документа + заголовок таблицы + содержимое таблицы без последней строки, а на втором листе: скопированный заголовок таблицы + последняя строка + подвал документа.
Так вот в чем проблема: Допустим я анализирую 19-ю строку таблицы и она не помещается вместе с подвалом на одном печатном листе. Мне надо после 18 строки вставить бряк и скопировать после него заголовок. Таким образом на втором печатном листе у меня будет заголовок таблицы + последняя строка таблицы + подвал. Для 100 % все работает корректно. А например для 125% бывает так, что currentCoordinate например не для 19, а уже для 18 строки становится больше (из-за неправильного расчета) чем currentSheetEnd, хотя на самом деле 18-я строка все ещё помещается на печатном листе, не помещается только 19-я. То есть на первом листе получается меньше строк, чем на самом деле влезает.

The_Prist, ActiveWindow.Zoom меняет масштаб в самом Excel, а я говорю про изменение масштаба в винде: Разрешение экрана -> Изменение размера текста и других элементов