Ознаки
Під час використання властивості розташування або розташування. адреса вертикальних або горизонтальних розривів сторінок у макросі Microsoft Visual Basic для застосунків може з'явитися таке повідомлення про помилку:
Помилка під час запуску "9": підрядковий символ із діапазону
Причина
Ця проблема може виникнути, якщо виконуються такі умови:
-
Активна вона знаходиться над горизонтальною розривом сторінки або ліворуч від розриву вертикальної сторінки, яка посилається на індекс hpagebreaks або vpagebreaks .
-
Розташування вертикальної або горизонтальної сторінки не відповідно до екрана праворуч від видимого вікна або під видимому вікном книги.
-
Макрос програми Visual Basic для застосунків використовується в програмі Microsoft Excel подібно до такого коду:
Sub TestHorizontal() ActiveSheet.Range("CZ1000").Value = 1 MsgBox ActiveSheet.HPageBreaks.Count MsgBox ActiveSheet.HPageBreaks(1).Location.Address MsgBox ActiveSheet.HPageBreaks(2).Location.AddressEnd Sub Sub TestVertical() ActiveSheet.Range("CZ1000").Value = 1 MsgBox ActiveSheet.VPageBreaks.Count MsgBox ActiveSheet.VPageBreaks(1).Location.Address MsgBox ActiveSheet.VPageBreaks(2).Location.Address MsgBox ActiveSheet.VPageBreaks(3).Location.AddressEnd Sub
Інші способи вирішення
Корпорація Майкрософт надає приклади програмування тільки для ілюстрації, без гарантій або неявних. Це включає в себе, але не обмежується, неявні гарантії товарної придатності або придатності для певної мети. У цій статті припускається, що ви знайомі з мовою програмування, що відображається, і з інструментами, які використовуються для створення та налагодження процедур. Інженери служби підтримки Microsoft можуть допомогти пояснити функціональність певної процедури, але вони не модифікують ці приклади, щоб надати додаткову функціональність або сконструювати процедури відповідно до конкретних вимог. Щоб уникнути цієї проблеми, додайте код, щоб виділити останню, що використовується на аркуші, перш ніж код використовує властивість розташування горизонтальної або вертикальної розривів сторінок. Наприклад, використовуйте наведений нижче код, щоб виділити кінцеву, використовуючи властивість розташування , а потім повторно вибрати вихідну активну.
Sub CheckPageBreaks() 'Set object "currcell" equal to active cell. Set currcell = ActiveCell 'Select the last cell on the worksheet that has data. Range("IV65536").Select 'Include code with Location property here. x = ActiveSheet.HPageBreaks(2).Location.Address MsgBox x 'Example sets x equal to address of second horizontal page break. 'Then message box displays the address of the page break. 'Select original active cell. currcell.SelectEnd SubЯкщо властивість розташування обчислюється, ви можете знову вибрати вихідну активну камеру. Якщо ви використовуєте код, щоб прокрутити першу та останню, або виділити останню, а потім знову вибрати початкову, цю помилку все одно може відбутися. Екран має перемальовуватися, а властивість розташування обчислюється для ефективного вирішення. Якщо ви використовуєте наведений вище код з
Application.ScreenUpdating = False
для запобігання перемальовування екрана проблема все ще виникає.
Стан
Корпорація Майкрософт підтвердила, що це проблема в продуктах Microsoft, перелічених у розділі "застосовується до".
Додаткові відомості
Якщо використовується метод Count із властивістю vpagebreaks або hpagebreaks , ви можете отримати результат нуля. Ця дія виникає в розділі "причина". Якщо розрив сторінки видимий, метод Count може дати належну відповідь. Метод Count для вертикальних або горизонтальних розривів сторінок може дати очікуваний результат, якщо розрив сторінки розташовано поруч із видимою частиною вікна книги. Спосіб вирішення, наданий раніше, можна використовувати для отримання очікуваної кількості очікуваних значень. Розриви сторінок, розташовані праворуч від вікна книги або під вікном книги, можуть ввімкнути метод Count для роботи та розрив сторінки, якщо відстань від вікна до розриву сторінки становить менше однієї половини відстані між розривами сторінок.
Посилання
Щоб отримати докладні відомості про помилки трепінгу в макросі, клацніть цей номер статті, щоб переглянути статтю в базі знань Microsoft Knowledge Base:
213637 Використання функції "помилка" для обробки помилок у макросі
