Exceller Home > VBA °­ÁÂ > VBA ÀÔ¹®°­ÁÂ

Exceller's VBA ÀÔ¹®°­ÁÂ

- ÃÖÃÊ ÀÛ¼ºÀÏ : 2008-08-25
- ÃÖÁ¾ ¼öÁ¤ÀÏ : 2008-08-25
- °­Á ÀÐÀ½¼ö : 14,435ȸ
- ÀÚ·á ÀÛ¼ºÀÚ :


- °­Á Á¦¸ñ : ¼¼»ó¿¡ µÑµµ ¾ø´Â "¿¢¼¿ Æ÷Åä °¶·¯¸®" ¸¸µé±â

µé¾î°¡±â Àü¿¡ : ÇÏ´Ã ¾Æ·¡ »õ·Î¿î °ÍÀº ¾ø´Ù

¶Ù¾î³­ Çõ½ÅÀ» ÀÌ·ç¾ú°Å³ª À§´ëÇÑ ¹ß¸íÀ» ÇÑ »ç¶÷¿¡°Ô, '¾î¶»°Ô ±×·± »ý°¢À» ÇÏ°Ô µÇ¾ú´À³Ä?'°í ¹°¾îº¸¸é '¿ì¿¬È÷ ±×·± »ý°¢ÀÌ ¶°¿Ã¶ú´Ù'´Â ¾ê±â¸¦ Çϰï ÇÑ´Ù.

'ÀÛÈ­Áõ(confabulation)'À̶ó´Â °ÍÀÌ ÀÖ´Ù. ¾ø¾ú´ø ÀÏÀ» ¸¶Ä¡ ÀÖ¾ú´ø °Íó·³ È®½ÅÀ» °¡Áö°í ¸»Çϰųª, ÀϾ´ø ÀÏÀ» À§ÀåÇϰųª ¿Ö°îÇÏ´Â °ÍÀ» ¸»ÇÑ´Ù. Ű½º ¼Ò¿©ÀÇ <±×·ì Áö´Ï¾î½º>¸¦ º¸¸é, ÇÑ »ç¶÷ÀÇ ÃµÀç°¡ À§´ëÇÑ ¹ß¸íǰÀ» ¸¸µé¾î³Â´Ù´Â °ÍÀÌ ¾ó¸¶³ª »ç½Ç°ú ´Ù¸¥ °ÍÀÎÁö¿¡ ´ëÇØ ¾Ë·ÁÁØ´Ù.

ÇÑ »ç¶÷ÀÇ ÃµÀç°¡ À§´ëÇÑ ¹ß¸íǰÀ» ¸¸µé¾î³Â´Ù´Â À̾߱â´Â ½ÅÈ­¿¡ ºÒ°úÇÏ´Ù. À§´ëÇÑ ¹ß¸íǰÀº ¿ª»ç¸¦ ºû³½ À§´ëÇÑ ¹ß¸í°¡°¡ ¾Æ´Ñ ¿©·¯ »ç¶÷µéÀÌ ¸ð¿© ÀÌ·ç¾î³»´Â ±×·ì Áö´Ï¾î½º¸¦ ÅëÇØ ¸¸µé¾îÁ³´Ù.

¸ðµç À§´ëÇÑ ¹ß¸íǰµéÀº ÀÛÀº ¾ÆÀ̵ð¾îµéÀÌ ²÷ÀÓ¾øÀÌ ¿¬°áµÇ´Â °úÁ¤¿¡¼­ ź»ýµÈ´Ù. óÀ½ ³ª¿Â ¾ÆÀ̵ð¾î´Â ´ëºÎºÐ ÀÛ°í Æò¹üÇÏÁö¸¸ ÀÌ·¯ÇÑ ¾ÆÀ̵ð¾î¸¦ Çϳª·Î ¸ðÀ¸´Â °¡¿îµ¥ »õ·Î¿î ¾ÆÀ̵ð¾î°¡ ź»ýÇϰųª ±âÁ¸ÀÇ ¾ÆÀ̵ð¾î°¡ »õ·Ó°Ô ÀçÇØ¼®µÇ´Â °ÍÀÌ´Ù. Àü½Å? »õ¹Â¾ó ¸ð½º°¡ ¹ß¸íÇÏÁö ¾Ê¾Ò´Ù. Àü±¸? Å丶½º ¿¡µð½¼ÀÌ ¹ß¸íÇÏÁö ¾Ê¾Ò´Ù. ºñÇà±â? ¶óÀÌÆ® ÇüÁ¦°¡ ¹ß¸íÇÏÁö ¾Ê¾Ò´Ù.

