Find centralized, trusted content and collaborate around the technologies you use most.
Teams
Q&A for work
Connect and share knowledge within a single location that is structured and easy to search.
宣言
Dim currDoc As Object Dim currSheet As Object Dim cell As Object currDoc = ThisComponent currSheet = currDoc.sheets(0)
逻辑
cell.Formula = cDbl(cell.Value)
期望输出 100,00
基于@JohnSUN 的评论:只需为要格式化的单元格添加一行:
Cell.NumberFormat = 2
第 189 页上的所有数字格式表