[Iska]

Гм. Если добавить перед этой строкой такой код:

Код:

Debug.Print .ScaleHeight
Debug.Print .ScaleWidth
Debug.Print "---"

и попробовать исполнить вновь — что будет написано в окне отладки?