Bazaprogram.ru

Новости из мира ПК
6 просмотров
Рейтинг статьи
1 звезда2 звезды3 звезды4 звезды5 звезд
Загрузка...

Инкремент в excel

Инкремент в excel

Модератор форума: _Boroda_, Manyasha, SLAVICK, китин
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Инкремент ячейки при печати (Формулы/Formulas)

Инкремент ячейки при печати

blancoДата: Пятница, 10.03.2017, 23:05 | Сообщение № 1

Доброго времени суток, вопрос новичка, только взялся за VBA, до этого изучал JS, PHP, Ruby нигде не было такого затупа. Наверняка проблема тупейшая.

Мне нужно просто инкрементировать число в одной ячейке при печати файла. Узнал что это делается с помощью:
[vba]

Я короче не понимаю, то ли я дурак, то ли у VBA какая-то своя «особая» логика. Помогите понять, что я делают не так. На всякий случай файл прилагаю. Спасибо заранее.

Доброго времени суток, вопрос новичка, только взялся за VBA, до этого изучал JS, PHP, Ruby нигде не было такого затупа. Наверняка проблема тупейшая.

Мне нужно просто инкрементировать число в одной ячейке при печати файла. Узнал что это делается с помощью:
[vba]

Я короче не понимаю, то ли я дурак, то ли у VBA какая-то своя «особая» логика. Помогите понять, что я делают не так. На всякий случай файл прилагаю. Спасибо заранее. blanco

Сообщение Доброго времени суток, вопрос новичка, только взялся за VBA, до этого изучал JS, PHP, Ruby нигде не было такого затупа. Наверняка проблема тупейшая.

Мне нужно просто инкрементировать число в одной ячейке при печати файла. Узнал что это делается с помощью:
[vba]

Я короче не понимаю, то ли я дурак, то ли у VBA какая-то своя «особая» логика. Помогите понять, что я делают не так. На всякий случай файл прилагаю. Спасибо заранее. Автор — blanco
Дата добавления — 10.03.2017 в 23:05

Perfect2YouДата: Пятница, 10.03.2017, 23:36 | Сообщение № 2

[/vba]
будет работать по событию, только если он размещен в коде книги, а не в модуле. В проекте VBA правой клавишей по книге (левый верхний угол окна) и «View code».

Что касается функции. Если ее вызывать из макроса — сработает. А вот при вызовах из ячеек, видимо, изменение других ячеек блокируется.

[/vba]
будет работать по событию, только если он размещен в коде книги, а не в модуле. В проекте VBA правой клавишей по книге (левый верхний угол окна) и «View code».

Что касается функции. Если ее вызывать из макроса — сработает. А вот при вызовах из ячеек, видимо, изменение других ячеек блокируется. Perfect2You

[/vba]
будет работать по событию, только если он размещен в коде книги, а не в модуле. В проекте VBA правой клавишей по книге (левый верхний угол окна) и «View code».

Что касается функции. Если ее вызывать из макроса — сработает. А вот при вызовах из ячеек, видимо, изменение других ячеек блокируется. Автор — Perfect2You
Дата добавления — 10.03.2017 в 23:36

blancoДата: Суббота, 11.03.2017, 00:52 | Сообщение № 3

На счёт события я кажется понял, значит объект события находится в книге а не в модуле и его видимость ограничивается только книгой. Был бы признателен если бы ещё и почитать что нибудь дали на эту тему =) и вообще, посоветуйте хорошую литературу, для новичков в VBA но знакомых с программированием.

А на счёт блокировки изменений других ячеек не пойму, это как-то можно обойти, и от чего зависит?

На счёт события я кажется понял, значит объект события находится в книге а не в модуле и его видимость ограничивается только книгой. Был бы признателен если бы ещё и почитать что нибудь дали на эту тему =) и вообще, посоветуйте хорошую литературу, для новичков в VBA но знакомых с программированием.

А на счёт блокировки изменений других ячеек не пойму, это как-то можно обойти, и от чего зависит? blanco

Сообщение На счёт события я кажется понял, значит объект события находится в книге а не в модуле и его видимость ограничивается только книгой. Был бы признателен если бы ещё и почитать что нибудь дали на эту тему =) и вообще, посоветуйте хорошую литературу, для новичков в VBA но знакомых с программированием.

А на счёт блокировки изменений других ячеек не пойму, это как-то можно обойти, и от чего зависит? Автор — blanco
Дата добавления — 11.03.2017 в 00:52

Perfect2YouДата: Суббота, 11.03.2017, 20:07 | Сообщение № 4

