ID:
PW:

     0 ºÐ
     25 ºÐ

¿£Áö´Ï¾î µ¹Á¾
  dolljong

Áö½ÄÀº °øÀ¯µÇ¾úÀ» ¶§ ±× ÈûÀ» ¹ßÈÖÇÑ´Ù.


AutoCAD ActiveX ¸Àº¸±â °­ÁÂ(4)

ÇöÀ缿¿¡ °ª³Ö±â/Á÷Á¢½ÇÇàâ
¿À´ÃÀº MACRO1()À̶õ ¸ÅÅ©·ÎÀÇ ±â´É¿¡ ´ëÇؼ­ ÀÚ¼¼È÷ ¾Ë¾Æº¸µµ·Ï ÇÏ°Ú½À´Ï´Ù. ¿ì¼± ±â·ÏµÈ ¸ÅÅ©·Î¸¦ ½ÇÇàÇغ¸°í ¸ÅÅ©·Î Äڵ忡 ´ëÇؼ­ À̾߱â Çغ¸°Ú½À´Ï´Ù. ±â·ÏµÈ ¸ÅÅ©·Î¸¦ ½ÇÇà½ÃÅ°´Â ¹æ¹ýÀº ¿©·¯°¡Áö°¡ ÀÖÁö¸¸ ¿ì¼± ¾Æ·¡¿Í °°ÀÌ ¸¶¿ì½º¸¦ B2¼¿¿¡ À§Ä¡½ÃŲ ÈÄ¿¡ µµ±¸/¸ÅÅ©·Î/¸ÅÅ©·Î¸¦ ¼±ÅÃÇÕ´Ï´Ù.

±×·¯¸é ÇöÀç ±â·ÏµÈ ¸ÞÅ©·ÎµéÀÌ ³ª¿À´Âµ¥ ¿ì¸®´Â ÇÑ°³¸¸ ±â·ÏµÇ¾îÀÖÀ¸´Ï Macro1À» ¼±ÅÃÇÕ´Ï´Ù.



½ÇÇàÀÇ °á°ú´Â ¾Æ·¡¿Í °°ÀÌ B1¼¿¿¡ 123°¡ ±â·ÏµÇ°í A2°¡ ¼±ÅÃµÈ »óÅ·ΠµË´Ï´Ù. ¿©±â¼­ ÀÌ»óÇÏ´Ù°í »ý°¢ÇÒ ¼öµµ ÀÖÀ» °ÍÀÔ´Ï´Ù.



¿ì¸®´Â ºÐ¸í A1¿¡ 123¸¦ ±â·ÏÇÏ´Â ¸ÅÅ©·Î¸¦ ÀÛ¼ºÇߴµ¥ ¾î°¼­ B1¿¡ 123¸¦ ÀÔ·ÂÇßÀ»±î¿ä? À̺κп¡¼­ Äڵ带 º¼±î¿ä?

Sub Macro1()
'
' Macro1 Macro
' dolljongÀÌ(°¡) 2001-08-01¿¡ ±â·ÏÇÑ ¸ÅÅ©·Î
'

'
    ActiveCell.FormulaR1C1 = "123"
    Range("A2").Select
End Sub

¿©±â¼­ '·Î½ÃÀ۵Ǵ ÁÙÀº comment·Î¼­ ½ÇÇà°ú °ü·Ã¾øÀÌ ¼³¸íÀ» ´Ù´Â ºÎºÐÀÔ´Ï´Ù. 123À̶ó´Â ¼ýÀÚ°¡ º¸À̴ ù¹ø° ÁÙÀÌ ¾Æ¸¶µµ ¼¿¿¡´Ù "123"À» ÀÔ·ÂÇÏ´Â ÄÚµå¶ó´Â °ÍÀº ´«Ä¡·Î¼­ ´ëÃæÀ» ¾Ë ¼ö ÀÖÀ» °ÍÀÔ´Ï´Ù. ±×·¸´Ù¸é ActiveCell.FormulaR1C1¶õ ¹«¾ùÀϱî¿ä? Àß ¸ð¸£´Â °ÍÀÌ ³ª¿À¸é ¿ì¼± help¸¦ ã¾Æº¸µµ·Ï ÇÕ´Ï´Ù. activecell¶õ ±ÛÀÚ¿¡´Ù Ä¿¼­¸¦ À§Ä¡½ÃÅ°°í f1Å°¸¦ ´­·¯ÁÝ´Ï´Ù. ±×·¯¸é help°¡ ¶ß°í activecell¿¡ ´ëÇؼ­ ¾Æ·¡¿Í °°ÀÌ ¼³¸íÇÏ°í ÀÖ½À´Ï´Ù.

