Курсовая работа: Аналіз основних фондів в умовах шахти ім. О.О. Скочинського

Отже наявна необхідність термінового оновлення основних фондів підприємства, при цьому найближчим часом необхідно буде замінити близько 80% всього обладнання підприємства  (див. таблицю 3.3). Якщо на підприємстві не буде негайно розпочате відновлення активної частини своїх ОЗ, то протягом найближчих 3-4 років практично все устаткування прийде до повної непридатності, а число капітальних поточних ремонтів зросте до критичної величини, що призведе до численних простоїв обладнання і значного збільшення собівартості продукції в частині витрат на ремонт обслуговування устаткування і зниженню її якості через моральне і фізичне старіння ОФ підприємства.

До того ж, що велика частина обладнання підприємства є істотно зношеною, далеко не все устаткування знаходиться у експлуатації. Значна частина техніки і обладнання підприємства перебуває в капітальному ремонті, монтажах, демонтажах і резерві, що істотно знижує ефективність використання основних засобів підприємства.

Питома вага техніки й обладнання, яке знаходиться у безпосередній експлуатації, виражається за допомогою коефіцієнта структури техніки, який розраховується по наступній формулі:

Кстрi =   Niр  , де

           Niз

Niр  -  фактичний кількість i-го виду обладнання або техніки, яка знаходиться у роботі;

Niз    -   загальна кількість i-го виду техніки й обладнання підприємства.

Відомості про кількість техніки, яка знаходиться в експлуатації, а також у капітальних ремонтах, монтажах демонтажах  і резерві наведена у таблиц 3.2. У цій таблиці також представлені результати розрахунку коефіцієнта структури по видах техніки й обладнання підприємства.

Отже, як бачимо з таблиці 3.2, коефіцієнт структури техніки практично по кожному виду техніки й обладнання підприємства стотно нижче ніж його нормативне значення. Так, коефіцієнт структури очисних комбайнів становить 0,625, що складає 69,44% (0,625/0,9×100%) від нормативного значення, стругових установок - 0,5 (0,5/0,9×100%=55,56% від нормативного коефіцієнта структури), а по бурових установках - лише 0,4 (0,4/0,9×100%=44,44% від нормативного значення).

Середній коефіцієнт структури робочої техніки й устаткування становить 0,5361, що складає 59,57% (0,5361/0,9×100%) від середнього нормативного значення; по допоміжному обладнанню коефіцієнт структури дорівнює 0,585 (0,586/0,9075×100%=64,57% від середнього нормативу цього показника, див. таблицю 3.3).

Таблиця 3.3

Відомості про терміни служби техніки та непродуктивне збільшення основних фондів

Отже, на підприємстві в безпосередній експлуатації знаходиться лише 53,61% робочих обладнання і 58,5% допоміжних обладнання. Все це підтверджує раніше зроблені висновки про застосування на підприємстві часткового способу відтворювання основних фондів.

Частковий спосіб відтворювання основних фондів призводить до того, що на підприємстві виникає значне збільшення кількост техніки й устаткування, яке знаходиться у капітальних ремонтах, монтажах, демонтажах, резерві і практично не використовується у виробництві, тобто непродуктивне збільшення основних фондів.

Величина непродуктивного збільшення робочого обладнання й техніки розраховується по наступній формулі:

∆Форо = ∑ii n=1(Кснтрi - Ксфтрi )×Фiзал , де

Кснтрi  -  встановлений нормативний коефіцієнт структури i-го виду робочого обладнання або техніки;

Ксфтрi    -   фактичний коефіцієнт структури i-го виду робочого обладнання або техніки підприємства;

Фiзал     -   залишкова вартість i-го виду робочого обладнання або техніки підприємства, грн.

n      -   загальна кількість робочого обладнання та техніки підприємства.

Результати розрахунків фактичних коефіцієнтів структури техніки, залишкової вартості, а також величини непродуктивного збільшення на кожний вигляд основних фондів наведені в таблиці 3.2.

Як показують результати розрахунків, непродуктивне збільшення робочого обладнання становить 1962,62 тис. грн., що дорівню 30,87% (1962,62/6357,39×100%) від залишкової вартості робочого устаткування.

Величина непродуктивного збільшення допоміжного обладнання розраховується за аналогічною формулою і становить 2067,79 тис. грн., що складає 33,39% (2067,79/6193,41×100%) від загальної залишково вартості допоміжного устаткування. Однак, простої робочої техніки також спричинять зупинку допоміжного обладнання, яке технологічно пов'язане з цією робочою технікою. Отже, необхідно також враховувати і цю величину непродуктивного збільшення допоміжного обладнання, для чого визначимо коефіцієнт допоміжного обладнання, який розраховується по наступній формулі:

Кдо =   Фбдо  , де

          Фбро

Фбро  -  загальна балансова вартість робочого обладнання й техніки, яка знаходиться на підприємстві;

Фбдо   -   загальна балансова вартість допоміжного техніки й обладнання підприємства.

Відповідно до даних, які наведені у таблиці 3.3, коефіцієнт допоміжного обладнання становить:

Кдо = 11638,6/11799,4 = 0,9864, тобто на 1 грн вартості робочого обладнання припадає 0,9864 грн вартості допоміжного устаткування.

Непродуктивне збільшення допоміжного обладнання, яке викликане простоєм робочих машин розраховується по формулі:

∆Ф2до =∆Форо× Кдо , де

∆Форо -  величина непродуктивного збільшення робочого обладнання й техніки;

Кдо   -   коефіцієнт допоміжного обладнання.

Отже, непродуктивне збільшення допоміжного обладнання, яке спричинене простоєм робочого обладнання становить:

1962,62×0,9864=1935,92 тис. грн.

Тепер розрахуємо загальну величину непродуктивного збільшення допоміжного обладнання: 2067,79+1935,92 = 4003,71 тис. грн.

Отримана величина непродуктивного збільшення становить істотний відсоток (4003,71/6193,41×100%=64,64%) від загально залишкової вартості допоміжного устаткування, що свідчить про низьку ступінь ефективності використання допоміжного обладнання підприємства.

Таким чином, загальне непродуктивне збільшення активної частини основних фондів підприємства складає:

1962,62+4003,71 = 5966,33 тис. грн.

