我想从 Excel 写入文本文件,但数据顺序与 Excel 中的列顺序不同。例如:
Excel 列:Col1、Col2、 Col3,第 4 列, Col5 文本文件:Col1、Col2、 Col5,第 4 列, Col3
请帮我解决这个问题。
答案1
简单:复制当前工作表并在保存之前更改副本中的列顺序。当您不再需要副本时,请将其删除。
答案2
谢谢您的回答。
我开发了以下方法:
代码:
For i = 1 To LastRow
For j = 2 To 10
Select Case j
Case 3
strCellValue = Trim(shSheetName.Cells(i, j + 2).Value)
Case 5
strCellValue = Trim(shSheetName.Cells(i, j - 2).Value)
Case Else
strCellValue = Trim(shSheetName.Cells(i, j).Value)
End Select
Next j
'Process of Write [strCellValue] to text file
Next i