"ÇöÀç â(¸Ç À§¿¡ Àִ â)À̳ª ÁöÁ¤µÈ â¿¡¼­ ÇöÀç ¼¿À» ³ªÅ¸³»´Â Range °³Ã¼¸¦ ¹ÝȯÇÕ´Ï´Ù. â¿¡ Ç¥½ÃµÈ ¿öÅ©½ÃÆ®°¡ ¾øÀ¸¸é ÀÌ ¼Ó¼ºÀ» »ç¿ëÇÒ ¼ö ¾ø½À´Ï´Ù. Àбâ Àü¿ëÀÔ´Ï´Ù." ¿©±â¼­ Áß¿äÇÑ°Ç ÇöÀç ¼¿À» Ÿ³ª³½´Ù´Â °ÍÀÔ´Ï´Ù. ¾Æ.. ù¹ø° ÁÙÀº ÇöÀ缿¿¡´Ù 123À» ÀÔ·ÂÇÏ´Â Äڵ屸³ª... ¶ó´Â °É ´ëÃæÀº ´«Ä¡Ã¤½Ç ¼ö ÀÖÀ» °ÍÀÔ´Ï´Ù.

¾Æ... ÀÌÁ¦ activecellÀÌ ÇöÀç ¼¿À̶ó´Â °É ¾Ë¾Ò½À´Ï´Ù. "¹é¹®ÀÌ ºÒ¿©ÀÏrun"À̶ó ÀÏ´Ü Çѹø ŸÀÌÇÎÀ» Çؼ­ ½ÃÇèÀ» Çغ¼±î¿ä? ¾Æ·¡ ±×¸²Ã³·³ Á÷Á¢½ÇÇàâ¿¡´Ù activecell = 123456¶ó°í ÀÔ·ÂÇÏ°í ¿£Å͸¦ Ãĺ¾½Ã´Ù. Á÷Á¢½ÇÇàâÀº ¸» ±×´ë·Î Á÷Á¢½ÇÇàÇØÁִ âÀÔ´Ï´Ù. ÀÌ Ã¢¿¡´Ù ¸í·É¾î¸¦ ÀÔ·ÂÇÏ°í ¿£Å͸¦ Ä¡¸é ±× Äڵ带 ½ÇÇàÇØÁÝ´Ï´Ù. ÇÁ·Î±×·¥ÇÒ ¶§ Áß°£Áß°£¿¡ È®ÀÎÇÏ°í ÇÒ ´ë ¸Å¿ì À¯¿ëÇÑ ±â´ÉÀÔ´Ï´Ù. activecell=123456À̶ó°í ÀÔ·ÂÇßÀ¸¸é excel·Î °¡¼­ È®ÀÌÇغ¼±î¿ä? ±â´ëÇß´ø ´ë·Î A2¼¿¿¡ 123456À̶ó°í ÀԷµǾîÀÖ½À´Ï´Ù. ¹°·Ð ÇöÀ缿ÀÌ ´Ù¸¥ ¼¿À̾ú´Ù¸é ±× ¼¿¿¡ 123456ÀÌ ÀԷµǾú°ÚÁÒ?

¿À´Ã ¿ì¸®´Â ActiveCell.FormulaR1C1 = "123" ÀÌ ÇöÀçÀÇ ¼¿¿¡´Ù 123À» ÀÔ·ÂÇØÁشٴ »ç½ÇÀ» ¾Ë¾Ò½À´Ï´Ù. ±×¸®°í Á÷Á¢½ÄÇàâ¿¡´Ù Äڵ带 ÀÔ·ÂÇصµ ½ÇÇàÀÌ µÈ´Ù´Â °ÍÀ» ¾Ë¾Ò½À´Ï´Ù.

¾Ñ Á¡½É½Ã°£ÀÌ ³¡³µ³×¿ä.. ³»ÀÏÀº ±×·³ ÀÌ ÄÚµåÀÇ ³ª¸ÓÁöºÎºÐ¿¡ ´ëÇؼ­ ¾Ë¾Æº¸µµ·Ï ÇÏ°Ú½À´Ï´Ù. ±×·³ ³»ÀÏ Á¡½É½Ã°£¿¡ ¶Ç ºË°Ú½À´Ï´Ù.

[ÀÌÀü °­ÁÂ]     [´ÙÀ½ °­ÁÂ]


dolljong@gmail.com