Здесь показаны различия между выбранной ревизией и текущей версией данной страницы.
ru:creating_user_reports:use_macros_in_reports:examples:typelink_with_subject [2014/03/04 11:20] barinova |
ru:creating_user_reports:use_macros_in_reports:examples:typelink_with_subject [2018/04/09 15:33] (текущий) |
||
---|---|---|---|
Строка 38: | Строка 38: | ||
После окончания переноса всех типов связей удалить столбец "Тип связи" и поправить таблицу к обычному виду. | После окончания переноса всех типов связей удалить столбец "Тип связи" и поправить таблицу к обычному виду. | ||
- | <code vb> | + | <code> |
Sub ПослеВыполненияОтчета(ob As Variant, app As Variant) | Sub ПослеВыполненияОтчета(ob As Variant, app As Variant) | ||
Строка 175: | Строка 175: | ||
countCharClean = 2 ' кол-во символов для удаления | countCharClean = 2 ' кол-во символов для удаления | ||
- | If Len(CellText) > countCharClean Then 'если символов больше чем будем удалять | + | If Len(CellText) > countCharClean Then 'если символов больше, чем будем удалять |
'убираем последние символы (для текста ячейки - это чистый текст) | 'убираем последние символы (для текста ячейки - это чистый текст) | ||
Строка 199: | Строка 199: | ||
+ | |||
+ | |||
+ | |||
+ | |||
+ | |||
+ | |||
+ | |||
+ | [<contextnavigator>] | ||