用VB合并同目录的多个Excel文件 1000个文件30秒搞定

Private Sub Command4_Click() CommonDialog1.DialogTitle = “Open files” 'CommonDialog1.Filter = “xls files(.xls)|.xls” CommonDialog1.Filter = “xls 文件.xls)|.xls|高版本文件(.xlsx)|.xlsx|所有文件(.)|.*” CommonDialo

>>阅读原文<<