Tag: 读取

excel vbamacros读取文本文件，在单独的单元格中一行

文本文件如下所示 约翰，“2014-2”，… D，Will，“2016-7”，… 我想把元素a放在第1行，第1列 ， 约翰在第1 行第2列 ， 第2列在第2行，第1列 ，请帮助。 谢谢。 下面是我的代码 Sub Importdata() Open "C:\Users\apple\desktop\12345.txt" For Input As #1 r = 0 Do Until EOF(1) Line Input #1, Data ActiveCell.Offset(r, 0) = Data r = r + 1 Loop Close #1 End Sub