1

宣言

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

4

1 回答 1

1

基于@JohnSUN 的评论:只需为要格式化的单元格添加一行:

Cell.NumberFormat = 2 

第 189 页上的所有数字格式表

于 2021-08-12T09:51:47.750 回答