»ç¶÷µéÀº ¸¶Ä¡ ±× ¾ÆÀ̵ð¾î¸¦ ÀÚ½ÅÀÌ Á÷Á¢ »ý°¢ÇØ ³½ °ÍÀ¸·Î »ý°¢ÇÏÁö¸¸ ½ÇÁ¦·Î´Â »çȸÀûÀÎ °ü°è¸¦ ÅëÇØ ¾òÀº °ÍÀÌ´Ù. ÅëÂû·ÂÀ» À̲ø¾î³»´Â »çȸÀû/Çù·ÂÀû ÀÚ±ØÀ» ÀǽÄÀûÀ¸·Î ÀÎÁöÇÏÁö ¸øÇϱ⠶§¹®¿¡, ¹®Á¦¸¦ ÇØ°áÇÏ´Â ÅëÂû·ÂÀÌ ¾î´À ¼ø°£ °©Àڱ⠶°¿À¸¥´Ù´Â Å͹«´Ï¾ø´Â ¹ÏÀ½Àº ¾ÕÀ¸·Îµµ ¿À·§µ¿¾È »ì¾Æ³²À» °ÍÀÌ´Ù.

<±×·ì Áö´Ï¾î½º>, Ű½º ¼Ò¿©

ÀÌ·± ¿¹´Â ºñ´Ü °úÇÐÀû ¹ß¸í¿¡¸¸ ±¹ÇѵÇÁö ¾Ê´Â´Ù. ¿¹¼úÀÛǰ¿¡¼­µµ ¼ö¸¹Àº °ü·Ã »ç·ÊµéÀ» ã¾Æº¼ ¼ö ÀÖ´Ù. ¿¡µÎ¾Æ¸£ ¸¶³×ÀÇ <¿Ã·©ÇǾÆ>´Â Ƽġ¾Æ³ëÀÇ <¿ì¸£ºñ³ëÀÇ ºñ³Ê½º>, °í¾ßÀÇ <¿ÊÀ» ¹þÀº ¸¶ÇÏ>·ÎºÎÅÍ ¿µÇâÀ» ¹ÞÀº °ÍÀ¸·Î ÃßÁ¤µÈ´Ù. ¿Ã·©ÇǾƸ¦ ±×¸®±â À§ÇÑ ½ºÄÉÄ¡¸¦ º¸¸é ±×³àÀÇ ÀÚ¼¼°¡ ¾Þ±×¸£ÀÇ <±×¶ûµå ¿À´Þ¸®½ºÅ©>·ÎºÎÅ͵µ ¿µÇâÀ» ¹Þ¾ÒÀ½À» À¯ÃßÇÒ ¼ö ÀÖ´Ù. ¸¶³× ¶ÇÇÑ Æ¼Ä¡¾Æ³ë¿¡ ´ëÇØ "°ÅºÎÇÒ ¼ö ¾øÀ» ¸¸Å­ ¼ø¼öÇÑ ¼±À» º¸¿©ÁÖ´Â ÀÛ°¡"¶ó¸ç Á¸°æÀ» Ç¥ÇÑ ¹Ù ÀÖ´Ù.


1863 | ĵ¹ö½º¿¡ À¯È­ | 130.5 X 190cm | ÆÄ¸®, ¿À¸£¼¼ ¹Ì¼ú°ü

