¡Ù¸®º» ¸Þ´º¿¡ °³¹ß µµ±¸ ÅÇ Ç¥½ÃÇÏ±â ÆÄÀÏ ÅÇ -> ¿É¼Ç -> ¸®º» »ç¿ëÀÚ ÁöÁ¤: °³¹ß µµ±¸ üũ ¡Ù¸ÅÅ©·Î(¹Ýº¹Çؼ­ »ç¿ëÇÏ´Â ÀÛ¾÷À» ³ìÈ­ÇØ µÎ¾ú´Ù°¡ ÇÊ¿äÇÒ ¶§ ½ÇÇàÇÒ ¼ö ÀÖ´Â ÀÚµ¿È­ ±â´É) ºó ¼¿À» Ŭ¸¯ -> °³¹ß µµ±¸ ÅÇ -> ÄÚµå ±×·ì -> ¸ÅÅ©·Î ±â·Ï -> ¸í·É Â÷·Ê´ë·Î ½ÇÇà->±â·Ï ÁßÁö °³¹ß µµ±¸ ÅÇ -> ÄÚµå ±×·ì -> ¸ÅÅ©·Î (½ÇÇà, ÆíÁý) - ´ÜÃß(¾ç½Ä ÄÁÆ®·Ñ) »ðÀÔ: °³¹ß µµ±¸ -> ÄÁÆ®·Ñ ±×·ì -> »ðÀÔ -> ¾ç½Ä ÄÁÆ®·Ñ(¸í·É ´ÜÃß) - µµÇü »ðÀÔ: »ðÀÔ ÅÇ -> ÀÏ·¯½ºÆ®·¹ÀÌ¼Ç ±×·ì -> µµÇü - »ç¿ëÀÚ ÁöÁ¤ Ç¥½ÃÇü½Ä ¾ç¼öÀÏ ¶§;À½¼öÀÏ ¶§;0ÀÏ ¶§;ÅØ½ºÆ®ÀÏ ¶§ [»ö±ò][Á¶°Ç1]Çü½Ä;[»ö±ò][Á¶°Ç2]Çü½Ä;±× ¿Ü ³ª¸ÓÁö Çü½Ä [ÆÄ¶û]\#,##0¡ã;[»¡°­]-#,##0¡å;¡á ¡Ù Â÷Æ® ÀÛ¼º ¹× ÆíÁý µ¥ÀÌÅÍ ¹üÀ§ ¼±Åà -> »ðÀÔ ÅÇ -> Â÷Æ® ±×·ì -> Â÷Æ® Á¾·ù ¼±Åà - Â÷Æ® ÆíÁý 1. Â÷Æ® µµ±¸ -> Â÷Æ® µðÀÚÀÎ ÅÇ: Â÷Æ® Á¾·ù, ¿øº» µ¥ÀÌÅÍ, Çà.¿­ Àüȯ, Â÷Æ® ·¹À̾ƿô, ½ºÅ¸ÀÏ, Â÷Æ®(À§Ä¡) À̵¿, Â÷Æ® ¿ä¼Ò Ãß°¡(Â÷Æ® Á¦¸ñ, Ãà Á¦¸ñ, ¹ü·Ê, µ¥ÀÌÅÍ ·¹À̺í, ºÐ¼®(¼±), Ãà, Ãß¼¼¼±) 2. Â÷Æ® µµ±¸ ->¼­½Ä ÅÇ: ¿ä¼Ò »ö ä¿ì±â, µµÇü ½ºÅ¸ÀÏ, µµÇü È¿°ú,Â÷Æ® Å©±â,Â÷Æ® ¿µ¿ª »ö ä¿ì±â 3. Ãà ¿É¼Ç: ÇØ´ç ÃàÀ» ¸¶¿ì½º ¿À¸¥ÂÊ -> Ãà ¼­½Ä: ´«±Ý¼± ´ÜÀ§, Ç׸ñÀ» °Å²Ù·Î - Â÷Æ®ÀÇ ¿µ¿ª 1. Â÷Æ® ¿µ¿ª: ´«±Ý¼± ¹Ù±ùÂÊ(¹è°æÂÊ) 2. ±×¸² ¿µ¿ª: ´«±Ý¼± ¾ÈÂÊ ¡Ù °³¹ß µµ±¸ ÅÇ Ç¥½Ã: ÆÄÀÏ ÅÇ -> ¿É¼Ç -> ¸®º» »ç¿ëÀÚ ÁöÁ¤: °³¹ß µµ±¸ üũ ¡Ù ¸ÅÅ©·Î º¸¾È ¼³Á¤: °³¹ß µµ±¸ ÅÇ -> ÄÚµå ±×·ì -> ¸ÅÅ©·Î º¸¾È(¸ðµç ¸ÅÅ©·Î Æ÷ÇÔ[4¹øÂ° ¿É¼Ç])À¸·Î º¯°æ -> ÆÄÀÏ ´Ý°í ´Ù½Ã ¿­±â ¡Ú ÇÁ·Î½ÃÀú: ¸ÅÅ©·Î¿Í °°ÀÌ Æ¯Á¤ÇÑ ÀÏÀ» ó¸®ÇÏ´Â ÇϳªÀÇ ±¸¹®(VBÀ¸·Î ÄÚµùÇÏ¿© ÀÛ¼º) ¡Ú °³¹ß µµ±¸ -> ÄÚµå ±×·ì -> ¸ÅÅ©·Î º¸¾È: ¸ðµç ¸ÅÅ©·Î Æ÷ÇÔ(¿É¼Ç 4¹øÂ° ¼±ÅÃ) -> ÆÄÀÏ ´Ý°í ´Ù½Ã ¿­±â ¡Ù Æû ¿­±â ÇÁ·Î½ÃÀú ÀÛ¼º 1. °³¹ß µµ±¸ -> µðÀÚÀÎ ¸ðµå 2. ¸í·É ´ÜÃß ´õºí Ŭ¸¯ ÆûÀ̸§.show ¸ÅÃâÀÔ·Â.Show ¡Ù Æû Á¾·á ÇÁ·Î½ÃÀú ÀÛ¼º Alt + F11 -> ÆûÀ» ´õºíŬ¸¯ -> Á¾·á ¹öư ´õºí Ŭ¸¯ -> Unload me(¸Þ¸ð¸®¿¡¼­ »èÁ¦) ; Me.hide(È­¸é»óÀ¸·Î ¼û±è) Unload Me ¸¦ ´ëºÎºÐ »ç¿ë ¡Ù ¸Þ½ÃÁö »óÀÚ ³ªÅ¸³»±â msgbox "Ç¥½ÃÇÒ ³»¿ë", ¹öư[»óÀÚ] ½ºÅ¸ÀÏ, "Á¦¸ñ" MsgBox "»õÇØ º¹ ¸¹ÀÌ ¹ÞÀ¸¼¼¿ä~", vbYesNo, "¼³³¯" MsgBox Now(), vbOKOnly, "Á¦Ç°°Ë»öÀ» ¸¶Ä¨´Ï´Ù" Unload Me ¿¢¼¿ VB, Access ÇöÀ糯¥ =today() -> =date() ÇöÀ糯¥ ³¯Â¥&½Ã°£ =now() °øÅëÀ¸·Î »ç¿ë ½Ã°£¸¸ =time() ¡Ù ÆûÀÇ ÃʱâÈ­ ÇÁ·Î½ÃÀú(À̺¥Æ® ÇÁ·Î½ÃÀú: initialize[ÃʱâÈ­]) Alt + F11 -> ÆûÀ» ´õºíŬ¸¯ -> ÆûÀÇ ¹è°æÀ» ´õºíŬ¸¯ -> initialize ÇÁ·Î½ÃÀú ¼±Åà ¿É¼Ç´ÜÃßÀ̸§.value = true ¿É¼Ç ´ÜÃß°¡ ¼±Åõǵµ·Ï Opt½Å¿ë = True Opt½Å¿ë.Value = True ¡ÙAlt + F11 -> ÆûÀ» ´õºíŬ¸¯ -> ÆûÀÇ ¹è°æÀ» ´õºíŬ¸¯ -> initialize ÇÁ·Î½ÃÀú ¼±Åà ¡Ù ÄÞº¸»óÀÚ¿¡ ¸ñ·Ï Ãß°¡Çϱâ(À̺¥Æ® ÇÁ·Î½ÃÀú: initialize[ÃʱâÈ­]) ÄÞº¸»óÀÚÀ̸§.additem "»ðÀÔÇÒ ³»¿ë" cmb¼±ÅÃ.AddItem "ºÎ»êÀºÇà" ÄÞº¸»óÀÚÀ̸§.rowsource = "³»¿ëÀÌ ÀÖ´Â ¼¿ ¹üÀ§" (¼¿ ÁÖ¼Ò ¾ÕµÚ¿¡ "") cmb¼±ÅÃ.RowSource = "a4:a6" ¡Ù ÄÞº¸»óÀÚ Listindex ¼Ó¼º ÄÞº¸»óÀÚÀ̸§.Listindex --> ÄÞº¸»óÀÚ¿¡¼­ ¼±ÅÃÇÑ Ç׸ñÀÇ ¹øÈ£¸¦ °è»ê(0¹ø ºÎÅÍ ½ÃÀÛ) ÂüÁ¶Çà = ÄÞº¸»óÀÚÀ̸§.Listindex + Ç¥ÀÇ Ã¹¹øÂ° µ¥ÀÌÅÍÀÇ Çà¹øÈ£ - txt±Ý¾× ¼ýÀÚ·Î º¯È¯ =txt±Ý¾×.value =val(txt±Ý¾×) =txt±Ý¾× *1 =val(ÅØ½ºÆ®) : ÅØ½ºÆ®¸¦ ¼ýÀÚ·Î º¯È¯ <-- VB, Access =value(ÅØ½ºÆ®) : ÅØ½ºÆ®¸¦ ¼ýÀÚ·Î º¯È¯ <-- excel - »õ·Î¿î µ¥ÀÌÅͰ¡ ÀÔ·ÂµÉ ¸¶Áö¸· ÇàÀ» ±¸ÇÏ´Â °ø½Ä ÀÔ·ÂÇà= range("½ÃÀÛÇÏ´Â ¼¿ÁÖ¼Ò").currentregion.rows.count + ½ÃÀÛÇÏ´Â ¼¿ÁÖ¼ÒÀÇ Çà ¹øÈ£ ÀÔ·ÂÇà = Range("e5").CurrentRegion.Rows.Count+5 cells(Çà, ¿­) = "³»¿ë" : ¿öÅ©½ÃÆ®ÀÇ Æ¯Á¤ Çà, ¿­ À§Ä¡¿¡ ³»¿ëÀ» »ðÀÔ cells(Çà, ¿­) = ÄÁÆ®·Ñ[»óÀÚ]¸í : ¿öÅ©½ÃÆ®ÀÇ Æ¯Á¤ Çà, ¿­ À§Ä¡¿¡ ÄÁÆ®·Ñ[»óÀÚ]ÀÇ ³»¿ëÀ» »ðÀÔ Cells(1, 2) = "ÄÄȰÇÕ°Ý" [B1] = "ÄÄȰÇÕ°Ý" Cells(2, 3) = "Á¾¸ñºÐ¼®" [C2]="Á¾¸ñºÐ¼®" =text(Ç¥½ÃÇÒ °ª, "Çü½Ä") <-- ¿¢¼¿ =text(1000, "#,##0¿ø") 1,000¿ø =format(Ç¥½ÃÇÒ °ª, "Çü½Ä") <-- VB, Access ÀÔ·ÂÇà = Range("b3").CurrentRegion.Rows.Count + 3 ÄÁÆ®·Ñ[»óÀÚ]¸í = cells(Çà, ¿­) : ÄÁÆ®·Ñ[»óÀÚ]¿¡ ¿öÅ©½ÃÆ®ÀÇ Æ¯Á¤ Çà, ¿­ À§Ä¡¿¡ ³»¿ëÀ» °¡Á®¿È cells(Çà, ¿­) = ÄÁÆ®·Ñ[»óÀÚ]¸í : ¿öÅ©½ÃÆ®ÀÇ Æ¯Á¤ Çà, ¿­ À§Ä¡¿¡ ÄÁÆ®·ÑÀÇ ³»¿ëÀ» »ðÀÔ Cells(1, 2) = "ÄÄȰÇÕ°Ý" [B1] = "ÄÄȰÇÕ°Ý" target.font.name="±Ã¼­Ã¼" cells(1,2)="Á¾¸ñºÐ¼®" target.font.bold=true ÇØ´ç ¼¿ÀÇ ±Û²ÃÀ» ±½°Ô target.font.italic=true ÇØ´ç ¼¿ÀÇ ±Û²ÃÀ» ±â¿ïÀӲà target.font.color=red ÇØ´ç ¼¿ÀÇ ±Û²Ã»öÀ» »¡°­À¸·Î