ªð¦^¦Cªí ¤W¤@¥DÃD µo©«

private sub ®É¶¡¤[¤F§Ñ°O¦W¦r¦p¦ó§ä¥X¨Ó.

private sub ®É¶¡¤[¤F§Ñ°O¦W¦r¦p¦ó§ä¥X¨Ó.

¦U¦ì¤j¤j ¤@¯ëÊúSUB «öALT + F11 §Y¥i¬Ý¨£.¦ýprivate sub «o­n¿é¤J¦W¦r¤~¥i¬Ý¨£,¦pªG§Ñ¤F¦W¦r­n¦p¦ó§ä¥X¨Ó

¦^´_ 12# GBKEE


    ÁÂÁ¤j¤jªº»¡©ú.
50 ¦r¸`¥H¤º
¤£¤ä«ù¦Û©w¸q Discuz! ¥N½X

TOP

¦^´_  GBKEE
§Ú¸Õ¤F¥u¥´ subªº¦W ³£¥i¥H¥i©I¥s Private ªºµ{§Ç.
¥u¥´ subªº¦W ¦³¤°»ò¤£¦nªº¦a¤è¶Ü?      ¨S¦³¤°»ò¤£¦n.­n¬Ý§Aªº»Ý¨D!
basarasy µoªí©ó 2010-10-24 09:54

§A¬O¦b¦P¤@­Ó¼Ò²Õ¸Ì,©I¥s³o¼Ò²Õ¤ºªºPrivate ªºµ{§Ç§a!
¨â­Ó¼Ò²Õ¶¡ µLªk¥Î Call ¨Ó©I¥s©¼¦¹ªº Private ªºµ{§Ç ¥u¯à¥ÎRun

TOP

¦^´_ 10# GBKEE
§Ú¸Õ¤F¥u¥´ subªº¦W ³£¥i¥H¥i©I¥s Private ªºµ{§Ç.
¥u¥´ subªº¦W ¦³¤°»ò¤£¦nªº¦a¤è¶Ü?
50 ¦r¸`¥H¤º
¤£¤ä«ù¦Û©w¸q Discuz! ¥N½X

TOP

¦^´_ 8# basarasy
Call Test ->©I¥s  Sub Test
Test  ->   ¤@¼Ë¬O©I¥s  Sub Test
Call   ¤£¥i©I¥s Private ªºµ{§Ç
Run  ¥i©I¥s Private ªºµ{§Ç

TOP

GBKEE  Tks

TOP

¦^´_ 7# GBKEE
½Ð°Ý¤j¤j.§Ú¥­±`¦b  SUB A   RUN  SUB  B®É,³£¤£¥ÎCall ©MRUN,¥u¥´SUB ªº¦W.
¥ÎCall ©MRUN©M¤£¥Î¦³¤°»ò¦n³B?
50 ¦r¸`¥H¤º
¤£¤ä«ù¦Û©w¸q Discuz! ¥N½X

TOP

¦^´_ 5# jim
Call ¥u¥i¥G¥s Public Sub µLªk ¥G¥s Private Sub
¥ÎRun  ¥i¥G¥s Public Sub ¤Î Private Sub
ª«¥ó¼Ò²Õ (ThisWorkbook,Sheet1,Sheet12.....):
¨Ò¦p¦ì¦bSheet1®É ¤£ºÞ¬O Private Sub TEST() ©Î¬O Sub TEST()    ¬Ò¥Î   Run "Sheet1.TEST"
¤@¯ë¼Ò²Õ(Module):
¤£ºÞ Sub  ¬O§_¬O Private Sub TEST() ©Î¬O Sub TEST()               ª½±µ¥Î  Run ".TEST"

TOP

¦^´_ 5# jim


    Private Sub c()

MsgBox "1"
End Sub
Sub kk()

c
End Sub
50 ¦r¸`¥H¤º
¤£¤ä«ù¦Û©w¸q Discuz! ¥N½X

TOP

½Ð±Ð¦U¦ì«e½ú¤@­Ó°ÝÃD
¦b sub¤½¦¡¤º¥i¥Î call ¨Ó©I¥s ¥t¤@­Ó sub  ¦p
  sub kk()
   --------
   call a     ( a ¬O¥t¤@­Ó sub )
--------

  §Ú¦³¤@­ÓºÃ°Ý  ¦b sub ¤º ¥i§_©I¥s ¥t¥~¤@­Ó private sub c () ¥Î¦ó¤è¦¡©I¥s ?
                      ¦b private sub ¤º ¥i§_©I¥s ¥t¥~¤@­Ó sub k () ¥Î¦ó¤è¦¡©I¥s ?

TOP

        ÀR«ä¦Û¦b : ¥@¤W¦³¨â¥ó¨Æ¤£¯àµ¥¡G¤@¡B§µ¶¶ ¤G¡B¦æµ½¡C
ªð¦^¦Cªí ¤W¤@¥DÃD