¿¡µå¹Ù¸£µå ¹¶Å©ÀÇ <Àý±Ô>¶ÇÇÑ ¸¶Âù°¡ÁöÀÌ´Ù. 'ÀÚ¿¬À» °üÅëÇÏ´Â ±×Ä¡Áö ¾Ê´Â ºñ¸í¼Ò¸®'¸¦ µé¾ú´ø ±â¾ïÀ» ¹ÙÅÁÀ¸·Î ±×·È´Ù´Â ÀÌ ÀÛǰÀº ºÒ¾È°ú µÎ·Á¿ò, ¼Ò¿Ü¸¦ Ç¥ÇöÇϰí ÀÖ´Â Çö´ëÀÇ ¾ÆÀÌÄÜÀ̶ó°í ÇÒ ¼ö ÀÖ´Ù. ÇØ°ñó·³ º¸ÀÌ´Â Àι°ÀÇ ¾ó±¼°ú ¾ç¼ÕÀÇ À§Ä¡´Â À×Ä« ¹®¸íÀÇ À¯ÀûÁö¿¡¼­ ¹ß°ßµÈ ¹ÌÀ̶󿡼­ ¿µ°¨À» ¹ÞÀº °ÍÀ¸·Î º¸ÀδÙ(´ç½Ã ±× ¹ÌÀ̶ó´Â ÆÄ¸®ÀÇ Æ®·ÎÄ«µ¥·Î±Ã¿¡ Àü½ÃµÇ°í ÀÖ¾ú´Ù). ÇØ°ñ°°Àº Àι°ÀÇ ¿À¸¥ÂÊ ¹è°æ¿¡ ÀÖ´Â ±Þ°ÝÇÏ°Ô ±â¿ï¾îÁø »ç¼±Àº ±¸½ºÅ¸ºê ͏®º¸Æ®ÀÇ <¹ßÄÚ´ÏÀÇ ³²ÀÚ>¿¡¼­ °³³äÀ» ä¿ëÇÏ¿´´Ù.


1898 | ¸¶ºÐÁö¿¡ À¯È­ | 91 X 73.5cm | ¿À½½·Î, ³»¼Å³Î °¶·¯¸®

'°ÅÀå'À̶ó´Â ¼ö½Ä¾î°¡ ´Ã À̸§ ¾Õ¿¡ µû¶ó´Ù´Ï´Â ÆÄºí·Î ÇÇÄ«¼Ò ¶ÇÇÑ ÀÌ·¯ÇÑ »ç½Ç·ÎºÎÅÍ ÀÚÀ¯·ÓÁö ¾Ê´Ù. Å¥ºñÁòÀÇ Æ¯Â¡À» º¸¿©ÁÖ´Â ÀÛǰÀÇ ÇϳªÀÎ <¾Æºñ´¨ÀÇ Ã³³àµé>À» º¸¸é, ¿À¸¥ÂÊ ¾Æ·¡¿¡ Âɱ׸®°í ¾É¾Æ ÀÖ´Â Àι°Àº Æú ¼¼ÀÜÀÇ <¸ñ¿åÇÏ´Â ¿©Àεé>ÀÇ ¿µÇâÀ» ¹ÞÀº °ÍÀ¸·Î º¸ÀδÙ. ÀÌ ÀÛǰÀÌ º¸¿©ÁÖ´Â ¼öÁ÷Àû ±¸µµ³ª °úÀåÇÏ°Ô µÚƲ¸° Àι°ÀÇ Çü»ó, ÆÄ¶õ»ö°ú ÇÎÅ©»öÀÇ ÁÖÁ¶ µîÀº ¿¤ ±×·¹ÄڷκÎÅÍ ¸¹Àº ¿µÇâÀ» ¹Þ¾Ò´Ù°í ÇÑ´Ù.

