2020年7月22日
excel 取sheet名
摘要： Sub fz() Dim i As Integer For i = 1 To Sheets.Count Range("A" & i).Value = Sheets(i).Name Next End Sub 阅读全文
posted @ 2020-07-22 10:56 rjm123456 阅读(338) 评论(0) 推荐(0) 编辑