2. 开发问题
  3. EXCEL的基本问题请教一下2

EXCEL的基本问题请教一下2

别来无恙 2020-3-16 850

_EXCEL的基本问题请教一下2这个代码要怎么写。读取到张三和王五就复制到H行。之后再下面一行粘贴B:E行的数据。

最新回复 (2)
  • life 2020-3-16
    2楼
    读取列后写入列
  • 垦荒牛 2020-3-16
    3楼
    objExcelWorkBook = Excel.OpenExcel("C:\\Users\\Administrator\\Desktop\\001.xlsx",true)
    arrayRet = Excel.ReadRange(objExcelWorkBook,"Sheet1",[[1,1],[10,4]])
    TracePrint arrayret
    For i=0 To UBound(arrayret) 
        Excel.WriteCell(objExcelWorkBook,"Sheet1","h" & i * 2 + 1,arrayret[i][0],false)
        TracePrint arrayret[i]
        arrRet = splice(arrayret[i],1,UBound(arrayret[i]))
        Excel.WriteRow(objExcelWorkBook,"Sheet1","h" & i * 2 +2 ,arrret,false)
    Next
    Excel.Save(objExcelWorkBook)
    Excel.CloseExcel(objExcelWorkBook,true)
返回
发新帖