ÀÛǰ ¿ÞÂÊ¿¡ ÀÖ´Â ¿©¼ºÀÇ ¸Ó¸® À§¿¡ Åö Æ¢¾î³ª¿Â ¼ÕÀº ¿¤ ±×·¹ÄÚÀÇ <¹¬½Ã·ÏÀû ºñÀü>¿¡¼­ ¿ÞÂÊ¿¡ ÀÖ´Â »ç¶÷ÀÇ ¼ÕÀ» ¿¬»ó½ÃŲ´Ù. ´«ÀÌ ¿ÞÂÊÀ¸·Î ½ÉÇÏ°Ô Ä¡¿ìÃÄ ÀÖ´Â Àü¸éÀÇ Àι°ÀÇ ¾ó±¼Àº °í°»ÀÇ <Àú½Â»çÀÚÀÇ ´«±æ> ¿ÞÂÊ ³¡¿¡ ³ª¿À´Â Àι°ÀÇ ¸Ó¸®¿Í À¯»çÇѵ¥ À̰͵éÀº ¸ðµÎ °í´ë ÀÌÁýÆ® ¿¹¼ú¿¡¼­ ¿µ°¨À» ¹ÞÀº °ÍÀ̶ó°í ÇÑ´Ù.

¿ÞÂÊ¿¡¼­ µÎ¹øÂ° Àι°Àº ¹ÌÄ̶õÁ©·ÎÀÇ <Á׾´Â ³ë¿¹>¿Í °í°»ÀÌ Á¦ÀÛÇÑ <¿Àºñ¸®>¶ó´Â Å×¶óÄÚŸ Á¶»óÀ» ¿¬»ó½Ã۸ç, ¾ç¼ÕÀ» À§·Î µé¾î¿Ã¸° ¿©¼ºÀÇ ´©µå¿Í ¾ó±¼ Ç¥Á¤Àº °í¾ßÀÇ <¿ÊÀ» ¹þÀº ¸¶ÇÏ>¸¦ ¶°¿Ã¸®°Ô ÇÑ´Ù. ÀüüÀûÀ¸·Î 5¸íÀÇ ¾ó±¼ ¸ð½ÀÀº ÇÇÄ«¼ÒÀÇ Á¶±¹ÀÎ À̺£¶ó¾ÆÀÇ °í´ë Á¶°¢»ó°ú À¯»çÇÏ´Ù.


1907 | ĵ¹ö½º¿¡ À¯È­ | 243.9 X 233.7cm | ´º¿å, Çö´ë¹Ì¼ú°ü

±×·¯°í º¸¸é ÇÏ´Ã ¾Æ·¡ '»õ·Î¿î °Í'Àº ¾ø´Ù´Â »ý°¢ÀÌ Àý·Î µç´Ù. »ç¶÷µéÀº ¸¶Ä¡ ±× ¾ÆÀ̵ð¾î¸¦ ÀÚ½ÅÀÌ Á÷Á¢ »ý°¢ÇØ ³½ °ÍÀ¸·Î »ý°¢ÇÏÁö¸¸ ½ÇÁ¦·Î´Â ±âÁ¸ÀÇ °ÍÀ» Àç¹èÄ¡Çϰí ÀÚ½ÅÀÇ »ý°¢À» Á¶±Ý¾¿ µ¡´ë¾î¼­ ¹ßÀü½ÃÄÑ ³ª°£ °ÍÀÏ µû¸§ÀÌ´Ù.

¿ì¸®°¡ ´Ù¸¥ »ç¶÷ÀÇ ¹ß¸íǰÀ¸·Î ÇöÀç¿Í °°Àº ÇýÅÃÀ» ´©¸®µí, ¿ì¸®ÀÇ ÁöÇý¿Í ¹ß¸íǰÀº ´Ù¸¥ »ç¶÷ ¶Ç´Â Èļ¼¿¡°Ô µµ¿òÀÌ µÇµµ·Ï ÁغñÇÒ ÀÏÀÌ´Ù. ³»°¡ °ÅÀÎÀÇ ¾î±ú¿¡ ¿Ã¶óŸ ÀÖÀ½À¸·Î ÀÎÇØ Á»´õ ¸Ö¸® º¼ ¼ö ÀÖµí, ³ª ¶ÇÇÑ ´Ù¸¥ ´©±º°¡¸¦ À§ÇØ ¾î±ú¸¦ ºô·ÁÁÙ ÀÏÀÌ´Ù.


¿¹Á¦ ÆÄÀÏ ³»·Á¹Þ±â


