æ¹æ³/æ¥éª¤
é¦å ï¼æå¼æè æ°å»ºä¸ä¸ªExcelè¡¨æ ¼ï¼å¦ä¸å¾æ示ã
æä¸Alt+F11æå¼VBAç¼è¾çé¢ï¼å¹¶ç¹å»å·¦ä¾§ä»»æå·¥ä½è¡¨ï¼åºç°å³ä¾§ä»£ç ç¼è¾åºï¼å¦ä¸å¾æ示ã
VBAä¸å©ç¨Filecopyå½æ°å®ç°æ件çå¤å¶ï¼è¢«å¤å¶çæ件路å¾ä½ä¸ºå½æ°ç¬¬ä¸ä¸ªåæ°ï¼èå¤å¶å°çæ件路å¾ä½ä¸ºç¬¬äºä¸ªåæ°ï¼è¾å ¥ä»£ç ï¼
Sub é±¼æ¨æ··çª()
FileCopy "D:\é±¼æ¨æ··çª.txt", "D:\ymhz.txt"
End Sub
å¦ä¸å¾æ示ã
ç¹å»ä»£ç ä¸ä»»æä½ç½®ï¼ç¶åç¹å»âè¿è¡åç¨åºâæé®ï¼å¦ä¸å¾æ示ã
è¿æ ·ï¼å°æ件å¤å¶çæ件夹ä¸å°±å¯ä»¥çå°ï¼å©ç¨VBAå°æå®çæ件å¤å¶äºä¸ä»½ï¼å¦ä¸å¾æ示ã