FaRa0n
Junior Member | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Здравствуйте, Все!
Я больше дизайнер, - VBA знаю на уровне абы как (В универе преподавали - и то я гуманитарий).
Очень прошу Вас помочь с элементарными вещами. К сожалению, я и их забыл напроч, а может и не знал. Программка нужна в ресторан, где компьютером, к сожалению более-менее владею только я.
Итак, что я насобирал видно на скриншоте (на саму xls указал ниже ссылку):
http://s08.radikal.ru/i181/0908/65/7836f224df92.jpg
n - количество заказов за день.
Кнопки "Add", "Delete" - добавляют/удаляют заказ.
Столбик № равен n.
Order - номер текущей странички в чековой книжке (не принципиально, хотя и с ней проблемы есть, когда строк вообще нет). Вводится ручками только первая строчка - остальные ++
Type - у меня 1 или 2 - в жизни - Credit Card или Cash (по умолчанию вводится 1 - т.к. кредитками расплачиваются чаще). Если надо - ручками меняю на 2.
Total - вводится ручками - сколько клиент потратил
Tip - чаевые - вводится, только если клиент расплатился Кредиткой (Type = 1) - вводится ручками.
CASH BACK - может быть отрицательная.
На данный момент программа считает определенные суммы (на скриншоте видно). Обычное сложение/вычитание. Оператор ветвления основан на столбце "Type". Т.е. если 1 - то считаем сумму в одну переменную, если 2 - то в другую.
Что хочется сделать:
1.Чтобы при нажатии на "Add" в столбце "Type" появлялись элементы ComboBox (выпадающий список) с двумя вариантами "C.C." (по умолчанию) и "CASH".
2. Понимаю, что программа написана абы как, совсем не по правилам хорошего тона программирования. Наверное, все те строки, которые выполняются, при нажатии кнопки "Count" - надо заключить в функцию. И вызывать эту функцию каждый раз при нажатии на "Add" или "Delete" (и самой "COUNT" естественно)- чтобы программа каждый раз сама, без напоминания пересчитывала.
3. Не могу разобраться, если число заказов равно 0. Ошибки, т.к. строка по сути пуста, а столбец Order черпает себя с предыдущей строки. Вот и ошибка.
4. Не могу понять, почему переменная n (она объявляется, при нажатии на кнопку "Add") не хочет работать в другой процедуре (при нажатии на "COUNT"). Приходится заводить новую что не очень хорошо.
5. Если у кого MS Office 2003 - плз, проверьте - работет ли программа в нём. Вроде бы сохранял в режиме совместимости. Но чёрт его знает.
В примере - даны те данные, которые уже проверены. Т.е. там 4 заказа - всё посчитано как надо. Вроде математически программка считает. Хотя, уверен, глюков там море.
Огромная просьба - гляньте, пожалуйтса! Если можете - подправьте пункты.
Если нет желания, то помогите хотя бы с решением 1-го. Никак не могу даже на уровне теории сообразить, как же должны появляться эти КомбоБоксы. Какие у них должны быть имена, и должен ли это быть массив. Вобщем я запутался конкретно.
Очень надеюсь на Вас!
Ссылка на файл
http://narod.ru/disk/12085502000/Stoli.zip.html
Спасибо. |