ÇÒ±î ¸»±î ¾à°£ ¸Á¼³À̰í ÀÖ¾ú´Âµ¥, 'ÅÇ¿¡ À̹ÌÁö ÄÁÆ®·ÑÀ» »ðÀÔÇÏ´Â ¹æ¹ý'¿¡ ´ëÇØ Áú¹®À» ÁֽŠºÐÀÌ ÀÖ±º¿ä. ¾÷¹«»ó Çǰ¡ µÇ°í »ìÀÌ µÉ °Í... °°Áö´Â ¾Ê½À´Ï´Ù¸¸, µðÄ«·Î ÂïÀº »çÁøµéÀ» Àß º¸°üÇØ µÎ¾ú´Ù°¡ ³ª¸¸ÀÇ °¶·¯¸®¸¦ ¸¸µé¾î º¸´Â °Íµµ ³ª¸§´ë·Î Àç¹Ì°¡ ÀÖÀ» ¹ý ÇÕ´Ï´Ù.

<¿Ï¼º ¿¹>

¿¹Á¦ ÆÄÀÏÀ» ¿­°í 'My Gallery' ÅÇ¿¡ ÀÖ´Â 'One Fine Day' ÄÁÆ®·ÑÀ» Ŭ¸¯Çϸé À̹ÌÁö ÄÁÆ®·ÑÀÌ ¾Æ·¡·Î Á¸£¸¤~ ÆîÃÄÁö¸ç, À̹ÌÁö¸¦ Ŭ¸¯Çϸé ÇØ´ç À¥ »çÀÌÆ®°¡ ¿­¸³´Ï´Ù. ¾î¶²°¡¿ä? »ýÀÏÀ̳ª °¢Á¾ ±â³äÀÏ ¼±¹°·Îµµ ¼Õ»öÀÌ ¾øÀ» °Í °°Áö ¾Ê½À´Ï±î? ±×·¸´Ù°í À̰͸¸ ¹Ï°í °áÈ¥±â³äÀÏÀ̳ª »ýÀÏÀ» ¸ÂÀÌÇÏ¾ß Á¤·«ÀûÀ¸·Î(?) ±ôºýÇÏÁö´Â ¸¶½Ã±¸¿ä... ^^;

¾î¶»°Ô ¸¸µå´ÂÁö ÀÛ¾÷ ¼ø¼­¸¦ ¾Ë¾Æº¸µµ·Ï ÇÏÁÒ.

1. 'Office ´ÜÃß-»õ·Î ¸¸µé±â'¸¦ Ŭ¸¯ÇÏ¿© »õ·Î¿î ÆÄÀÏÀ» Çϳª ¸¸µì´Ï´Ù.

2. 'Office ´ÜÃß-´Ù¸¥ À̸§À¸·Î ÀúÀå-Excel ¸ÅÅ©·Î »ç¿ë ÅëÇÕ ¹®¼­'¸¦ ¼±ÅÃÇÑ ´ÙÀ½ Àû´çÇÑ À̸§À¸·Î ÀúÀåÇÏ°í ÆÄÀÏÀ» ´Ý½À´Ï´Ù.

3. 'Office 2007 Custom UI Editor'¸¦ ½ÇÇàÇÏ¿© ¾Õ¿¡¼­ ÀÛ¼ºÇÑ ¸ÅÅ©·Î »ç¿ë ÅëÇÕ ¹®¼­¸¦ ºÒ·¯¿É´Ï´Ù. XML·Î ´ÙÀ½°ú °°Àº ¸®º»X Äڵ带 ÀÛ¼ºÇÕ´Ï´Ù.

<customUI xmlns='http://schemas.microsoft.com/office/2006/01/customui'>

<ribbon>

    <tabs>

        <tab id="MyTab" label="My Gallery" insertBeforeMso="TabHome">

        <group id="grpImage" label="Insert Image">

            <gallery id="MyGallery1" label="One Fine Day" size="large"

                columns="3" itemWidth="133" itemHeight="100"

                    imageMso="PictureInsertFromFile" onAction="WhatShallIDo">

                <item id="pic_01" image="pic_01"/>

                <item id="pic_02" image="pic_02"/>

                <item id="pic_03" image="pic_03"/>

                <item id="pic_04" image="pic_04"/>

                <item id="pic_05" image="pic_05"/>

                <item id="pic_06" image="pic_06"/>

                <item id="pic_07" image="pic_07"/>

                <item id="pic_08" image="pic_08"/>

                <item id="pic_09" image="pic_09"/>

                <item id="pic_10" image="pic_10"/>

                <item id="pic_11" image="pic_11"/>

                <item id="pic_12" image="pic_12"/>

            </gallery>

        </group>

    </tab>

