Выбрать дату в календареВыбрать дату в календаре

Страницы: 1
VBA Ошибка 13 Type Mismatch Где ошибка в коде?
 
Добрый день.
Необходимо просуммировать произведения ячеек  3 и 5 столбцов  при условии, что ячейка 6 столбца той же строки >0 и вывести
в ячейке В17 сумму этих произведений.

Но при нажатии на кнопку Рассчитать возникает ошибка 13 Type Mismatch - ошибка типа данных.
Не могу понять, где именно ошибка Интересно, что если поставить условие <0 или = ,то расчет происходит, а если больше нуля, то ошибка..
Подскажите плиз.
Изменено: Nkor - 20.03.2015 20:55:58
Не загружаются фото при использовании выпадающего списка с фамилиями, VBA работа с картинками
 
Добрый вечер. Изучаю VBA по книжке. Автор после теории дал задание сделать, чтобы по выбору из выпадающего списка грузились фото из базы учащихся.
Если прописывать путь к каждому файлу в отдельности в LoadPicture, то да, получается. Но если база например, вырастет, не удобно же будет. Вот я и озадачилась, нельзя ли из какой нибудь переменной пути указывать?
Попытка в файле есть, но неудачно. Лист 2 - база, Лист3 в xlsm файле - собественно рамка ,картинки и список. Список получился, а картинка не работает.
Может кто-нибудь подскажет?
zip с исходниками загрузить через форум-форму не удается,  можно взять отсюда, с ЯДиска
Изменено: Nkor - 10.10.2014 13:26:43
Функция DatePart выдает некорректный результат, самопроизвольная смена нужного формата выдачи даты на некорректный
 
Проблема: Есть ряд дат, который заполняется автоматически нажатием кнопки "Заполнить". Стартовая дата - "Сегодня", количество записей - в ячейке "Периодов".  При нажатии кнопки "Заполнить" 2-й столбец заполняется датами. C помощью функции DatePart в 1-м столбце требуется вывести ту же дату, но в формате "НомНедели - Год".
Заполнение в нужном формате корректно до момента перехода с текущего года на следующий - с этого момента формат ячейки самопроизвольно меняется с "Общий" на "Дату" и меняется формат выдачи даты вместо "НомНедели-Год" на "мес-год".
Как  это поправить? Справка по функции прочитана полностью, но самостоятельно поправить не получается.
Пример приложен
Изменено: Nkor - 20.09.2014 16:37:49 (Орфографические ошибки :-))
Формула хронологической средней в VBA, ошибка в вычислениях
 
Добрый день, форумчане.
Есть ряды данных. В строках - наим товаров, в столбцах номера недель. В значениях - запасы на каждую неделю по каждому товару.
Значения бывают нулевыми. Поэтому в таких случаях рассчитывается не среднее арифметическое, а хронологическая средняя (в файле есть классическая формула),
Сделала ниже данных две таблички. В одну при нажатии кнопки "Рассчитать" для каждой строки данных отдельно рассчитываются параметры для вычисления хронологической средней - количество недель с ненулевым остатком и суммарный объем запасов за весь период. Через VBA исходные данные (количество непустых дней, суммарный запас) рассчитываются совершенно правильно. А вот уже формула средней хронологической запаса, прописанная в VBA и формула в ячейке дают разный результат, отличия не слишком существенны, но все же... Что не так? И как поправить? Есть подозрения, что я плохо поняла про форматы данных в ячейках, вот при переформатировании и возникают искажения... Только где напортачила, не пойму...

PS Сразу прошу простить за построчное вычисление кнопкой, я новичок, еще не освоила перевод вычислений  на следующую строку автоматом. Просто введите номер любой строки в таблице данных
Страницы: 1
Наверх