½Ð°Ý¬°¦ó·|¥X²{¥H¤U°T®§©O?
| ©«¤l60 ¥DÃD18 ºëµØ0 ¿n¤À83 ÂI¦W0  §@·~¨t²ÎNT ³nÅ骩¥»OFFICE2003 ¾\ŪÅv20 ©Ê§O¨k µù¥U®É¶¡2010-7-9 ³Ì«áµn¿ý2024-12-13 
 | 
 ½Ð°Ý¬°¦ó·|¥X²{¥H¤U°T®§©O?
| ¥Ø«e¤p§Ì¦b®Ñ¼gªì¶¥VBAµ{¦¡®É,¥Î¤F¤@¨Ç¿ý»sªº¥\¯à. ¼g¤F¤@Ó±NEXCEL¤ºªº¸ê®Æ, ¥t¦s¦¨¤å¦rÀɪº¥\¯à.
 ¦ý¬O·í§Ú±NVBAµ{¦¡¥[±K®É,«o¨q¥Xªþ¥ó¤§°T®§.
 ¦ý¬O¸Ñ±K®É«o¤S¥¿±` , ·Q°Ý¤@¤U¯uªº¬O¥[±K³y¦¨¶Ü?
 Y¬Oªº¸Ü , ¦³¿ìªk¸Ñ¨M¶Ü?
 
 =============¥H¤W¬Ù²¤============
 Output
 
 
 End Sub
 ___________¥H¤W¬°¥t¤@Ó¥¨¶°___________
 Sub output()
 
 OUTPUT_Folder2 = Sheet1.Range("F5")
 PN2 = Sheet1.Range("F3")
 
 Sheets("CO GERBER").Select
 ActiveWorkbook.SaveAs Filename:=OUTPUT_Folder2 & PN2 & "-CO GERBER.prn", FileFormat _
 :=xlTextPrinter, CreateBackup:=False
 ===============¥H¤U¬Ù²¤==================
 | 
 | 
|  | 
|  |  | 
|  |  | 
| ©«¤l472 ¥DÃD5 ºëµØ0 ¿n¤À485 ÂI¦W0  §@·~¨t²ÎWindows ³nÅ骩¥»MS Office ¾\ŪÅv100 ©Ê§O¨k ¨Ó¦Û»´ä µù¥U®É¶¡2010-7-4 ³Ì«áµn¿ý2014-12-28 
 
 | 
                
| ¬Ý¬Ý©ñÀɮתº¤å¥ó§¨¬O§_¦s¦b ©Î¿ù¦ì¸m | 
 | 
|  | 
|  |  | 
|  |  | 
| ©«¤l102 ¥DÃD17 ºëµØ0 ¿n¤À129 ÂI¦W0  §@·~¨t²Îwindows ³nÅ骩¥»2010 ¾\ŪÅv20 ©Ê§O¨k µù¥U®É¶¡2012-5-16 ³Ì«áµn¿ý2020-9-2 
 | 
                
| ¦^´_ 1# alex_wu 
 ¤]¦³¥i¯à¬O¤w¸g¦³¦P¦W¤å¥ó¦s¦b
 ¦¹®É¤]·|µo¥Í¿ù»~~
 ¦pªG·QnÅý¦P¦W¤å¥ó¦s¦b®Éª½±µÂл\
 ¥i¥H¨Ï¥Î
 on error resume next
 ¥t¥~¦pªG¤£·Qn¥L¤@ª½°Ý¬O§_Âл\
 ´N¦A¥[¤W application.displayalerts = false
 ¥H¤W§Æ±æ¹ï§A¦³À°§U!
 | 
 | 
|  | 
|  |  | 
|  |  |