原创 CAD單行文本數字求和

CAD單行文本數字求和代碼部分 代碼部分 新建代碼片段 將以下代碼複製到 Sub xx() End Sub 之間即可 Dim oEnt As Object Dim mm As Double mm = 0