我使用的是超越Z(列)的Excel 列,即AA、AB、AC....When --我运行在代码下面,这给我带来了错误,因为AA、AB、AC....How没有ASCII代码来表示这些AA、AB、AC.ASCII.ALSO中的列是否有在范围内使用Chr的替代方法,以便我可以避免使用ASCII代码?
counter = 0
For i = 1 To 14
Data.Range(Chr(80 + counter) & lastcolmain) = .Range("y" & 3 + i)
counter = counter + 6
Next
发布于 2020-08-18 08:58:19
使用Cells
和列号而不是Range
和列字母:
Data.Cells(lastcolmain, 16 + counter).Value = .Range("y" & 3 + i).Value
https://stackoverflow.com/questions/63473247
复制