摘要: Option Explicit Sub ExcelVersion() Dim MyVersion As String Select Case Application.Version '获取版本号,根据版本号返回版本 Case "8.0" MyVersion = "97" Case "9.0" MyV 阅读全文
posted @ 2021-09-19 23:13 编码的奥秘 阅读(1272) 评论(0) 推荐(0) 编辑