Tag: 文本文件

如何在Excel中打开txt文件，就像在Windows资源pipe理器中右键单击并使用Excel打开一样？: 我的应用程序使用制表符分隔的Unicode文本文件与Excel接口。我需要一些单元格有多行（在Excel中input，生成LF字符（10））。如果我右键单击资源pipe理器中的txt文件并打开.Excel，它会正确打开。但是，如果我打开Excel，并且从Excel内部通过浏览打开txt文件，或通过最近使用的列表打开它，它将LF视为一个CR，并创build一个新的行开始在这一点。我怎样才能让Excel从Excel中正确打开文件（即，像在Explorer中右键单击文件并selectOpen With ..Excel那样打开文件）？编辑：Chris Persichetti在这里提供了很多关于相关问题的很好的信息。

VBA代码searchstring，然后第二个string，并从文本文件返回数据行: 我试图通过大日志文件search来查找一个文本string，然后如果该string存在find另一个文本string，然后返回下一个5行数据。我设法search文本文件的string，并返回5行之后，但我似乎无法让macros返回5行之前search两行文本。例如，如果文本文件看起来像这样： 17:42:56: Log File Closed 17:42:56: PrintInvoice: 2 17:42:56: copyReportData: 17:42:56: getNextRptDataID: 17:42:58: CalcDelCharge: 17:42:58: Sub Total: 3.80 17:42:58: Del Total: 0.00 17:42:58: Disc Total: 0.00 17:42:58: Vat Total: 0.00 17:42:58: Inv Total: 3.80 18:33:00: CalculateAmtDue: 18:33:00: CalculateChange: 18:33:00: UpdateDelCharge: 18:33:00: UpdateTotals 18:42:58: CalcDelCharge: 18:42:58: Sub Total: 5.80 18:42:58: Del Total: 0.00 18:42:58: […]

使用string数组填充锯齿形数组时，“不能分配给数组错误”: 我想有一个有两层的锯齿形数组：1）是一个数字，2）是一个string数组，所以我可以很容易地引用基于索引值的数组。这样做的关键是获取文本文件的内容，以便锯齿状数组中的每个索引都是文本文件的一行（第1层=索引，第2层=行）。这些行当然是由string填充的。没有任何调整，文本文件在每行的string之间都有不需要的空间。我想要string数组不包含任何浪费的空间（ "Hello how are you " – > ["hello","how","are","you"] ）。我通过Trimfunction和Splitfunction来做到这一点。 Trim删除除了分隔空间以外的所有内容; Split生成我想要的那一行的string数组。我的问题是获取数组到Jagged数组以及创build一个数组而不知道它的长度提前，因为我还没有Split文本行。以下是我的代码。当我使用一个变体而不是一个string作为我的第二层时，我得到了另一个我似乎无法解决的错误。注意：包含文本文件信息的string数组是 tempString() *更新代码：所以你可以testing这个，使用tempString = (" test tempstring ", "", " test test test", " "," test ", "") Private Sub createGCStruct(ByRef tempString() As String) ' note many parameters are not included. ' also, this […]

如何读取文本文件中的特定单词并将其复制到Excel中？: 我有一个文本文件，如下所示名称：xxxx地址：xxxxx联系号码：xxx NIC号码：xxxx 在一个单一的string。我想读取文本文件，并提取只有名称地址联系电话号码和NIC没有使用C＃到一个Excel工作表。我能够读取整个string并将其保存到Excel表格中。

Visual Basic：将多个文本文件导入到多个工作表中: 所有数据都存储在文本文件中。我有这些文件的多个，我想导入每个在一个新的工作表，该文件的名称。我录制了一个macros，以便将数据导入正确的规格。之后，我为目录中的每个文件添加了重复此过程的部分。我的代码的结果是它为每个文件创build一个正确名称的新工作表，但工作表是空的。 Sub ImportTextfiles() Dim folderName As String, filePathName As String, FileName As String folderName = "C:\Users\MyName\Documents\MultipleFiles\" FileName = Dir(folderName, vbNormal) While FileName <> "" filePathName = folderName & FileName Sheets.Add.Name = FileName With ActiveSheet.QueryTables.Add(Connection:= _ "TEXT;" & filePathName, _ Destination:=Range("$A$1")) .Name = FileName .FieldNames = True .RowNumbers = False .FillAdjacentFormulas = […]