</tabs>

</ribbon>

</customUI>

¿©±â±îÁö´Â ÀÌÀü¿¡ »ìÆìº» ¸®º» Ä¿½ºÅ͸¶ÀÌ¡ ¹æ¹ý°ú Å©°Ô ´Ù¸£Áö ¾Ê½À´Ï´Ù¸¸, À̹ÌÁö¸¦ »ðÀÔÇÏ´Â °æ¿ì¿¡´Â ÇÑ °¡Áö °úÁ¤ÀÌ Ãß°¡µË´Ï´Ù. ÀÏ´Ü ÇÊ¿äÇÑ À̹ÌÁö´Â ƯÁ¤ÇÑ À§Ä¡¿¡ ÀúÀåµÇ¾î ÀÖ´Ù°í °¡Á¤Çϰí ÁøÇàÇÕ´Ï´Ù. ¿©·¯ºÐ PC¿¡¼­ À̹ÌÁö ÆÄÀÏÀÌ ÀÖ´Â Æú´õ¸¦ ÁöÁ¤ÇÏ½Ã¸é µÇ°Ú½À´Ï´Ù.

4. Customer UI Editor¿¡¼­ 'Insert Icons' ¾ÆÀÌÄÜÀ» Ŭ¸¯ÇÕ´Ï´Ù. 'Insert Custom Icons' ´ëÈ­»óÀÚ¿¡¼­, »ðÀÔÇÒ À̹ÌÁöµéÀ» ¼±ÅÃÇϰí '¿­±â' ¹öưÀ» Ŭ¸¯ÇÕ´Ï´Ù.

¿¡µðÅÍÀÇ ¿ìÃø â¿¡ »ðÀ﵃ À̹ÌÁöÀÇ ½æ³×ÀÏ(Thumbnail) À̹ÌÁö°¡ Ç¥½ÃµÇ¸é Á¦´ë·Î µÈ °ÍÀÔ´Ï´Ù.

¸¸¾à »ðÀÔµÈ À̹ÌÁöÀÇ ID¸¦ º¯°æÇϰųª »èÁ¦ÇÏ·Á¸é ÇØ´ç ½æ³×ÀÏ(Thumbnail)À» ¸¶¿ì½º ¿À¸¥ÂÊ ¹öưÀ¸·Î Ŭ¸¯ÇÏ°í ´ÜÃà ¸Þ´º Áß¿¡¼­ ¼±ÅÃÇÏ¸é µË´Ï´Ù.

5. 'Generate Callbacks' ¾ÆÀÌÄÜÀ» Ŭ¸¯ÇÏ¿© Äݹé ÇÁ·Î½ÃÀú¸¦ ¸¸µé°í, ¹üÀ§¸¦ ÁöÁ¤ÇÑ ´ÙÀ½ º¹»çÇÕ´Ï´Ù.

6. 'Save' ¹öưÀ» Ŭ¸¯ÇÏ¿© ÇöÀç ÆÄÀÏÀ» ÀúÀåÇÕ´Ï´Ù.

7. ¿¢¼¿·Î µÇµ¹¾Æ¿Í¼­ ÇØ´ç ÆÄÀÏÀ» ¿±´Ï´Ù. '°³¹ß µµ±¸' ÅÇÀÇ 'Visual Basic' ÄÁÆ®·ÑÀ» Ŭ¸¯ÇÏ¿© ¸ðµâ ½ÃÆ®¸¦ »ðÀÔÇϰí, ¾Õ¿¡¼­ º¹»çÇÑ Äݹé ÇÁ·Î½ÃÀú¸¦ ºÙ¿© ³Ö½À´Ï´Ù. ´ÙÀ½ Äڵ带 Âü°í·Î Äݹé ÇÁ·Î½ÃÀúÀÇ ³»¿ëÀ» ÀÛ¼ºÇÕ´Ï´Ù. °¢ »çÁøº°·Î Á»´õ ÀǹÌÀÖ´Â ³»¿ëÀ» »ðÀÔÇÏ·Á¸é ÀÌ ÄÚµåÀÇ ³»¿ëÀ» º¸¿ÏÇÏ¸é µË´Ï´Ù.

