选区保留小数位数

江林

选区选择数据，如果是公式，就变成=round(公式,2),如果是数值，就保留2位小数，试了很多次，是公式就不行，用的JSA

LIUZHU

JSA代码

1. function 转换(){
   
2.         let arr=Range("c2:e5").FormulaR1C1.map(x=>{
   
3.                  return x.map(y=>y.includes("=")?`=ROUND(${y.slice(1)},2)`:Number(y).toFixed(2));
   
4.         });
   
5.         Range("c8").Resize(arr.length,arr[0].length).Value2=arr;
   
6. }
   

复制代码

LIUZHU

题目较为简答

江林

LIUZHU 发表于 2024-4-25 11:30
JSA代码

用selection来选择时，一个单元格不得行

LIUZHU

江林 发表于 2024-4-25 21:01
用selection来选择时，一个单元格不得行

什么意思啊？

江林

LIUZHU 发表于 2024-4-25 21:42
什么意思啊？

我是用这个来做选区操作，把选区内的的内容保留2位小数，如果选区是一个单元格，这个代码就会出错，可能是用了数组吧

xd3210

selection是已选定的区域，如果没有选定或选定的区域没有或不是数字，用小数处理函数进行处理就会报错，不知道是不是这样？供参考

LIUZHU

Selection如果只是单个单元格的话，就构建不了数组。代码要改下：

1. function 转换(){
   
2.         let arr=Selection.FormulaR1C1;
   
3.         if (Selection.Cells.Count==1) arr=Selection.Resize(1,2).FormulaR1C1;
   
4.         let res=arr.map(x=>{
   
5.                  return x.map((y,i)=>{
   
6.                          if (i==Selection.Columns.Count) return null;
   
7.                          return y.includes("=")?`=ROUND(${y.slice(1)},2)`:Number(y).toFixed(2)
   
8.                  });
   
9.         });
   
10.         Selection.Resize(Selection.Rows.Count,Selection.Columns.Count).Value2=res;
    
11. }

复制代码

LIUZHU

效果是这样子的

LIUZHU

新的附件，请看看