2017年4月6日
修改Execl中sheet名的指定字符串为指定字符串
摘要： Sub test() Dim sheet_count As Integer Dim sheet_name, new_sheet_name, old_str, new_str As String sheet_count = ThisWorkbook.Sheets.Count old_str = "A1 阅读全文
posted @ 2017-04-06 20:13 Ouka傅 阅读(298) 评论(0) 推荐(0) 编辑