А смысл обходить? Если в ячейку вводится функция (UDF), то ее задача получить значение, которое будет выведено в этой ячейке. Другие ячейки могут использоваться как поставщики данных, но менять-то их зачем? Там свое, функции опять же быть могут. Так что вполне логичная блокировка, на мой взгляд.

А обойти — запускайте из программы VBA. Проверил, при запуске из программы VBA этой функции требуемый инкремент произошел.

А смысл обходить? Если в ячейку вводится функция (UDF), то ее задача получить значение, которое будет выведено в этой ячейке. Другие ячейки могут использоваться как поставщики данных, но менять-то их зачем? Там свое, функции опять же быть могут. Так что вполне логичная блокировка, на мой взгляд.

А обойти — запускайте из программы VBA. Проверил, при запуске из программы VBA этой функции требуемый инкремент произошел. Perfect2You

Сообщение А смысл обходить? Если в ячейку вводится функция (UDF), то ее задача получить значение, которое будет выведено в этой ячейке. Другие ячейки могут использоваться как поставщики данных, но менять-то их зачем? Там свое, функции опять же быть могут. Так что вполне логичная блокировка, на мой взгляд.

А обойти — запускайте из программы VBA. Проверил, при запуске из программы VBA этой функции требуемый инкремент произошел. Автор — Perfect2You
Дата добавления — 11.03.2017 в 20:07

Несколько советов по работе с VBA в Excel


Добрый день!

Некоторое время назад меня попросили «помочь с Экселем», а потом и работа подвернулась такая, так что за последние пару месяцев я узнал много полезного, чем и хочу поделиться в догонку к недавней статье.

Предполагается, что вы знаете основы Visual Basic. Я не буду рассказывать, как создавать формы или модули, здесь только примеры кода.

Visual Basic

Опции

Во-первых, в VB массивы могут начинаться с индекса 1, что для многих странно, поэтому в начале модулей можно прописывать:

Так же рекомендуется прописать:

В этом случае интерпретатор потребует заблаговременного объявления всех переменных. Переменные объявлять нужно потому, что:
— VB запомнит их нАпиСание и не будет исправлять во всём коде на последний введенный вариант;
— иногда возникают ошибки с передачей переменных byRef, если они не объявлены (то есть надо или объявить переменную, или приписать в функции/процедуре перед ней byVal).

Ещё одним важным оператором является ON ERROR. Привожу варианты:

Возможности языка

Хотя VB довольно прост, полезно почитать документацию по его синтаксису. Я, например, с удивлением узнал, что можно прописывать сложные усолвия в SELECT’ах (аналог switch):

Ускорение работы макросов

Часто макросы требуют долгого времени выполнения, которое можно значительно сократить. В начале и в конце каждой ресурсоёмкой функции вызвать Prepare и Ended.

По порядку:
1. Отключить перерисовку объектов на экране, чтобы ничего не мигало.
2. Выключить расчет. Внимание, если макрос прерваляс посреди работы, то расчет так и останется в ручном режиме!
3. Не обрабатывать события.
4. Отображение границ страниц, тоже почему-то помогает.
5. В статусной строке выводятся различные данные, что замедляет работу, отключаем.
6. Это если нужно. Выключает сообщения Экселя. Например, мы делаем Workbook.Close, Эксель хочет спросить сохранить ли изменения. При выключении этого параметра все ответы будут даны автоматически (изменения не сохранятся).

Важно понимать, что VBA выполняет все действия так же, как и пользователь. Поэтому для того, чтобы установить параметры страницы, он каждый раз открывает и закрывает окно параметров. У меня выставлялись параметры для 10 листов, это реально не быстро. Поэтому делаем так:

Далее, часто нужно просмотреть различные диапазоны ячеек и что-то с ними сделать. Тут важно не использовать циклы for с перебором индексов, они медленные. Можно использовать встроенные функции Экселя, но удобнее всего такой вариант:
Данный код просматривает указанный диапазон, выбирает в нем «специальные ячейки», в данном случае все, в которых есть формулы (т.е. начинаются со знака равно). Для каждой ячейки смотрится, если она не закрашена, то её надо защитить (см. далее) и покрасить. Такой код работает очень быстро.

Для любых переменных, которым вы собираетесь присвоить книгу, лист, диапазон (ячейку) нужно предварительно объявить как Variant.

Естественно, что если вам нужны однотипные значения в ячейках, нужно использовать автозаполнение, всё равно как «растягивание» ячеек пользователем.

Второй диапазон должен включать первый, а второй необязательный параметр указывает тип автозаполнения.

