Проблемы с базой данных

[СтаниславАВ]

Ошибка в строчке If Not IsEmpty(.Cells(i, j)) Then
kol длинный а я использовал Byte, поменял на nteger

Сообщение от VictorM

да, недоглядел в вопросе
конечно же rowH=1786 не количество ячеек, а количество строк

Спасибо за помощь. Пробился. Отблагодарю.

Вот начальная таблица, которую хотел получить.

[IgorGO]

If Not IsEmpty(.Cells(i, j)) Then
не вижу там, чтобы какое-то значение переменной j присваивалось. оно равно 0 видимо.

[VictorM]

Вот начальная таблица, которую хотел получить.

ну вот, другое дело

[СтаниславАВ]

Как из таблицы 11(Ноябрь), нажав на кнопку "Для всех банков" выбрав несколько имён, создать для каждого имени свой файл excel в котором бы указывались все сделки совершённые им в указанном дне. И каждому имени отправлялись бы по почте.
Формулы расчёта я указал в макросе "Формулы_расчёта"

Сообщение от VictorM

ну вот, другое дело

Сможешь дальше помочь?

[VictorM]

А в чем, собственно сложности?
Оба алгоритма с примерами и макросами отрабатывались уже на форуме.
Было и формирование файлов и отправка по почте.

[СтаниславАВ]

Сообщение от VictorM

А в чем, собственно сложности?
Оба алгоритма с примерами и макросами отрабатывались уже на форуме.
Было и формирование файлов и отправка по почте.

Цикл. Устанавливаются даты для отбора из ячейки А:А и из ячейки Q:Q. Сначала из listbox2 берётся 1 контрагент, и для него формируется файл с данными из 11(Ноября) и отправляется по почте, затем берётся 2 контрагент, и для него формируется файл с данными из 11(Ноября) и отправляется по почте. И так пока весь Listbox2 не отработает. Проблема в том, что контрагент у меня вставляется в виде порядкового номера в АА1 и дальше все считается, затем после сохранения и отправки по почте, контр-агент в ячейке АА1 меняется на другого и все заново повторяется, пока они в listbox2 не закончатся. Не могу понять как их по очереди в АА1 подставлять автоматически.....

[VictorM]

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

[СтаниславАВ]

Сообщение от VictorM

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

10 числа прошла сделка по СамарОбл 6 на 25000шт. между AGRM и ZENT на срок 7дн. она заканчивается 17 числа. И если нажать кнопку "Для банков" и в верхней строке набрать AGRM и нажать на появившееся название ОАО "Россельхоз" выбрать дату 10 число. То программа создаст файл и сохранит его в дирректории C:\. В файл войдет эта сделка. Если выбрать сделки и набрать 17 число и выбрать AGRM то он создаст файл со всеми сделками этого клиента которые окончатся 17 числа. Этот макрос работает хорошо. Но клиентов много и так каждого выбирать тяжело, хотел выбрать сразу несколько, нажать и отдыхать.