Sub WhatShallIDo(control As IRibbonControl, id As String, index As Integer)
    Select Case index + 1
        Case 1: OpenMyWeb "http://www.iexceller.com/MyPhotos/Pic242.asp"
        Case 2: OpenMyWeb "http://www.iexceller.com/MyPhotos/Pic243.asp"
        Case 3: OpenMyWeb "http://www.iexceller.com/MyPhotos/Pic244.asp"
        Case 4: OpenMyWeb "http://www.iexceller.com/MyPhotos/Pic246.asp"
        Case 5: OpenMyWeb "http://www.iexceller.com/MyPhotos/Pic266.asp"
        Case 6: OpenMyWeb "http://www.iexceller.com/MyPhotos/Pic268.asp"
        Case 7: OpenMyWeb "http://www.iexceller.com/MyPhotos/Pic278.asp"
        Case 8: OpenMyWeb "http://www.iexceller.com/MyPhotos/Pic278.asp"
        Case 9: OpenMyWeb "http://www.iexceller.com/MyPhotos/Pic279.asp"
        Case 10: OpenMyWeb "http://www.iexceller.com/MyPhotos/Pic279.asp"
        Case 11: OpenMyWeb "http://www.iexceller.com/MyPhotos/Pic303.asp"
        Case 12: OpenMyWeb "http://www.iexceller.com/MyPhotos/Pic342.asp"
    End Select
End Sub


Private Sub OpenMyWeb(strX As String)
    On Error GoTo ET
    ActiveWorkbook.FollowHyperlink Address:=strX, NewWindow:=True

ET:
    If Err.Number <> 0 Then
        MsgBox strX & "»çÀÌÆ®¸¦ ¿­ ¼ö ¾ø½À´Ï´Ù", , "Error Number : " & Err.Number
        On Error GoTo 0
        Err.Clear
    End If
End Sub

ÀÌÁ¦ ÆÄÀÏÀ» ´ÝÀº ´ÙÀ½ ´Ù½Ã ¿­¾î¼­ È®ÀÎÇØ º¸¼¼¿ä. 'One Fine Day' ¹öưÀ» Ŭ¸¯ÇßÀ» ¶§ ³ªÅ¸³ª´Â À̹ÌÁöÀÇ ¿­ ¼ö³ª Å©±â´Â ¾ÕÀÇ '3'´Ü°è¿¡¼­ ±½°Ô Ç¥½ÃÇÑ ¸®º»X Äڵ带 Àû´çÈ÷ ¼Õº¸½Ã¸é µÇ°Ú½À´Ï´Ù. ¹°·Ð À̹ÌÁö°¡ ´õ Ãß°¡µÇ°Å³ª »èÁ¦ÇÏ´Â °æ¿ì¶ó¸é <item> ű׸¦ »óȲ¿¡ ¸Â°Ô Á¶ÀýÇØ¾ß°ÚÁÒ?

Àß ÀÀ¿ëÇÏ¸é ¿µ»ó Ä«µå³ª µðÁöÅÐ ¾Ù¹üÀ¸·Î È®ÀåÇÏ´Â °Íµµ ¾ó¸¶µçÁö °¡´ÉÇÕ´Ï´Ù. ¿©·¯ °¡Áö·Î ÀÀ¿ëÇØ º¸½Ã°í, Àç¹ÌÀÖ´Â °ÍÀÌ ³ª¿À¸é Exceller¿¡°Ôµµ »ì¦ ¾Ë·ÁÁÖ¼¼¿ä. ²ÀÀÌ¿ä~~


Previous

Next

Creative Commons License

¡¡