Загрузка книги и события

При открытии книги каждый раз срабатывает процедура.
В данном случае настройки печати (поля, ориентация) сбрасываются на дефолтные. Можно и другую инициализацию выполнять. Важно, что если макросы отключены, то и не выполнится ничего. Если в Экселе вылезла вверху панелька с предупреждением о макросах и пользователь нажал «Включить», то именно в этот момент выполнится процедура Workbook_open().

Список доступных событий можно посмотреть вверху редактора VB. Например, я делал на событие Change проверку, где лежит ячейка, в которой было изменения, и если это нужный диапазон, то делалась запись в лог со старым и новым значением.

Защита

Во-первых сразу отмечу, что MS Office не исполняет макросы на компьютерах, где он не нашел антивируса, если книга зашифрована. Сталкивался на компьютерах, где антивирус был, но видимо Windows XP об этом не знала.

Ещё антивирус может странным образом мешать работе, вызывать ошибки, не совсем объяснимые. Показал айтишникам, сказали ок, что-то сделали, не знаю.

Итак, нам надо защитить книгу, чтобы ввод был разрешен только в нужные ячейки (формулы и заголовки поменять нельзя). Во-первых, нужно сделать соответствующие ячейки «не защищенными». Для этого делаем одно из:
— выделяем диапазон, формат ячеек, снять галочку «Блокировать ячейку»;
— выводим кнопку «Блокировать ячейку» в быстрый доступ и нажимаем её, очень удобно смотреть на неё чтобы понять, защищена ячейка или же нет;
— а это пригодится, чтобы проверить третий вариант — написать макрос, который снимает защиту с нужных ячеек сам.

Далее нужно защитить лист. На вкладке Рецензирование есть такая кнопка. Окошко просит ввести пароль и установить исключения (что можно будет делать пользователю). К сожалению, список исключений маловат. Самое обидное, что нельзя разрешить сворачивать/разворачивать группы столбцов/строк. Поэтому действуем так, на загрузку книги прописываем:
Знак подчеркивания продолжает логическую строку на следующей физической строке. Итак, здесь мы:
1. Сняли защиту.
2. Включили группировку.
3. Поставили защиту, при этом:
— защита только от юзера, макросы продолжают иметь полный доступ (!), крайне важно;
— разрешили сортировку, фильтрацию и форматирование строк/столбцов (высота/ширина);
— DrawingObject в данном случае снимает защиту с примечаний к ячейкам, может и ещё с чего.

Тут мы сталкиваемся с парой сюрпризов. Во-первых, не все макросы будут работать даже так. Известный баг, ничего не сделаешь. Нельзя вставить строку, например. Приходится снимать и тут же ставить защиту. Если «злоумышленник» в этот момент нажмет ctrl+break, то защита слетит.

Во-вторых, скажем никаким способом нельзя удалять строки (AllowDeletingRows), в которых есть защищенные ячейки, хоть одна. Подробнее вот тут.

Решением (костылем) является добавление кнопки или сочетания клавиш для удаления. Заодно можно проверить, чтобы пользователь не удалил чего не надо. В Workbook_open добавляем:

Теперь процедура будет вызываться при нажатии shift+delete.
Знаю, код некрасивый, простите. Здесь я пытался проверить, что выделена строка, то есть строк там 1, а ячеек не меньше тысячи. Чтобы удалить не то, придется выделить тысячу ячеек начиная не с первого столбца. Далее проверяется имя листа и номера строк. Вместо 50 был расчет последенй строки (ведь их число меняется, если мы их удаляем и добавляем).

Заключение

VBA — весьма глючная вещь, которая позволяет сворачивать горы в MS Office. Многие предприятяи используют модели на Excel годами, и если они сделаны хорошо, то всё работает.

Для изучения VBA подходит он сам, во-первых там хорошая справка. Например, чтобы узнать все варианты что можно разрешить в методе Protect, нажимаем F1, Protect, ввод. И вуаля.

Во-вторых, можно проделать требуемые действия вручную, записав макрос, а потом просмотрев его код. Код будет ужасен (например, при изменении параметров страницы, макрос запишет значения всех параметров и полей, а не только измененного вами), но ответы найдутся. Хотя, например, .AutoFit, который записывается при изменении высоты ячейки по содержимому (двойной клик на границе слева), на самом деле не работает.

Предлагаю знатокам поделиться своим опытом, дать советы в комментариях. Спасибо за внимание, удачных разработок вам.

Читать еще:  Выравнивание столбцов в excel
Ссылка на основную публикацию
Adblock
detector