Отже, як показують розрахунки, загальне непродуктивне збільшення активної частини основних фондів підприємства становить 47,54% (5966,33/12550,8×100%) від величини залишкової вартості активної частини основних засобів, тобто майже половина всієї техніки і обладнання підприємства простоює, знаходячись у капітальних ремонтах, монтажах, демонтажах або резерві. Така ситуація безумовно є наслідком застосування на підприємстві часткового способу відтворювання основних фондів. При цьому способі відтворювання підприємство спроможне використовувати не більш ніж половину своїх потенціальних виробничих потужностей.  При такому способі відтворювання собівартість продукції буде зростати за рахунок збільшення питомої ваги умовно-постійних витрат, що пов'язано зі зниженням випуску продукції, а також зростаючими витратами на капітальний ремонт, монтажі, демонтажі обладнання і утримання резерву, розміри якого буде збільшуватися, оскільки обладнання, що неодноразово зазнавало капітального ремонту і застаріле устаткування буде мати набагато меншу надійність, ніж нове техніка.

Отже, непродуктивне збільшення основних фондів призводить до економічного збитку, що пов'язано не тільки із зростанням витрат на капітальний ремонт і витратами на утримання обладнання, яке не використовується, але й з тим, що в устаткуванні, яке не застосовується у виробництві продукції, заморожується на невизначений термін значна частина коштів підприємства, відсутність яких в обороті призводить до непрямих збитків.

Загальна величина економічного збитку розраховується по наступній формулі:

Знз = ∆Фо×Сб+∆З, де

∆Фо   -  загальна величина непродуктивного збільшення основних засобів підприємства;

Сб      -   річна ставка по банківському депозиту;

∆З   -  збілбшення затрат, які пов'язані з утриманням непрацюючої техніки й устаткування, а також витратами на капітальний ремонт, які розраховуються по наступній формулі:

∆З = ∆Зм+∆Зе+∆Ззп, де

∆Зм -  збільшення матеріальних витрат, яке пов'язано з непродуктивним збільшення основних засобів;

∆Зе   -   збільшення витрат електроенергії, внаслідок непродуктивного збільшення основних засобів;

∆Ззп -  збільшення витрат на оплату праці робітників підприємства, внаслідок непродуктивного збільшення основних засобів.

∆Зм = Змро×σкв×∆Кн+∆Форо×Кдо×Км, де

Змро  -  фактичні матеріальн витрати на ремонт та обслуговування техніки й обладнання підприємства;

σкв     -   фактична питома вага капітально відремонтованих техніки й обладнання у загальній їх кількості;

∆Кн -  відносне середнє зниження коефіцієнта надійност капітально відремонтованого обладнання у порівнянні з новою технікою (у роботі його значення  прийняте 0,4);

∆Форо -  збільшення вартост робочого обладнання за рахунок застосування часткового способу відтворювання;

σкв     -   фактична питома вага капітально відремонтованих техніки й обладнання у загальній їх кількості;

Кдо  -  коефіцієнт допоміжного обладнання;

Км   -  відношення вартості матеріалів, які використовуються на утримання обладнання, до вартості активної частини основних фондів.

Відомості для розрахунку економічного збитку підприємства у наслідок непродуктивного збільшення основних фондів приведені в таблиці 3.4.

Таблиця 3.4

Дані для розрахунку економічного збитку від непродуктивного збільшення основних засобів

Розрахунок питомої ваги капітально відремонтованої техніки наведений у таблиці 3.2. Середня питома вага робочого обладнання, яке вже перебувало у капітальному ремонті становить 0,8361, відносно до допоміжного обладнання ця питома вага складає 0,8458. Отже, загальна середня питома вага капітально відремонтованого устаткування дорівнює:

σкв = (0,8361×11+0,8458×20)/31 = 0,8424 (Показник розрахований як середньозважене значення)

Відношення вартості матеріалів на утримання обладнання до загальної вартості активної частини основних фондів становить:

Км = 2462,4/23438 = 0,1051

Таким чином, збільшення матеріальних витрат, яке було спричинене непродуктивним збільшенням основних фондів складає:

∆Зм = 2462,4×0,8424×0,4+5966,33×0,9864×0,1051 = 1448,26 тис. грн.

Збільшення витрат електроенергії, внаслідок непродуктивного збільшення основних засобів розраховується по наступній  формулі:

∆Зе = Зеро×σкв×∆Кн+∆Форо×Кдо×gе, де

Зеро   -  витрати електроенергії на ремонт та обслуговування обладнання підприємства;

gе  -  питомі витрати електроенергії у розрахунку на 1 грн. активної частини основних фондів;

Величина питомих витрат електроенергії у розрахунку на 1 грн. активної частини основних фондів становить:

gе = 820,8/23438 = 0,035

Отже, зростання витрат електроенергії, внаслідок непродуктивного збільшення основних засобів становить:

∆Зе = 820,8×0,8424×0,4+5966,33×0,9864×0,035 = 482,56 тис. грн.

Збільшення витрат на оплату праці робітників підприємства, внаслідок непродуктивного збільшення основних засобів розраховується по наступній формулі:

