¾È³çÇϼ¼¿ä? ¼ÛÀº¼÷ ȸ¿ø´Ô ^^
ÄÄÇ»ÅÍ ÀڰݽÃÇè ¿Â¶óÀÎ °ÀÇ, ÃÖ°! ±â»çÄ£±¸ ÀÔ´Ï´Ù.
ȸ¿ø´Ô, ÄÄȰ °ÀÇ ¹®Á¦Ç®ÀÌ °úÁ¤¿¡¼ ½Ç¼ö°¡ ÀÖ¾ú´ø °Í °°½À´Ï´Ù.
¹®Á¦Ç®ÀÌ °úÁ¤ÀÇ ¿À·ù¸¦ ÁöÀûÇØÁֽŠÁ¡ °¨»çµå¸®¸ç È¥¶õÀ» µå·Á Á˼ÛÇÕ´Ï´Ù.
ȸ¿ø´Ô²²¼ Ç®ÀÌÇϽаÍÀÌ ¸Â½À´Ï´Ù.
ÇØ´ç ³»¿ëÀº °ÀÇ Áß Á¤Á¤»çÇ×À¸·Î °øÁöÇØµå¸®°Ú½À´Ï´Ù.
´Ù¸¥ ¹®ÀÇ»çÇ×ÀÌ ÀÖÀ¸½Ã¸é ¾ðÁ¦µçÁö Áú¹® ³²°ÜÁֽñ⠹ٶø´Ï´Ù.
ÄÄÇ»ÅÍȰ¿ë´É·Â 1±Þ ÃÖÁ¾ ÇÕ°ÝÀ» ±â¿øÇÕ´Ï´Ù. ^^
°¨»çÇÕ´Ï´Ù.
ÄÄÇ»ÅÍȰ¿ë´É·Â 1±Þ ½Ç±â½ÃÇè ½ÇÀü ¸ðÀǰí»ç 2-1
¹®Á¦4.
2.'±âŸÀÛ¾÷-2' ¨é¹ø Ç®À̰¡ °»ç´ÔÀÌ ÇϽŴë·Î ÇÏ¸é °á°ú°¡ ¸ðµÎ 8·Î¸¸ ³ª¿É´Ï´Ù.
i = [a3].Row + [a3].CurrentRegion.Rows.Count
Cells(i, 1) = ListºÎ¼
Cells(i, 2) = Txt¼º¸í
Cells(i, 3) = TxtÁ÷¹«Á¡¼ö
Cells(i, 4) = TxtÀÌÇØÁ¡¼ö
Select Case ºÎ¼
Case °ü¸®ºÎ: Cells(i, 5) = TxtÁ÷¹«Á¡¼ö * 0.1
Case ±â¼úºÎ: Cells(i, 5) = TxtÁ÷¹«Á¡¼ö * 0.2
Case ±âȹ½Ç: Cells(i, 5) = TxtÁ÷¹«Á¡¼ö * 0.3
Case ÀλçºÎ: Cells(i, 5) = TxtÁ÷¹«Á¡¼ö * 0.4
End Select
<°»ç´Ô °á°ú>
±â¼úºÎ ȲÁøÀÌ 80 80 8
°ü¸®ºÎ ȲÁøÀÌ 80 80 8
±âȹ½Ç ȲÁøÀÌ 80 80 8
ÀλçºÎ ȲÁøÀÌ 80 80 8
----------------------------------------------------------
Áö³¹ø °ÀDZâ¾ïÀ» ´õµë¾î ¾Æ·¡¿Í °°ÀÌ ÀÛ¼ºÇغ¸´Ï ´äÀÌ ³ª¿À³×¿ä.
Select Case ListºÎ¼
Case Is = "±â¼úºÎ"
Cells(i, 5) = TxtÁ÷¹«Á¡¼ö * 0.
Case Is = "°ü¸®ºÎ"
Cells(i, 5) = TxtÁ÷¹«Á¡¼ö * 0.2
Case Is = "±âȹ½Ç"
Cells(i, 5) = TxtÁ÷¹«Á¡¼ö * 0.3
Case Else
Cells(i, 5) = TxtÁ÷¹«Á¡¼ö * 0.4
End Select
<À§ÀÇ °á°ú>
±â¼úºÎ ȲÁøÀÌ 80 80 8
°ü¸®ºÎ ȲÁøÀÌ 80 80 16
±âȹ½Ç ȲÁøÀÌ 80 80 24
ÀλçºÎ ȲÁøÀÌ 80 80 32
±×·¡µµ ½ÇÀü ¸ðÀǰí»ç Ç®ÀÌÀε¥ Á¤Á¤ÀÌ ÇÊ¿äÇÒ °Í °°½À´Ï´Ù. |