摘要:
Sub Del_Col()Application.DisplayAlerts = FalseDim myFiles As StringDim myExcels As StringWith Application.FileDialog(msoFileDialogFolderPicker).Show.A 阅读全文
posted @ 2021-05-14 09:49
懒惰的小松鼠
阅读(871)
评论(0)
推荐(0)
摘要:
Sub Books2Sheets()Dim fd As FileDialog Set fd = Application.FileDialog(msoFileDialogFilePicker) Dim newwb As Workbook Set newwb = Workbooks.Add With f 阅读全文
posted @ 2021-05-14 09:47
懒惰的小松鼠
阅读(771)
评论(0)
推荐(0)