(若是和其他不同软件互动之问题 请记得一并填写)
软件:Excel
版本:Office2010
Set uHead = uHead(2, 1)
With ActiveSheet.QueryTables.Add(Connection:="TEXT;" & uFile, Destination:=uHead)
.AdjustColumnWidth = False
.TextFileOtherDelimiter = ":" '冒号
.TextFileCommaDelimiter = True '逗号
.Refresh BackgroundQuery:=False
.Delete
End With
以上程式可以读取txt档里的格式内容
但格式不对
https://drive.google.com/open?id=0B2p4am3C9DCoSGFaXzRzMElTc1E
以上为图片内容 , 格式应该要储存到每个方格中 , 但它只放在一个方格
以下为档案 , 麻烦大大帮我看看 , 小弟感激不尽
https://drive.google.com/open?id=0B2p4am3C9DCoNmY3WHR4RHBXb2s