JS问答练习帖

我的城市你来过

问题：函数创建数组?
举例1:函数创建数组的方法?

function text(){
        let arr1=new Array();               //创建1个空数组[]
        let arr2=new Array(5);                                //创建1个5个元素的数组
        let arr3=new Array(10,4,8);                        //创建[10,4,8]数组
        let arr4=Array.of();                                //创建1个空数组
        let arr5=Array.of(5);                            //创建数组[5]
        let arr6=Array.of(10,4,8);                        //创建数组[10,4,8]
       
        let arr7=[1,2,3];
        let arr8=Array.from(arr7);                        //等同于[...arr7],当arr7内元素值变化，arr8初始数值不变
        let arr9=Array.from("abc985");      //等同于[..."abc985"]==[a,b,c,9,8,5]
        let arr10=Array.from(arr7,x=>x*10)  //生成数组[10,20,30]
}       

Again123456

我的城市你来过 发表于 2024-8-15 17:25
问题Q：数组去重?
举例1：已知A列数据，去重填入B列?（运行速度慢，未排序，待优化）

filter去重，好像也不慢啊！

今铭昔

我的城市你来过 发表于 2024-8-15 17:25
问题Q：数组去重?
举例1：已知A列数据，去重填入B列?（运行速度慢，未排序，待优化）

1. function test04(){
   
2.     let arr = Range("A1",Cells(Rows.Count, 1).End(xlUp))()
   
3.     let res = [...new Set(arr.flat())].map(v => [v])
   
4.     Range('B1').Resize(res.length, 1).Value2 = res
   
5. }

复制代码

我的城市你来过

问题Q：比较2个单元格值?
举例1：单元格a1(日常变化),更新后比较单元格b1，取最大值填入b1单元格?

function text(){
        let rn=InputBox("请入A1单元格数值");
                let a1=Range("a1").Value2=Number(rn);
                let b1=Range("b1").Value2
                        Range("b1").Value2=WorksheetFunction.Max(a1,b1)
}

ladeng6666

代码收集站啊，真好！感谢楼主分享

我的城市你来过

问题Q：获取文件夹中的工作薄名?
举例1：获取文件夹中的工作薄名?

/*function text(){
        let pah=ThisWorkbook.Path;
                let file=Dir(`${pah}/*.*`);
                        while (true){
                                Console.log(file);
                                try{
                                        file=Dir();
                                }catch(err){
                                        alert("工作薄已检索完毕");break
                                }
                        }
}*/

我的城市你来过

问题Q：单行、单列单元格数据转数组?
举例1：单行、单列单元格数据转数组?

function text(){
        let arr=Array.from(Range("a1",Range("a999").End(xlUp)).Value(),x=>x[0]);brr=[]
        brr=[...brr,arr]
        Console.log(`${brr}`)
       
        let arr1=Array.from(Range("a1").Resize(1,5).Value()[0]);
        Console.log(`${arr1}`)
}

我的城市你来过

问题Q：数组的修改读写?
举例1：将数组中满足条件的值输出至单元格区域?

function text2(){
        var arr=[85,86,84,89,95,97,92];
        var newarr=[],num=0
        for (var i in arr){
                if (arr[i]>=90){
                        newarr[num]=arr[i];
                        num++
                }
        }Range("e1").Resize(1,newarr.length).Value2=newarr
}

我的城市你来过

问题Q：一维行数组转列数组?
举例1：将[1,2,3]填入E列1至3行单元格内?

function text(){
        let arr1=Range("a1",Range("e999").End(xlup).Value()[0];                              //获取行数组
        let arr2=Array.from(Range("a1",Range("a999").End(xlUp)).Value(),x=>x[0]);                //获取列数组
        Range("e1:e3").Value2=WorksheetFunction.Transpose([1,2,3])                                                //行数组转列
}

我的城市你来过

问题Q：箭头函数用法?
举例1：列举箭头函数的方程格式?

function text1(){
        let sum1=function(x,y){var z=x+y;return z};alert(sum1(1,8))                        //结果9
        let sum2=(x,y)=>{var z=x+y;return z};alert(sum2(2,5))                                //结果7
        let sum3=(x,y)=>{return x+y};alert(sum3(10,20))                                                //结果30
        let sum4=(x,y)=>x+y;alert(sum4(100,200))                                                        //结果300
        let sum5=x=>x*9;alert(sum5(6))                                                                                //结果54
        let sum6=()=>50;alert(sum6())                                                                                //结果50
        alert((x=>x*x)(9))                                                                                                        //结果81
        alert(((x,y)=>x-y)(9,7))                                                                                        //结果2
}