∆Ззп = (Шфро×σкв×∆Кн+∆Форо×Кдо×Ш'фро)×(ЗП'ф +Н'ф ), де

Шфро   -  фактична чисельність робітників підприємства, які зайняті ремонтом та обслуговуванням техніки й обладнання;

Ш'фро  -  відношення чисельності робітників підприємства, які зайняті ремонтом і обслуговуванням обладнання, до вартості активної частини основних фондів;

ЗП'ф   -  фактична середня заробітна плата одного робітника;

Н'ф   -  фактична середня величина нарахувань на заробітну плату одного робітника.

Відношення чисельності робітників підприємства, які зайняті ремонтом і обслуговуванням обладнання, до вартост активної частини основних фондів становить:

Ш'фро = 196/23438 = 0,008362 чол/тис. грн.

Таким чином, внаслідок непродуктивного збільшення основних засобів підприємства, зростання витрат на оплату праці становить:

∆Ззп = (196×0,8424×0,4+5966,33×0,9864×0,008362)×(3,4632+1,2987) = = 548,838 тис. грн

Отже, загальне збілбшення затрат, яке викликане непродуктивним збільшення основних фондів підприємства становить:

∆З = ∆Зм+∆Зе+∆Ззп = 1448,26+482,56+548,838 = 2479,658 тис. грн.

Як бачимо з розрахунків, загальне збільшення затрат під впливом непродуктивного збільшення основних фондів дорівнює досить стотної величини, питома вага якої в загальних витратах підприємства за 1999 рік становить 4,11% (2479,658/60402×100%). Усунення непродуктивного збільшення основних фондів дозволило б підприємству уникнути даних витрат.

Однак, крім безпосередніх витрат на зміст і ремонт обладнання, мають місце і непрямий збиток, який пов'язаний з омертвінням коштів у обладнанні підприємства, яке марно простоює. Величина цього збитку  становить: ∆Фо×Сб = 5966,33×40% = 2386,532 тис. грн.

Отже, якби основні фонди, які марно простоюють на підприємстві,  були б реалізовані за їх залишковою вартістю, а кошти від ц реалізації були б покладені у банк, то підприємство отримувало б у вигляд депозитних відсотків 2386,532 тис. грн. додаткового прибутку щорічно. Однак при застосуванні часткового способу відтворювання підприємство не зможе цілковито позбутися непродуктивного збільшення основних фондів, тільки перехід на повний спосіб відтворювання дозволить підприємству реалізувати техніку й обладнання, яке марно простоює, і отримувати вищезазначений прибуток. Але, натомість, підприємство терпить істотні збитки.

Загальний економічний збиток від непродуктивного збільшення основних засобів підприємства складає:

Знз = 2386,532+2479,658 = 4866,19 тис. грн.

Таким чином, збитки, спричинені непродуктивним збільшенням основних фондів склада значну величину, питома вага якої в загальній величині збитків підприємства за 1999 рік (див. таблицю 1.1) становить 37,89% (4866,19/12842×100%).

У разі усунення збитків від непродуктивного збільшення основних фондів підприємству б вдалося скоротити загальну величину збитків до 7975,81 тис. грн. (12842-4866,19). Цього можна досягти лише за рахунок переходу від часткового способу відтворювання основних засобів до повного способу відтворювання.

                3.2     Аналізу ефективності використання основних фондів

Від ефективності використання основних фондів в значній мірі залежить багато важливих техніко-економічних показників роботи підприємства, тому необхідно постійного аналізувати і знаходити шляхи підвищення ефективності використання основних фондів.

Основним показником що характеризу ефективність використання основних фондів підприємства є фондовіддача. Однак для комплексної оцінки ефективності використання основних фондів не достатньо лише розрахунку співвідношення обсягу випуску і вартості основних фондів, оскільки від відповідної експлуатації основних фондів залежить не тільки обсяг випуску продукції, але і її собівартість і якість. Тому показник фондовіддачі доцільно розраховувати по наступній формулі:

Фвфід=  Qвф- ∆Зоф - ∆Qн + ∆Qк  , де

                   Фаф

Qвф -  фактичний обсяг випуску продукції у звітному періоді, грн;

∆Зоф  -  зміна витрат на випуск продукції підприємства під впливом основних фондів, грн;

∆Qн -  збільшення вартості продукції, що випускається, яке не пов'язане з підвищенням якості, грн;

∆Qк  -   збільшення вартості продукції підприємства за рахунок зміни якості, грн.

Фаф  -  фактична величина основних фондів, що застосовуються для випуску цієї продукції, грн;

Відомості про витрати, пов'язані з експлуатацією основних фондів, а також про ціни на продукцію в періоді, що аналізується, і попередньому періоді наведені в таблиці 3.5.

Таблиця 3.5

Відомості для розрахунку фондовіддачі за грудень 1999 р.

Як бачимо з таблиці 3.5, збільшення ціни на продукцію, яке не пов'язане з поліпшенням її якості, становило 2,8 грн./т. Оскільки зростання цін у періоді, що аналізується не пов'язане із зміною якост продукції, то загальне збільшення вартості товарної продукції за рахунок зростання ціни складає:

∆Qн = 2,8×30600 = 85680 грн.

Тепер розрахуємо збільшення витрат, яке пов'язане з утриманням, експлуатацією і ремонтом основних засобів:

∆Зоф = 120680+40210+45736 = 206626 грн.

Таким чином, величина місячної фактичної фондовіддачі становить:

Фвфід = (4035000-85680-206626)/23438000 = 0,1597

Якщо обчислювати показник місячно фондовіддачі за формулою співвідношення обсягу випуску та вартості основних фондів, тобто:

Фвід=   Qпф   ,

           Фаф

то величина такого показника фондовіддачі буде дорівнювати:

Фвід = 4035000/23438000 = 0,1722

Розрахований таким чином показник фондовіддач завищеним на 7,83% (0,1722/0,1597×100%-100%) у порівнянні з фактичним значенням фондовіддачі (0,1597).

Отже, як бачимо з наведених вище розрахунків, на обчислений показник фондовіддачі у даному випадку впливають наступні групи чинників:

1. Причини, які призвели до загального зниження обсягу випуску продукції підприємства. Зменшення обчисленого показника фондовіддачі під впливом цієї групи причин розраховується по наступній формулі:

ΔФ1=     ∆Qв  , де

           Фаф

ΔQв  -  зниження обсягу випуску продукції підприємства у періоді, що аналізується, грн;

Використовуючи результати аналізу обсягу випуску продукції, який був зроблений у розділі 2.1 цієї роботи, розрахуємо загальне зниження обсягу випуску продукції у вартісному виразі:

ΔQв = 11506,78×131,9 =1717744,25 грн.

Зменшення фондовіддач внаслідок загального зниження обсягу випуску продукції у періоді, що аналізується, становить:

ΔФ1 = -1717744,25/23438000 = -0,0733.

Як бачимо, зменшення фондовіддачі викликане зниженням обсягу випуску продукції дорівнює досить істотній величині, яка складає 45,9% (0,0733/0,1597×100%) від загального фактичного розміру фондовіддачі.

2. Причини, які викликали підвищення затрат, пов'язане з основними фондами підприємства. Зменшення показника фондовіддачі під впливом цієї групи причин розраховується по наступній формулі:

ΔФ2 =      ∆Зоф  , де

             Фаф

∆Зоф  -  збільшення витрат на випуск продукц підприємства під впливом основних фондів, грн;

Таким чином, зменшення фондовіддач внаслідок збільшення витрат на випуск продукц підприємства під впливом основних фондів у періоді, що аналізується, становить:

ΔФ2 = -12856/23438000 = -0,000549.

Зменшення фондовіддачі викликане збільшенням витрат на випуск продукції підприємства під впливом основних фондів дорівнює 0,34% (0,000549/0,1597×100%) від фактичного розміру фондовіддачі.

3. Причини, пов'язані з підвищення цін на продукцію, яке не обумовлене зростанням її якості. Зменшення показника фондовіддачі під впливом ц групи причин розраховується по наступній формулі:

ΔФ3 =      ∆Qн  , де

             Фаф

∆Qн -  збільшення вартості продукції, що випускається, яке не пов'язане з підвищенням якості, грн;

Таким чином, зменшення фондовіддач внаслідок підвищення цін на продукцію, яке не пов'язане з зростанням її якості у періоді, що аналізується, становить:

ΔФ3 = -85680/23438000 = -0,003656.

Зменшення фондовіддачі спричинене збільшенням вартост продукції, що випускається, яке не пов'язане з підвищенням якості дорівню 2,29% (0,003656/0,1597×100%) від фактичного розміру фондовіддачі.

4. Причини, пов'язані з непродуктивним збільшенням, утриманням зайвого та непотрібного обладнання, яке призводить до зростання вартості основних засобів підприємства. Зменшення величини фондовіддачі під впливом цієї групи причин розраховується по наступній формулі:

ΔФ4 = Фвід      Qвф    , де

                  Фаф  - ΔФо

∆Фо -  загальна величина непродуктивного збільшення активної частини основних засобів підприємства, грн;

Таким чином, зменшення фондовіддач внаслідок непродуктивного збільшенням основних засобів підприємства у періоді, що аналізується, становить:

ΔФ4 = 0,1722-4035000/(23438000-5966330) = -0,0587.

Як показують розрахунки, зменшення фондовіддачі, яке спричинене непродуктивним збільшенням основних засобів підприємства складає досить значну величину, яка становить 36,76% (0,0587/0,1597×100%) від загального фактичного розміру фондовіддачі.

Отже, було встановлено, що протягом періоду, який аналізується на величину на ефективність використання основних засобів підприємства, тобто на величину фондовіддачі впливали: зменшення обсягу випуску продукції, внаслідок чого фондовіддача знизилася на 0,0733, підвищення затрат, пов'язане з основними фондами, що призвело до зменшення фондовіддачі на 0,000549, підвищення цін на продукцію, яке не обумовлене зростанням її якості спричинило зниження фондовіддачі на 0,003656, а також непродуктивним збільшенням основних засобів призвело до зниження показника фондовіддачі на 0,0587. Розрахуємо загальну величину зниження фондовіддачі, яка зумовлена впливом вищезазначених причин:

∆Фвід = ∆Ф1+∆Ф2 +∆Ф3+∆Ф4

∆Фвід = -0,0733-0,000549-0,003656-0,0587=-0,136205

Загальне зниження показника фондовіддачі становить 85,29% (0,136205/0,1597×100%) від фактичної величини фондовіддачі за період, який аналізується.

Результати аналізу ефективності використання основних фондів (фондовіддачі) доцільно представити у вигляді наступної таблиці:

Таблиця 3.6

Результати аналізу фондовіддачі за грудень 1999 р.

Як бачимо, величина зниження фондовіддач складає 85,29% її фактичної величини, отже, необхідно розробити і реалізувати заходи, які дозволили б усунути негативний вплив виявлених причин і сприяти зростанню ефективності використання основних засобів підприємства.

Таблиця 3.7

Заходи щодо збільшення ефективності використання основних фондів

Як показують результати розрахунку загального резерву підвищення фондовіддачі на підприємстві, досягти збільшення цього показника на 85,29% (0,136205/0,1597×100%), а отже й підвищити ефективність використання основних фондів, можливо за рахунок здійснення заходів, які наведені в таблиці 3.7.

Окрім розглянутого вище способу загальний резерв підвищення фондовіддачі також можна визначити по наступній формулі:

ΔФврід =  Qвф+∆Qп +∆Зоф    Фвід , де

                Фаф  - ΔФо

∆Qп -  можливе збільшення обсягу випуску продукції за рахунок підвищення як кількісних, так і якісних показників, грн;

∆Зоф -  можливе зменшення витрат підприємства, пов'язане з утриманням та експлуатацією основних фондів підприємства, грн;

∆Фо -  загальна величина непродуктивного збільшення активної частини основних засобів підприємства, грн;

Можливе збільшення обсягу випуску продукц підприємства за рахунок підвищення як кількісних, так і якісних показників становить:

∆Qп = 1717744,25+85680 = 1803424,25 грн.

Отже, величина резерву загального збільшення фондовіддачі, розрахована по цій формулі, складає:

∆Фврід = (4035000 +1803424,25 +12856)/(23438000 - 5966330) -0,1722 = = 0,1637

Як бачимо, розрахована величина загального резерву фондовіддачі вельми стотна, вона становить 100,25% (0,1637/0,1597) від фактичної величини фондовіддачі (0,1597).

Таким чином, у разі реалізації вищенаведених заходів щодо підвищення ефективності використання основних фондів (див. таблицю 3.7), те величину фондовіддачі підприємства можна буде збільшити до 0,3234 (0,1597+0,1637), тобто до 200,25% (0,3234/0,1597) від фактичної величини фондовіддачі.

У закінченні цієї курсової роботи зробимо короткий огляд попередніх розділів, та підведемо підсумки.

Загальна характеристика шахти імені О. О. Скочинського показує, що шахта розробляє вельми тонкі, але досить якісні вугільні пласти на відносно малих кутах падіння (до 10°), що дозволяють застосовувати погоризонтний спосіб розробки шахтного поля.

У першому розділі даної курсової роботи був зроблений загальний аналіз техніко-економічних показників підприємства за останні 5 років роботи, який показав істотне погіршенні економічно ситуації на підприємстві, що також підтверджується визначеною негативною динамікою фінансового результату підприємства (в 1999 році загальна величина збитків шахти досягла 5421 тис. грн.).

У другому розділі був зроблений загальний та детальний аналіз обсягу випуску та реалізації продукції підприємства.

Загальний аналіз обсягу випуску продукц показав, що планові показники на період, що аналізується, були занижені, при цьому обсягу видобутку зменшився у порівнянні з попереднім періодом. У результаті детального аналізу обсягу випуску продукції було визначено, що підприємство має внутрішній резерв підвищення обсягу видобутку у розмір 11506,78 тонн.

Підчас загального аналізу даних про реалізацію продукції за грудень 1999 року та планових показників було виявлене істотне заниження планових показників, а також погіршення основних показників реалізації у порівнянні з попереднім періодом. Детальний аналіз реалізації продукції, для якого в зв'язку з штучним заниженням плану були використані показники попереднього періоду, показав, що усунення виявлених негативних чинників, які знижують обсяг реалізації, дозволив би підприємству збільшити річну реалізацію продукції на 1784,96 тис. грн.

Аналіз стану основних фондів показав, що на підприємств застосовується частковий спосіб відтворювання, внаслідок якого техніка й обладнання підприємства зношеними на 76,34%, а  термін повного оновлення техніки становить близько 55,6 років. При цьому у безпосередній експлуатації знаходиться тільки 53,61% робочої техніки і устаткування підприємства. Аналіз фондовіддачі виявив відносно низьку ефективність використання основних фондів підприємства, збільшення якої можливе лише за рахунок переходу до повного способу відтворювання. Це дозволило б підвищити загальну величину фондовіддачі у періоді, що аналізується, на 0,1637.

Attribute VB_Name = "Count_A"

Sub TP_Count()

Const k As Single = 1#

Dim t1 As Object, t2 As Object, t3 As Object, t4 As Object, t5 As Object, _

t6 As Object, t7 As Object, t8 As Object, t9 As Object, _

t10 As Object, t11 As Object, t12 As Object, t13 As Object, t14 As Object, t15 As Object, t16 As Object, t17 As Object

With ActiveDocument

Set t1 = .Tables(2)   'Таблиця 1.1 Техніко-економічні показники

Set t2 = .Tables(3)   'Таблиця 1.2 Аналіз структури собівартості одиниці продукції, %

Set t3 = .Tables(4)   'Таблиця 1.3 Приведення показників до порівнянних одиниць вимірювання

Set t4 = .Tables(5)   'Таблиця 1.4 Техніко-економічні показники, приведені до порівнянних одиниць вимірювання

Set t5 = .Tables(6)   'Таблиця 1.5 Динаміка техніко-економічних показників, %

Set t6 = .Tables(7)   'Таблиця 2.1 Загальні відомості про випуск продукції за грудень 1999 р.

Set t7 = .Tables(8)   'Таблиця 2.2 Відомості про обсяги і трудомісткість випущеної продукції

Set t8 = .Tables(9)   'Таблиця 2.3 Дані про забезпеченість підприємства матеріалами за грудень 1999 р.

Set t9 = .Tables(10)  'Таблиця 2.4 Відомості про забезпеченість підприємства робітниками за грудень 1999 р

                      'Таблиця 2.5 Результати аналізу випуску продукції за грудень 1999 р.

                      'Таблиця 2.6 Заходи щодо збільшення обсягу випуску продукції

Set t10 = .Tables(13) 'Таблиця 2.7 Відомості про ритмічність роботи підприємства за грудень 1999 р.

Set t11 = .Tables(14) 'Таблиця 2.8 Дані про реалізацію продукції

Set t12 = .Tables(15) 'Таблиця 2.9 Зіставлення показників реалізації продукції з планом і попереднім періодом

Set t13 = .Tables(16) 'Таблиця 3.1 Відомості про основні засоби підприємства

Set t14 = .Tables(17) 'Таблиця 3.2 Відомості про структуру техніки, що застосовується на підприємстві

Set t15 = .Tables(18) 'Таблиця 3.3 Відомості про терміни служби техніки та непродуктивне збільшення основних фондів

Set t16 = .Tables(19) 'Таблиця 3.4 Дані для розрахунку економічного збитку від непродуктивного збільшення основних засобів

Set t17 = .Tables(20) 'Таблиця 3.5 Відомості для розрахунку фондовіддачі

                      'Таблиця 3.6 Результати аналізу фондовіддачі за грудень 1999 р.

                      'Таблиця 3.7 Заходи щодо збільшення ефективності використання основних фондів

End With

Dim i As Byte, j As Byte, _

c As Currency, d As Currency, n As Currency, v As Currency

For j = 4 To 8

For i = 5 To 27

Select Case i

Case 8: t1.Cell(i, j) = CCur(rs(t1.Cell(6, j)) / rs(t1.Cell(5, j)))

Case 9: If j > 5 Then t1.Cell(i, j) = CCur(rs(t1.Cell(8, j)) / rs(t1.Cell(8, j - 1)))

Case 10: 'Nothing

Case 14: t1.Cell(i, j) = CCur(rs(t1.Cell(5, j)) / rs(t1.Cell(11, j)) / 12)

Case 15: t1.Cell(i, j) = CCur(rs(t1.Cell(5, j)) / rs(t1.Cell(12, j)) / 12)

Case 16: t1.Cell(i, j) = CCur(rs(t1.Cell(12, j)) / rs(t1.Cell(13, j)))

Case 18: t1.Cell(i, j) = CCur(rs(t1.Cell(17, j)) / rs(t1.Cell(5, j)))

Case 23: t1.Cell(i, j) = rs(t1.Cell(18, j)) - rs(t1.Cell(19, j)) - rs(t1.Cell(20, j)) - rs(t1.Cell(21, j)) - rs(t1.Cell(22, j))

Case Else: 'Reserved for Error Case

End Select

Next

t1.Cell(28, j) = rs(t1.Cell(26, j)) - rs(t1.Cell(27, j))

t1.Cell(29, j) = rs(t1.Cell(7, j)) - rs(t1.Cell(17, j))

Next

t1.Cell(9, 5) = CCur(rs(t1.Cell(8, 5)) / rs(t1.Cell(8, 4)) * 100)

For j = 3 To 7: For i = 0 To 3

t2.Cell(5 + i, j) = CCur(rs(t1.Cell(19 + i, j + 1)) / rs(t1.Cell(18, j + 1))) * 100

Next

t2.Cell(9, j) = 100 - rs(t2.Cell(5, j)) - rs(t2.Cell(6, j)) - rs(t2.Cell(7, j)) - rs(t2.Cell(8, j))

Next

For j = 3 To 7: t3.Cell(4, j) = CCur(rs(t1.Cell(17, j + 1)) / rs(t1.Cell(6, j + 1))): Next

t3.Cell(6, 7) = cs(t1.Cell(17, 8))

For j = 3 To 6

t3.Cell(5, j) = CCur(rs(t3.Cell(4, j)) / rs(t3.Cell(4, 7)))

t3.Cell(6, j) = rc(rs(t3.Cell(5, j)) * rs(t1.Cell(17, 8)))

t3.Cell(7, j) = CCur(rs(t3.Cell(6, j)) / rs(t1.Cell(17, j + 1)))

Next

For i = 4 To 6

t4.Cell(i, 8) = cs(t1.Cell(i + 1, 8))

Next

For j = 4 To 7

t4.Cell(4, j) = cs(t1.Cell(5, j))

t4.Cell(5, j) = rc(rs(t1.Cell(6, j)) * rs(t3.Cell(7, j - 1)))

t4.Cell(6, j) = rc(rs(t1.Cell(7, j)) * rs(t3.Cell(7, j - 1)))

Next

For i = 10 To 28

t4.Cell(i - 3, 8) = cs(t1.Cell(i + 1, 8))

For j = 4 To 7

Select Case i

Case 10 To 15: t4.Cell(i - 3, j) = cs(t1.Cell(i + 1, j))

Case 16: t4.Cell(i - 3, j) = cs(t3.Cell(6, j - 1))

Case 17 To 21: t4.Cell(i - 3, j) = CCur(rs(t1.Cell(i + 1, j)) * rs(t3.Cell(7, j - 1)))

Case 22: t4.Cell(i - 3, j) = rs(t4.Cell(14, j)) - rs(t4.Cell(15, j)) - rs(t4.Cell(16, j)) - rs(t4.Cell(17, j)) - rs(t4.Cell(18, j))

Case 27: t4.Cell(i - 3, j) = rs(t4.Cell(22, j)) - rs(t4.Cell(23, j))

Case 28: t4.Cell(i - 3, j) = rs(t4.Cell(6, j)) - rs(t4.Cell(13, j))

Case Else: t4.Cell(i - 3, j) = rc(rs(t1.Cell(i + 1, j)) * rs(t3.Cell(7, j - 1)))

End Select

Next:Next

For j = 4 To 7

For i = 4 To 25

t5.Cell(i, j) = CStr(CCur(rs(t4.Cell(i, j + 1)) / rs(t4.Cell(i, 4))) * 100) + "%"

Next:Next

t6.Cell(5, 4) = rs(t1.Cell(8, 7)) * 1000

t6.Cell(5, 7) = rs(t1.Cell(8, 8)) * 1000

t6.Cell(4, 6) = rc(rs(t6.Cell(3, 4)) * rs(t6.Cell(5, 4)) / 1000, 0)

t6.Cell(5, 6) = cs(t6.Cell(5, 4))

t6.Cell(5, 5) = CCur(rs(t6.Cell(4, 5)) / rs(t6.Cell(3, 5))) * 1000

For i = 3 To 5

t6.Cell(i, 8) = rs(t6.Cell(i, 7)) - rs(t6.Cell(i, 4))

t6.Cell(i, 9) = CStr(CCur(rs(t6.Cell(i, 7)) / rs(t6.Cell(i, 4))) * 100) + "%"

t6.Cell(i, 10) = rs(t6.Cell(i, 7)) - rs(t6.Cell(i, 5))

t6.Cell(i, 11) = CStr(CCur(rs(t6.Cell(i, 7)) / rs(t6.Cell(i, 5))) * 100) + "%"

Next

For i = 4 To 7

t7.Cell(i, 5) = rs(t7.Cell(i, 4)) - rs(t7.Cell(i, 3))

t7.Cell(i, 7) = rc(rs(t7.Cell(i, 4)) / rs(t7.Cell(i, 6)), 0)

t7.Cell(i, 8) = rs(t7.Cell(i, 11)) * rs(t7.Cell(i, 10))

t7.Cell(i, 9) = rs(t7.Cell(i, 7)) - rs(t7.Cell(i, 8))

Next

t7.Cell(8, 5) = rs(t7.Cell(8, 4)) - rs(t7.Cell(8, 3))

Call SumColumn(t7, 7, 4)

Call SumColumn(t7, 8, 4)

Call SumColumn(t7, 9, 4)

Call SumColumn(t7, 11, 4)

For i = 3 To 5

t8.Cell(i, 6) = CCur(rs(t8.Cell(i, 4)) / rs(t8.Cell(i, 5)))

t8.Cell(i, 7) = 1 - rs(t8.Cell(i, 6))

Next

For i = 4 To 8

t9.Cell(i, 3) = cs(t7.Cell(i, 7))

t9.Cell(i, 5) = cs(t7.Cell(i, 8))

t9.Cell(i, 7) = cs(t7.Cell(i, 11))

Next

For i = 4 To 7

t9.Cell(i, 4) = rc(rs(t7.Cell(i, 3)) / rs(t7.Cell(i, 6)), 0)

t9.Cell(i, 10) = rc(rs(t9.Cell(i, 7)) * rs(t9.Cell(i, 12)), 0)

t9.Cell(i, 8) = rc(rs(t9.Cell(i, 11)) / rs(t9.Cell(i, 13)), 0)

t9.Cell(i, 6) = rs(t9.Cell(i, 8)) * rs(t7.Cell(i, 10))

t9.Cell(i, 9) = rs(t9.Cell(i, 7)) - rs(t9.Cell(i, 8))

Next

Call SumColumn(t9, 4, 4)

Call SumColumn(t9, 10, 4)

Call SumColumn(t9, 11, 4)

Call SumColumn(t9, 6, 4)

Call SumColumn(t9, 8, 4)

Call SumColumn(t9, 9, 4)

t10.Cell(34, 2) = cs(t7.Cell(4, 4)): t10.Cell(34, 3) = cs(t7.Cell(5, 4))

t10.Cell(34, 4) = cs(t7.Cell(6, 4)): t10.Cell(34, 5) = cs(t7.Cell(7, 4))

t10.Cell(34, 6) = cs(t7.Cell(8, 4))

For i = 3 To 32

Call SumRow(t10, i, , 5):Next

For i = 2 To 5

t10.Cell(33, i) = rs(t10.Cell(34, i)) - SumColumn(t10, i, , 32, False)

t10.Cell(36, i) = MaxColumn(t10, i, , 33, False)

t10.Cell(37, i) = rs(t10.Cell(36, i)) - rs(t10.Cell(35, i))

t10.Cell(38, i) = rs(t10.Cell(37, i)) * 31

Next

Call SumRow(t10, 36, , 5): Call SumRow(t10, 33, , 5)

Call SumRow(t10, 37, , 5): Call SumRow(t10, 38, , 5)

For i = 4 To 5

t11.Cell(4, i) = cs(t1.Cell(5, i + 3))

t11.Cell(5, i) = cs(t1.Cell(6, i + 3))

t11.Cell(7, i) = cs(t1.Cell(7, i + 3))

Next

For i = 4 To 6

t11.Cell(6, i) = CCur(rs(t11.Cell(5, i)) / rs(t11.Cell(4, i)))

t11.Cell(8, i) = rc(rs(t11.Cell(7, i)) / rs(t11.Cell(6, i)), 0)

t11.Cell(9, i) = rc(rs(t11.Cell(10, i)) / rs(t11.Cell(6, i)), 0)

t11.Cell(15, i) = rc(rs(t11.Cell(13, i)) * rs(t11.Cell(6, i)))

t11.Cell(16, i) = rs(t11.Cell(15, i)) - rs(t11.Cell(14, i))

t11.Cell(18, i) = rc(rs(t11.Cell(17, i)) * rs(t11.Cell(6, i)))

Next

For i = 3 To 17

t12.Cell(i, 4) = CStr(CCur(rs(t11.Cell(i + 1, 5)) / rs(t11.Cell(i + 1, 6))) * 100) + "%"

t12.Cell(i, 5) = rs(t11.Cell(i + 1, 5)) - rs(t11.Cell(i + 1, 4))

t12.Cell(i, 6) = CStr(CCur(rs(t11.Cell(i + 1, 5)) / rs(t11.Cell(i + 1, 4))) * 100) + "%"

Next

t13.Cell(17, 3) = cs(t4.Cell(20, 7))

t13.Cell(15, 3) = cs(t4.Cell(21, 7))

t13.Cell(16, 3) = rs(t13.Cell(17, 3)) - rs(t13.Cell(15, 3))

t13.Cell(17, 7) = cs(t4.Cell(20, 8))

t13.Cell(15, 7) = cs(t4.Cell(21, 8))

t13.Cell(16, 7) = rs(t13.Cell(17, 7)) - rs(t13.Cell(15, 7))

For i = 3 To 8

c = rs(t13.Cell(15, i))

t13.Cell(11, i) = rs(t13.Cell(15, i)) - rs(t13.Cell(10, i)) - rs(t13.Cell(9, i)) - rs(t13.Cell(8, i)) - rs(t13.Cell(7, i)) - rs(t13.Cell(6, i))

c = rs(t13.Cell(16, i))

t13.Cell(14, i) = rs(t13.Cell(16, i)) - rs(t13.Cell(4, i)) - rs(t13.Cell(5, i)) - rs(t13.Cell(12, i)) - rs(t13.Cell(13, i))

i = i + 4 'Increasing step

Next

For i = 4 To 14

t13.Cell(i, 7) = rs(t13.Cell(i, 3)) + rs(t13.Cell(i, 4)) - rs(t13.Cell(i, 6))

t13.Cell(i, 10) = rs(t13.Cell(i, 7)) - rs(t13.Cell(i, 9))

Next

t13.Cell(15, 9) = rs(t13.Cell(11, 9)) + rs(t13.Cell(10, 9)) + rs(t13.Cell(9, 9)) + rs(t13.Cell(8, 9)) + rs(t13.Cell(7, 9)) + rs(t13.Cell(6, 9))

t13.Cell(16, 9) = rs(t13.Cell(14, 9)) + rs(t13.Cell(4, 9)) + rs(t13.Cell(5, 9)) + rs(t13.Cell(12, 9)) + rs(t13.Cell(13, 9))

t13.Cell(17, 9) = rs(t13.Cell(15, 9)) + rs(t13.Cell(16, 9))

For i = 15 To 17

t13.Cell(i, 6) = rs(t13.Cell(i, 3)) + rs(t13.Cell(i, 4)) - rs(t13.Cell(i, 7))

t13.Cell(i, 10) = rs(t13.Cell(i, 7)) - rs(t13.Cell(i, 9))

Next

t14.Cell(4, 5) = rc(SumColumn(t14, 11, 5, 15, False) / 11, 4): t14.Cell(16, 5) = rc(SumColumn(t14, 11, 17, 36, False) / 20, 4)

t14.Cell(4, 6) = rs(t14.Cell(4, 4)) - rs(t14.Cell(4, 5)): t14.Cell(16, 6) = rs(t14.Cell(16, 4)) - rs(t14.Cell(16, 5))

For i = 5 To 36

If i <> 16 Then

t14.Cell(i, 11) = CCur(rs(t14.Cell(i, 6)) / rs(t14.Cell(i, 3)))

t14.Cell(i, 12) = rs(t14.Cell(i, 10)) - rs(t14.Cell(i, 11))

t14.Cell(i, 13) = CCur(rs(t14.Cell(i, 5)) / rs(t14.Cell(i, 3)))

t15.Cell(i, 6) = cs(t14.Cell(i, 12))

t15.Cell(i, 8) = cs(t14.Cell(i, 3))

t15.Cell(i, 5) = rs(t15.Cell(i, 3)) - rs(t15.Cell(i, 4))

t15.Cell(i, 7) = rc(rs(t15.Cell(i, 5)) * rs(t15.Cell(i, 6)))

t15.Cell(i, 11) = CCur(rs(t15.Cell(i, 10)) / rs(t15.Cell(i, 9)))

End If

Next

t14.Cell(4, 7) = rc(SumColumn(t14, 13, 5, 15, False) / 11, 4): t14.Cell(16, 7) = rc(SumColumn(t14, 13, 17, 36, False) / 20, 4)

For i = 4 To 36: t15.Cell(i, 12) = CCur(rs(t15.Cell(i, 4)) / rs(t15.Cell(i, 3)))

Next: t15.Cell(37, 10) = CCur(rs(t15.Cell(37, 4)) / rs(t15.Cell(37, 3)))

For i = 3 To 5

t15.Cell(4, i) = SumColumn(t15, i, 5, 15, False): t15.Cell(16, i) = SumColumn(t15, i, 17, 36, False)

Next

t15.Cell(4, 7) = SumColumn(t15, 7, 5, 15, False): t15.Cell(16, 7) = SumColumn(t15, 7, 17, 36, False)

t15.Cell(4, 11) = CCur(SumColumn(t15, 11, 5, 15, False) / 11): t15.Cell(16, 11) = CCur(SumColumn(t15, 11, 17, 36, False) / 20)

t15.Cell(37, 7) = rs(t15.Cell(4, 7)) + rs(t15.Cell(16, 7))

t15.Cell(37, 9) = CCur((rs(t15.Cell(4, 11)) + rs(t15.Cell(16, 11))) / 2)

t15.Cell(37, 3) = cs(t13.Cell(15, 7)): t15.Cell(37, 4) = cs(t13.Cell(15, 9))

t15.Cell(37, 5) = cs(t13.Cell(15, 10))

For i = 3 To 5

t17.Cell(i, 4) = cs(t6.Cell(i, 4)): t17.Cell(i, 5) = cs(t6.Cell(i, 7))

t17.Cell(i, 6) = cs(t6.Cell(i, 8)): t17.Cell(i, 7) = cs(t6.Cell(i, 9))

Next

t17.Cell(8, 4) = cs(t16.Cell(5, 4)): t17.Cell(8, 5) = cs(t16.Cell(5, 4))

For i = 6 To 10

t17.Cell(i, 6) = rs(t17.Cell(i, 5)) - rs(t17.Cell(i, 4))

t17.Cell(i, 7) = CStr(rc(rs(t17.Cell(i, 5)) * 100 / rs(t17.Cell(i, 4)))) + "%"

Next

End Sub

Private Function replace(s As String, s1 As String, Optional s2 As String = ".") As String

Dim p As Integer

p = InStr(s, s1)

If p > 0 Then replace = Left(s, p - 1) + s2 + Mid(s, p + Len(s1)) Else replace = s

End Function

Private Function rs(s As String) As Currency

rs = Val(replace(s, ","))

End Function

Private Function cs(s As String)

cs = Left(s, Len(s) - 2)

End Function

Private Function rc(c As Currency, Optional n As Byte = 2)

n = 4 - n

rc = CCur(c / (10 ^ n)) * (10 ^ n)

End Function

Private Function SumColumn(t As Object, ByVal c As Integer, Optional p As Integer = 3, Optional n As Integer = 0, Optional b As Boolean = True) As Currency

If n = 0 Then n = t.Rows.Count - 1

Dim i As Integer

SumColumn = rs(t.Cell(p, c))

For i = p + 1 To n

SumColumn = SumColumn + rs(t.Cell(i, c))

Next

If b Then t.Cell(n + 1, c) = SumColumn

End Function

Private Function SumRow(t As Object, ByVal r As Integer, Optional p As Integer = 2, Optional n As Integer = 0, Optional b As Boolean = True) As Currency

If n = 0 Then n = t.Columns.Count - 1

Dim i As Integer

SumRow = rs(t.Cell(r, p))

For i = p + 1 To n

SumRow = SumRow + rs(t.Cell(r, i))

Next

If b Then t.Cell(r, n + 1) = SumRow

End Function

Private Function MaxColumn(t As Object, ByVal c As Integer, Optional p As Integer = 3, Optional n As Integer = 0, Optional b As Boolean = True) As Currency

If n = 0 Then n = t.Rows.Count - 1

Dim i As Integer, v As Currency

MaxColumn = rs(t.Cell(p, c))

For i = p + 1 To n

v = rs(t.Cell(i, c))

If MaxColumn < v Then MaxColumn = v

Next

If b Then t.Cell(n + 1, c) = MaxColumn

End Function

Sub WhereCell()

MsgBox CStr(Selection.Information(wdEndOfRangeRowNumber)) + ", " + CStr(Selection.Information(wdEndOfRangeColumnNumber))

End Sub

Sub Calc()

InputBox "Result", , Selection.Calculate

End Sub

(назва віщого навчального закладу)

Кафедра            Бухгалтерського обліку та Аудиту                                                

Дисципліна      Аналіз господарської діяльності                                                     

Спеціальність   Облік та аудит                                                                              

Курс  5         Група  УА 96 в                             Семестр  9                               

ЗАВДАННЯ

на курсовий проект (роботу) студента

(прізвище, м'я, по батькові)

1. Тема проекту (роботи)  Аналіз основних фондів в умовах товариства з обмеженою   відповідальності "Шахта ім. О. О.Скочинського"                                                                

2. Строк здачі студентом закінченого проекту (роботи)  20.11.2000                               

3. Вихідні дані до проекту (роботи)   Дані статистичної звітності, що містять відомості про техніко-економічні показники шахти ім. О. О. Скочинського за 1999, 2000 роки; дані аналітичних і синтетичних регістрів обліку основних фондів                                            

4. Зміст розрахунково-пояснювальної записки (перелік питань, які підлягають розробці)        

           1. Характеристика підприємства                                                               

           2. Аналіз техніко-економічних показників                                                   

           3. Аналіз виробництва і реалізації продукції                                                

           4. Аналіз стану і використання основних фондів                                         

5. Перелік графічного матеріалу (з точним зазначенням обов'язкових креслень)                       

Дата видачі завдання  06.09.2000                                                                          

Студент                                         

                                                      (підпис)

Керівник                                                            Гавриленко Валентин Андрійович    

                                                      (підпис)                                                                              (прізвище, м'я, по батькові)

« 10 »  жовтня     2000  р.

[1] Продуктивність праці розрахована в середньому за місяць

1 Гавріленко В. А. "Теорія і методика економічного аналізу виробниче-господарської діяльності виробничих підприємств"  - Донецьк 1998 рік.