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

[µo°Ý] application.run µLªk©I¥s°õ¦æ¥¨¶°

[µo°Ý] application.run µLªk©I¥s°õ¦æ¥¨¶°

§Ú¥Î§ó§ïÀx¦s®æ¨Ó¦Û°Ê°õ¦æ¥¨¶°
³£¥d¦b³o¤@¨B
application.run  "Book2!Macro2"
¸õ¥X°T®§   "µ{§Ç©I¥s©Î¤Þ¼Æ¤£¥¿½T "
·d¤F¦n¤[   ¤£¬OÀɦW¥[¥¨¶°¦WºÙ¶Ü?
³Â·Ð°ª¤â«üÂI

¤v¸Ñ¨M  ÁÂÁÂ

TOP

¦^´_ 2# michaee
½Ð¤À¨É¦p¦ó¸Ñ¨M¿ù»~
·P®¦ªº¤ß......(¦b³Â»¶®a±Ú°Q½×°Ï.¥Î¤ß¾Ç²ß·|¦³¶i¨Bªº)
¦ý¸ê·½µL­­,«á´©¦³­­,  ¤@¤Ñ1¤¸ªºÃÙ§U,¤H¤H¦³¯à¤O.

TOP

¦^´_ 3# GBKEE
·s¼W¤@¬¡­¶Ã¯¡A ThisWorkbook ¤º®e¦p¤U¡G
  1. Sub Tx()
  2.     Application.Run ("'pay.xls'!ThisWorkbook.Ex")
  3.     MsgBox ("§¹¦¨¤F¡I")
  4. End Sub
½Æ»s¥N½X
°²³]¥h°õ¦æ "¦h±i¤u§@ªí¥t¦s¬¡­¶Ã¯¤Î§ì¦í¹w³]±K½X" ªº´£°ÝÀÉ
pay.xls ªº Sub Ex()¡C
¦]¬°¥»¤å·í¨Æ¤H¥¼¦^ÂСA©Ò¥H§Ú«K¥H¤µ¦­ªº°ÝÃD¨Ó§@µª¤F¡C

TOP

        ÀR«ä¦Û¦b : ¡i°µ¤Hªº¶}©l¡j¨C¤@¤Ñ³£¬O¬G¤Hªº¶}©l¡A¨C¤@­Ó®É¨è³£¬O¦Û¤vªºÄµ±§¡C
ªð¦^¦Cªí ¤W¤@¥DÃD