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

Страницы: 1
Путевые листы (гос.учреждения)
 
Добрый день!
Пересмотрел готовые решения по путевым листам, но похожего ничего не нашел. Сам в написании не силен.
Описание задачи:
1. Каждый день по факту поездки, заполняются человеком таблица во вкладке с месяцем и годом, ну например "Декабрь 2016". Вносятся данные по километражу и маршруту.
2. В конце месяца заполняется вкладка "Отчет" то что отмечено желтым, вносятся начальные и конечные показатели по топливу и пробегу.

Необходимо:
1. В конце месяца формировать путевые листы по образцу как во вкладке "АВТО 1" (моих знаний хватило только на то что видете в формулах)))
2. На каждый месяц журнал надо сохранять, т.е. лист Декабрь 2016 должен остаться, простим копипастом делается лист Январь 2017 из него и заполняется заново. Вкладку отчет сохранять не нужно. Т.е. недо чтобы выпадающий список какой то формировался с наименованием вкладок доступных для формирования листа. "Декабрь 2016, Январь 2017 и т.д."
3. Если на дату нет пробега, то в лист его не надо заносить с "0" пробегом.

Может кто помочь реализовать? Для опытного человека задача очень просто))) А мне на 2 недели кропотливого труда))) Как стимул могу пару сотен на сотовый телефон положить)
Как вести LOG файл
 
Доброе утро всем :)  
Подскажите плз, необходимо вести текстовый LOG файл, по результатом выполнения некоторого макроса в книге, каждая новая запись должна дописываться в конец файла...  
Формат файла должен быть типа  
дата, переменная1, переменная2, переменная3.  
 
Подскажите плз как реализовать?:)  
Пока что сделал вот что:  
    Open "c:\log\log.txt" For Output As #1  
    Print #1, Worksheets("ДАННЫЕ").Cells(11, 2)  
    Close #1  
Но такой макрос переписывает поверх одну и ту же строчку, и если его запустить допустим подряд 2 раза, то кричит что файл уже открыт и вываливается...  
Подскажите плз...
Как вставить текст в ячейку с разным форматированием
 
Добрый день.  
Подскажите плз как вставить текст в ячейку с разным форматированием размера и т.д...  
 
Вот например так: Cells(5, 3).Value = "текст 1 " & "текст2"  
текст1 - например должен быть 11 шрифт, жирный, а текст2 должен быть 20 шрифт, жирный подчеркнутый, как реализовать, подскажите :)
Variant в Single
 
Есть вот такой вот код:  
 
Dim xMax As Single  
xMax = CSng(TBZ.Value)  
 
TBZ это TextBox, в который вводятся цифры и значение оттуда выходит как "1.005" (допустим), почемуто в кавычках, 2007 офис хавает такую строчку в легкую, а 2003 ругается, как поправить чтобы 2003 нормально отрабатывал это?
Вопросы про .Interior.Color и настройки печати
 
Добрый день всем :)  
Наболело вот два вопроса :)  
ВОПРОС1  
Есть такая переменная, для заливки ячеек цветом .Interior.Color , так вот где найти таблицу цветов? :) с RGB не совпадает, что тут используется, как тут цвет задать нужный?  
 
ВОПРОС2  
Есть макрос который генерирует лист произвольной длины, как задать чтобы этот лист всегда печатался на одной странице? (Через макросы пробовал записать, там очень много мусора получается, может как то проще можно?)
Вопрос про Union
 
Доброе всем утро :)  
Подскажите плз, что не так, почему конструкция типа:  
Union(rCell.Offset(, 1), rCell.Offset(, 3), rCell.Offset(, 7), rCell.Offset(, 6), rCell.Offset(, 5), rCell.Offset(, 2))  
 
Делает объединение ячеек не в виде 1-3-7-6-5-2, а просто эти ячейки выбирает и склеивает подряд, получается 1-2-3-5-6-7...
Формирование отчетов на основании шаблона
 
Доброе утро!  
Есть вопрос такого содержания: есть табличка с наимеваниями товара для отгрузки покупателю, необходимо на основании ее и шаблона (который иногда видимо придется изменять) лежашего в отдельном файле, создать отчет по каждому сформированному поддону, для того чтобы распечатать такой лист и накеить на каждый поддон.  
 
Отчет по каждому поддону строиться так: смотриться столбец Паллета № и все наименования у которых одинаковый номер вставляются в поле наименования на соответствующем листе, ну и соответственно заполняется из той же таблицы вес, количество и т.д. Все сформированные листы должны находиться в одном файле (можно как у меня в примере,на листе "ОТЧЕТЫ" или строился отдельный файл, не важно) друг под другом, но каждый чтобы на отдельном листе, чтобы нажать кнопку печать и каждый распечатался отдельно :)  
Для примера нарисовал примерно что должно получится на листе "ОТЧЕТЫ" в прикрепленном документе...  
Прошу помощи, заранее спасибо :)
Сложный счетчик
 
Доброе утро всем, что то я с утра туплю, подскажите плз как сделать (см.файл), вот есть набор препаратов, который тянется из базы в файл, необходимо его поделить чтобы количество каждого было не более еденицы (для отгрузки на поддонах), необходимо сделать следующее:  
Чтобы переберились значения в столбце "Кол-во" (я немного заполнил чтобы понятнее было) вот например так как в данонм примере: 0,2+0,2+0,3 дальше встречаем 1, т.е. кол-во получается больше 1, перескакиваем ее и идем дальше искать до конца файла, все что получается в сумме не больше 1 метим в колонке номер цифрой "1", потом переходим дальше, у нас препарат №4 сразу идет в количестве 1, значит ставим ему номер 2, следующий тоже в количестве 1, т.е. сразу ставим ему номер 3, ну и т.д. соответственно препаратам 6 и 7 ставим 4 и т.д.  
Надеюсь хоть чуть чуть понятно объяснил:) Подскажите плз, очень надо:)))
Страницы: 1
Наверх