2017年8月22日
20170822xlVBA ExportCellPhone
摘要： Public Sub GetCellPhone() Dim CellPhone As String Dim Arr As Variant Dim Brr As Variant Dim n As Long Dim FolderPath As String Dim FileName As String Dim FilePath As Strin... 阅读全文
posted @ 2017-08-22 16:30 wangway 阅读(191) 评论(0) 推荐(0)
2017-08-22校验
摘要： Const ADDIN_NAME As String = "AddInFunction" Const SETTING_ITEM As String = "AddInSetting" Const KEY_NAME As String = "RegisterCpu" Sub TestRegister() Debug.Print IsRegistered End Sub Public Func... 阅读全文
posted @ 2017-08-22 14:36 wangway 阅读(120) 评论(0) 推荐(0)