用空行导入文本文件？: 我正在使用下面的VBA代码来导入Excel中的多个文本文件。但是，只要我的文本文件包含空行，内容就会被导入两行，而不仅仅是一行。换句话说，我的文本文件中的每个空白行导致在导入过程中创build一个新行。示例 – 这个示例文本应该导入到Excel中的一行中： Lorem ipsum dolor sit amet，consectetuer adipiscing elit。 Aenean商品ligula eget dolor。 Aenean马萨。 Cum sociis natoque penatibus et magnis dis parturient montes，nascetur ridiculus mus。 Donec quam felis，ultricies nec，pellentesque eu，pretium quis，sem。 Nullainheritance了马萨诸塞州的森林。 Donec pede justo，fringilla vel，aliquet nec，vulputate eget，arcu。但是，由于文本中有空行，因此会创build两行：第1行： Lorem ipsum dolor sit amet，consectetuer adipiscing elit。 Aenean商品ligula eget dolor。 Aenean马萨。 Cum […]

将txt文件导入到Excel中会使换行符消失: 我正在尝试导入一个文本文件到Excel（2007）。该文件是从C＃文本框中导出的，并且包含换行符。虽然当我导入它（带有Excel的文本导入向导）时，换行符完全消失。我宁愿不必写一个VBA文件，并放在一个Excel文件中运行，而是改变这个在C＃中的一个整洁的方法，之前它将文本框中的数据变成一个txt文件。这有可能以任何方式？

如何从Excel或记事本（文档以.txt结尾）将数据加载到Win Bugs中？: 我需要从Excel中加载一些数据到WinBugs，由于某些原因，Winbugs不能识别它。我尝试了很多东西（所有这些都在下面列出），而这些都不起作用。我试图从Excel复制和'粘贴特殊'为'纯文本'到WinBugs。我在每个variables之后加上[] ，最后加上'END' 。错误消息如下所示：抱歉，模块BugRectData中的过程LoadNumeric Data了BugRectData 我复制并粘贴到记事本中，在每个variables之后加上[] ，再在末尾再加上'END' ，然后删除所有行之间的空格，每个数据之间只有一个空格。当我把它拖入Winbugs时，它分散到两行之间的空白处，数据和错误消息之间出现了很大的差距（试图加载数据时）：抱歉，模块BugRectData中的过程LoadNumeric Data了BugRectData 我做的最后一件事是打开.txt文件到Winbugs，它变得混乱，当我试图加载数据，而是突出了一些数据，如NA2.0应该是NA 2.0并表示“预期号码或NA或END“。在纠正这些错误之后，数据看起来很好，直到它说'END'的结尾，并且它说同样的事情只在END突出显示E 如果有人能够提供任何见解，我将非常感激。

VBA二进制文件 – cnc程序: 我正在使用macros来创build一个CNC程序。要创build机器使用的“.spf”文件我使用： Dim m2_path as string m2_path = T:\Production\Cavity-Line\Eric R\Excel\PARAMETER.spf Dim text as string text = 'my data Dim fso As Object Dim Fileout As Object Set fso = CreateObject("Scripting.FileSystemObject") Set Fileout = fso.CreateTextFile(m2_path, True, True) Fileout.Write text Fileout.Close 当我尝试打开机器上的程序时，出现“无法打开二进制文件”错误。但是，如果我手动将内容从“m2_path”文件复制到另一个，然后尝试打开它，我不会收到错误消息。文本文件的格式有问题吗？机器正在使用SINUMERIK 840d sl。提前致谢问候编辑：感谢@ashleedawg

将文本文件转换为Excel: 我需要将文本文件转换为Excel文件。我发现有关这个文章，但我的要求是一点点不同，所以我没有任何想法。我有文本文件，包括这种格式的行 Jun 13 07:35:08 mail dovecot: pop3-login: Login: user=<veena,.patel@test.com>, method=PLAIN, rip=102.201.122.131, lip=103.123.113.83, mpid=33178, session=<Wfdfdfcxvc> 我想创build有四列的Excel文件： – 第一列包括上面一行的“Jun 13 07:35:08” 第二列包括上面一行的“pop3” 第三栏包括“veena，.patel @ test.com” 第四栏包括“102.201.122.131” Excel中不需要其他所有数据。我怎样才能做到这一点？我知道这不是我想要的。我应该先写一些关于我所尝试的代码，但实际上我没有任何想法。