代碼運行結(jié)果：

代碼截圖：

代碼文本：

Public Sub 技巧()

    Dim myRange As Range

    Set myRange = Range("A1")    '指定任意的單元格

    MsgBox "單元格" & myRange.Address & "的格式為：" & myRange.NumberFormatLocal

    Set myRange = Nothing

End Sub

注釋：

【你們百度三天  不過我隨口一句】
鄭廣學(xué)老師獨家逐行手寫沉浸式案例教學(xué)法 知其然更知其所以然
全套教程包含 VBA175例+函數(shù)操作408例+代碼助手VIP
+100期直播回放
【268元進1000人高手VBA永久答疑群+880網(wǎng)站VIP】
買課咨詢請加微信EXCEL880B

點擊進入 鄭廣學(xué)老師Excel教程免費學(xué)7天 !

掃描二維碼