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

§ä¤£¨ì¥¨¶°

§ä¤£¨ì¥¨¶°

¥»©«³Ì«á¥Ñ GBKEE ©ó 2011-9-26 15:20 ½s¿è

½Ð°ÝGBKEE
·í§Ú°õ¦æªü¦¿©Ò¦³³øªí¤¤ªº"¶×¤J¸ê®Æ"Áä®É·|¥X²{
§ä¤£¨ì¥¨¶°   
"¸ê®Æ·J¾ã-2.xls!Sheet1.CommandButton7_Click"
³Â·Ð±z¨ó§U¸Ñµª~~ÁÂÁÂ
¥t¥~§Úªº«H²{¦b³£MAIL¤£¹L¥h

ªü¦¿©Ò¦³³øªí.zip (37.28 KB)

©êºp~~¥H¬°¤w¸g¤W¶Ç¤F

¸ê®Æ·J¾ã-2.zip (495.08 KB)

TOP

±N"-"§R°£«á°õ¦æÅܦ¨¥X²{
¶W¥X¯Á¤Þ°}¦C½d³ò

TOP

§ó§ï«áÁÙ¬O¤@¼Ë­C~~
¶W¥X¯Á¤Þ°}¦C½d³ò
Run "¸ê®Æ·J¾ã2.xls!Sheet1.CommandButton7_Click"¡ö¡ö°ÝÃD©Ò¦b

TOP

°õ¦æ®É   ¸ê®Æ·J¾ã2.xls   ¬O¦b¶}±Òª¬ºA

Sub ¶×¤J¸ê®Æ()
Application.Calculation = xlCalculationManual '¤â°Ê­pºâ
Workbooks.Open Filename:="C:\Documents and Settings\k1489.KT_DOMAIN\®à­±\§õÂí¦¿\¨Ó·½¸ê®Æ\¸ê®Æ·J¾ã2.xls"  '¶}ÀÉ
Run "¸ê®Æ·J¾ã2.xls!Sheet1.CommandButton7_Click"
Run "¸ê®Æ·J¾ã2.xls!Sheet2.CommandButton11_Click"
Run "¸ê®Æ·J¾ã2.xls!Sheet3.CommandButton5_Click"
ActiveWorkbook.PrecisionAsDisplayed = False
ActiveSheet.Calculate
End Sub

TOP

¤w±N§¹¾ãµ{¦¡ªþ¥ó¤W¶Ç
¤º³¡¸ê®Æ§Ú¦³§R°£

¸ê®Æ·J¾ã2.zip (832.85 KB)

TOP

©êºp~~¶Ç¿ù¥÷¤F
­è­è¦³¥ÎGBKEE¦Ñ®vªº¤è¦¡ «öF8 ªGµMµo²{°ÝÃD¤F
¥t¥~¦p¦³ÀɦW¦³"-"¤]·|µLªk°õ¦æ
¤S¾Ç¨ì¤@©Û¤F
·PÁ¤G¦ì¦Ñ®vªº¼ö¤ß¨ó§U~~
¥t¥~GBKEE¦Ñ®v§AªºMAIL§Ú¶Ç¤£¹L¥h~~§A¥i¥HMAIL¤@«Ê«Hµ¹§Ú¸Õ¬Ý¬Ý¶Ü
ÁÂÁÂ

TOP

        ÀR«ä¦Û¦b : ¡i®É¶¡µLªk¾B¾×¡j©È®É¶¡®ø³u¡Aªá¤F³\¦h¤ß¦å¡A·QºÉ¦U¦¡¤èªk­n¾B¾×®É¶¡¡Aµ²ªG¬O¡G®ö¶O¤F§ó¦h®É¶¡¡A¥B¤@µL©Ò¦¨¡I
ªð¦^¦Cªí ¤W¤@¥DÃD