将测试文件中的每一行复制到excel表中的特定单元格

本文介绍了将测试文件中的每一行复制到excel表中的特定单元格的处理方法，对大家解决问题具有一定的参考价值，需要的朋友们下面随着小编来一起学习吧！

问题描述

限时送ChatGPT账号..

通常有很多 vba 代码可以将文本文件中的内容复制到 Excel 表中.我期待着 vba 代码，它将文本文件中的每一行复制到 Excel 工作表中的不同单元格.对于这种情况，我没有找到很好的参考.任何人都可以对上述问题提出一些参考吗?

Generally there are lot of vba codes to copy a content in a text file to excel sheet. I am looking forward for vba code which will copy each line in a text file to different cells in an excel sheet. I am not finding a good reference for this condition.. Can anyone please come up with some reference to the above question ?

推荐答案

您始终可以正确使用 PowerShell 脚本来读取文本文件并将数据放入 Excel 文件中.

You can always right a PowerShell script to read a text file and put data into an Excel file.

$Excel = New-Object -ComObject Excel.Application 
$Excel.Visible = $False
$Workbook = $Excel.Workbooks.Open("C:\file.xlsx")

$data = Get-Content 'C:\textfile.txt'

$i = $j = 1
foreach ($row in $data){
    $Excel.Cells.Item($i,$j).Value() = $row
    $i += 1
    $j = $i
}

$Excel.Quit()

$Null = & {
[Runtime.Interopservices.Marshal]::ReleaseComObject($Excel)
[Runtime.Interopservices.Marshal]::ReleaseComObject($Workbook)
}

[GC]::Collect()

这篇关于将测试文件中的每一行复制到excel表中的特定单元格的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！