Î㤨¤Ð¼¡¤Î¤è¤¦¤Êɽ¤¬¤¢¤Ã¤¿¤È¤·¤Þ¤¹¡£
£ÅÎó¤Ë¤ÏÀǹþ¤ß¤Î¶â³Û¤ò·×»»¤·¤Þ¤¹¡£
imageExcel079-1


¤¤¤í¤¤¤í¤ÈÊýË¡¤¬¤¢¤ê¤Þ¤¹¡£

¾ÃÈñÀǤ¬10%¤Ê¤é¡¢E2¤Î¥»¥ë¤Ë¼¡¤Î¤è¤¦¤Ê·×»»¼°¤òÆþÎϤ¹¤ë¤Î¤¬¤Æ¤Ã¤È¤êÁᤤ¤È»×¤ï¤ì¤Þ¤¹¡£
¡¡=D2*1.1

¤¿¤À¤·¡¢¤Þ¤¿¾ÃÈñÀǤ¬Êѹ¹¤Ë¤Ê¤Ã¤¿¤È¤­¡¢Ä¾ÀÜ 1.1 ¤Î¿ô»ú¤òÊѹ¹¤·¤Ê¤±¤ì¤Ð¤Ê¤ê¤Þ¤»¤ó¡£
¾åµ­¤Î¤è¤¦¤Êñ½ã¤Êɽ¤Ê¤é¡¢E2¤Î¥»¥ë¤ò¤µ¤µ¤Ã¤ÈÊѹ¹¤·¤Æ¡¢¤¢¤È¤Ï¥»¥ë¤ò¥³¥Ô¡¼¤¹¤ì¤Ð´Êñ¤Ç¤¹¤¬¡¢¤¤¤¿¤ë¤È¤³¤í¤Ë·×»»¼°¤òÆþ¤ì¤Æ¤¤¤ë¤è¤¦¤Ê¾ì¹ç¡¢·ë¹½Êѹ¹¤¬ÌÌÅݤʤ³¤È¤Ë¤Ê¤ê¤Þ¤¹¡£

º£²ó¤Ï¡¢¾ÃÈñÀǤòµá¤á¤ë´Ø¿ô¤ò¼«ºî¤·¤Æ¤ß¤Þ¤·¤ç¤¦¡£


ÊýË¡

­¡¥ê¥Ü¥ó¤Î¡Ø³«È¯¡Ù¤Î¡ØVisual Basic¡Ù¤ò²¡¤·¤Þ¤¹¡£
imageExcel079-2


¢¨¤â¤·¡¢¡Ø³«È¯¡Ù¤¬¤Ê¤¤¾ì¹ç¤Ï¡¢¥á¥Ë¥å¡¼¥Ð¡¼¤Î¡Ø¥Õ¥¡¥¤¥ë¡Ù¢ª¡Ø¥ª¥×¥·¥ç¥ó¡Ù¤òÁªÂò¤·¤Æ¡¢¡Ö¥ê¥Ü¥ó¤Î¥æ¡¼¥¶¡¼ÀßÄê¡×¤Ç¡Ö¢¢ ³«È¯¡×¤Ë¥Á¥§¥Ã¥¯¤ò¤¤¤ì¤Æ¡¢¡Ø£Ï£Ë¡Ù¤ò²¡¤·¤Þ¤¹¡£
imageExcel079-3

­¢Microsoft Visual Basic ¤Î¥¦¥¤¥ó¥É¥¦¤¬É½¼¨¤µ¤ì¤Þ¤¹¤Î¤Ç¡¢¥á¥Ë¥å¡¼¥Ð¡¼¤«¤é¡¢¡ØÁÞÆþ(I)¡Ù¢ª ¡Øɸ½à¥â¥¸¥å¡¼¥ë(M)¡Ù¤òÁªÂò¤·¤Þ¤¹¡£
imageExcel079-4


­£¼¡¤Î¤è¤¦¤Ë¤Ò¤¿¤¹¤éÆþÎϤ·¤Þ¤¹¡£
¡¡¡Ê°Ê²¼¤Î¥×¥í¥°¥é¥à¤ò¥³¥Ô¡¼¤·¤ÆŽ¤êÉÕ¤±¤·¤Æ¤¯¤À¤µ¤¤¡£¡Ë

Function zeikomi(kingaku As Integer) As Integer

zeikomi = kingaku * 1.10

End Function

imageExcel079-5


¤³¤ì¤Ç¼«ºî¤Î´Ø¿ô¤Î¤Ç¤­¤¢¤¬¤ê¤Ç¤¹¡£

³¤¤¤Æ¡¢Áá®´Ø¿ô¤òÆþÎϤ·¤Þ¤¹¡£
­¤EXCEL¤Î²èÌ̤ËÌá¤Ã¤Æ¡¢E2¤Î¥»¥ë¤Ë¼¡¤Î¤è¤¦¤Ë´Ø¿ô¤òÆþÎϤ·¤Þ¤¹¡£
¡¡=zeikomi(D2)
imageExcel079-6

Àµ¤·¤¯ 330 ¤Èɽ¼¨¤µ¤ì¤¿¤Ç¤·¤ç¤¦¤«¡©

¢¨¤Á¤Ê¤ß¤Ë¡¢
(1) ¥ê¥Ü¥ó¤Î¡Ø¿ô¼°¡Ù¢ª ¡Ø´Ø¿ô¤ÎÁÞÆþ¡Ù¡¢¤â¤·¤¯¤Ï¡¢´Ø¿ôÁÞÆþ¤Î¥¢¥¤¥³¥ó¤òÁªÂò¤·¡¢
imageExcel079-7


(2)¡Ö´Ø¿ô¤ÎʬÎà(C)¡×¤Ç¡Ø¥æ¡¼¥¶¡¼ÄêµÁ¡Ù¤òÁªÂò¤¹¤ë¤È¡¢¼«ºî¤Î´Ø¿ô¡Êzeikomi¡Ë¤¬É½¼¨¤µ¤ì¤Þ¤¹¡£
imageExcel079-8