Есептеу бағдарламалық коды

ҚОСЫМША

VBA-НЫ ЖАЛПЫ ЭКОНОМИКАЛЫҚ КЕЙБІР КАРАПАЙЫМ ЕСЕПТЕ ҚОЛДАНУ
Мысал 1
Есептің қойылымы:
Компания товар шығаратын болсын товар өндіруге белгілі уакыт және материал кажет дейік. Материалдың өзіндік бағасын кестеде
=суммпройз(В1:В3;В4:В6) формуласының көгімен есептейді.
Компания менеджері косынды табысты шығару қажет дейік бірақта, бірақта менеджерде бір сағатта канша төленетіндігі туралы мәлімет жок оны есептеу үшін төмендегі кестені қолдану кажет
Кесте
Жалпы сценариясы
1
2
3
Бір сағатта төленетін төлем ақы
23
29
31
Материал бірлік бағасы
62
55
59
Материал бірлік бағасы
32
24
27
Материал көлемі
5
3
3
Материал көлемі
3
6
4

Келесі процедуралар түймешелермен сәйкес келеді әр түймеше кажетті есептеуге байланысты кестелерде автомат жауабын шығарады.
Есептеу бағдарламалық коды:

Сурет 1- Модульдер терезесі кодтар жазылған
Есептің жауабы төмендегі суреттегі сияқты болады. Есептеудің бірінші варианты бойынша

Сурет 2.1- Есеп нәтижесі
Суреттің екінші варианты бойынша төмендегі жауаб шығады:

Сурет 2.2 - Есептің екінші нәтижесін шығаратын терезе көрінісі
Есептің үшінші варианты бойынша есептің жаубы төмендегідей болады
сурет 3:

Сурет 2.3 - Есептің екінші нәтижесін шығаратын терезе көрінісі
Мысалы 2
Есептің қойылымы: Кейбір дүкенде сатушларға келесі ережелер бойынша комиссионные есептеледі. Комиссионный келесі ережелер бойынша болу тиіс.
Егерде сатылған заттың көлемі 100000 тенге болса. оның комиссионный есебі р1 бойынша есептеледі:
Егерде сатылған заттың көлемі 50000 тенгемен 100000 тенге арасында болған жағдайда оның комиссионный есебі р2 бойынша есептеледі.
Егер сатылған заттың бағасы 50000 тенге болса онда оның комиссинный есебі р3 бойынша есептеледі.
Төменде көрсетілген процедура комиссионныды екі сценариялар бойынша есептейді:
р1=4%, p2=3%, p3=2% және p1=6%, p2=4%, p3=2%. Есептің бнрілуі бойынша комиссионныды максимальды мәні бойынша есептелуде максимальді мәні бойынша кызылмен белгіленеді, кішісі бойынша – қарамен ал орташасын- көкпен белгіленген.
Комиссионныдың жалпы сценариялары бойынша төмендегі суретте жалпы сипаты көрсетілген. Суретте комиссионныдың бірінші сценариялары бойынша есептеліп отыр.
Ал келесі суретте комиссионыдың екінші сценариялары бойынша шыққан есептің жауабы көрсетілген

сурет 4(a)

Әр кайсысын автоматты түрде есептеу үшін VBA дағы модуль қолданылған. Модульге тһмендегі терезедегі кодтар терілді.

Жалғасы