Tag: 文本

如何打开多个文本文件到一个Excel工作表，但跳过每个文本文件的第1行？: 使用下面的代码，我可以打开我的文件夹中的所有文本文件到一个Excel表。每个文件都有标题，而我无法弄清楚是如何让它跳过每个文本文件的第一行。 Dim fso As FileSystemObject Dim folder As folder Dim file As file Dim FileText As TextStream Dim TextLine As String Dim Items() As String Dim i As Long Dim cl As Range ' Get a FileSystem object Set fso = New FileSystemObject ' get the directory you want Set folder = fso.GetFolder("\\mydirectoryfolderhere") ' […]

在范围内查找部分文本，返回单元格值: 我有一个包含3列的数据数组，随着更多的数据被添加行增加。我有一些已知的值，如XX-12345，XXX-12345或XXXX-12345，我需要识别并返回该单元格中的内容。问题是命名约定不是标准的，所以值可能如下所示：XX-12345-Temp，XX-12345.Temp XXX-12345-Temp，XXX-12345.Temp或XXXX-12345-Temp， XXXX-12345.Temp 下面是我必须执行此function的代码，但它并不总是工作。有时它返回一个零，我不明白为什么这样做。 =INDIRECT("R"&REPLACE(TEXT(MIN(IF(ISNUMBER(SEARCH(F2,$A$2:$C$15349)),(ROW($A$2:$C$15349))*1000+COLUMN($A$2:$C$15349))),"000000"),4,0,"C"),FALSE)

使用VBAparsing.txt文件中的数据，数据和variables在不同的行上: 我有一个.txt文件，改变它显示在某些variables的格式我能够使用此代码成功提取时间数据：档案资料： +———————+——————————————————————+ | Start Time | 09/06/2015 02:28:58 | | Finish Time | 09/06/2015 03:12:33 | +———————+——————————————————————+ 码： 'open .txt files from defined folder(s) Set fso = CreateObject("Scripting.FileSystemObject") For Each f In fso.GetFolder("C:\Localdata\XYZ").Files If LCase(fso.GetExtensionName(f.Name)) = "txt" Then 'define Row Row = Row + 1 'open each file as a text stream and […]

寻找一个公式检查两列的值并返回一个值: 我查了整个网站，没有看到任何完全符合我要找的东西。我在A列和B列有一组值我希望列C报告文本stringZ如果列A中的值匹配文本stringX和列B匹配文本stringY. 这是一个例子。 Col A Col B Col C Apple Banana Not a Match Apple Banana Not a Match Apple Banana Not a Match Apple Banana Not a Match Apple Strawberry Match Apple Strawberry Match Apple Strawberry Match Orange Banana Not a Match Orange Banana Not a Match Orange Banana Not a Match Orange […]

在Excel中寻找“sed”function: 我用excel来构造有限状态机。因此，我经常格式化单元格，以便可以将整个部分直接切割成C源代码。目前，我不得不预处理一个代码块，以便在我的标识符中用“_”replace“ – ”。例如，我可能有单元格 #define Some-preprocessor-name 但我想有： #define SOME_PREPROCESSOR_NAME 大写字母的位被UPPER（）覆盖，但是连字符的位置是任意的，就像我期望find的数字一样。 build议？

Excelmacros将非标准字符转换为HTML实体有更快的方法吗？: 我发现这个杰伊非常有用的片段，帮助我在Excel中准备将文本转换为 HTML实体（通过切换前后）来进行CSV导出。例如ReplaceCharacter cell, "€","€" 'euro ReplaceCharacter cell, "€","€" 'euro 但是，按照该线程的第二条评论，这不是最有效的方法 – 例如，我有一个大约90行，大约13列的文档。作为VBA /macros的新手，我对脚本的工作原理是滚动浏览每个单元格，find字符并replace它们。这个特殊的方法花了不到1分钟（55秒） – 我通过msgboxpopup完成运行后计时。虽然这仍然是合理的（我可以在一分钟内离开一杯茶），但是如果有1000行，那么这将是不一样的，所以我想知道是否有人可以提出任何改进或替代方法来实现一样？

Excel：将每个单词的首字母大写: 我以下文字： Your number's up (season 2) 我想把它改成： Your Number's Up 不过，我现在用下面的代码得到这个： Your Number'S Up =TRIM(PROPER(IFERROR(LEFT(A6976,FIND("(",A6976)-1),A6976))) 我怎样才能解决这个问题？

使用EPPlus将文本添加到Excel电子表格中的合并单元格: 没有人知道如何检查目录中是否有任何文件，如果没有，如何添加文本“未find内容”到Excel电子表格中的合并单元格？这是我曾经试过的： foreach (string subdir in filesindirectory) { string[] splitter = subdir.Split('\\'); string folderName = splitter[splitter.Length – 1]; ExcelWorksheet ws = package.Workbook.Worksheets.Add(folderName); //create new worksheet ImageCount = 0; foreach (string img in Directory.GetFiles(subdir)) { if (subdir.Length == 0) { ws.Cells["A1:A3"].Merge = true; ws.Cells["A1:A3"].Style.VerticalAlignment = ExcelVerticalAlignment.Top; ws.Cells["A1:A3"].Style.Border.Top.Style = ExcelBorderStyle.Thin; ws.Cells["A1:A3"].Style.Border.Left.Style = ExcelBorderStyle.Thin; ws.Cells["A1:A3"].Style.Border.Right.Style = ExcelBorderStyle.Thin; ws.Cells["A1:A3"].Style.Border.Bottom.Style […]

阅读Cell的文本而不是Value: 我正在编写一个程序来比较C＃中的两个excel文件。我可以打开文件n读取excel的值，但我想比较单元格中的文本。例如在我的工作表中，如果单元格A3的公式为“= A1 + A2”。我能够使用检索值 ((Range)worksheet.Cells[2,0]).Value 的A3（A1和A2的总值），而不是“= A1 + A2”。我怎样才能得到的文字（。文字总是空的）谢谢

从多个txt文件读取 – 去掉数据并保存到xls: 我是非常新的python，到目前为止，我已经写了下面的代码，它允许我search文件夹中的文本文件，然后读取它的所有行，打开一个Excel文件，并保存在其中的读取行。（我仍然不确定是否这是所有的文本文件逐一）运行这个，我只看到文件的文本数据被读取并保存到excel文件（第一列）。或者它可能会覆盖多个文本文件中的数据到同一列，直到完成。任何人都可以指出我在正确的方向如何让它通过每个文本文件写入剥离的数据到Excel中的下一个可用的列？ import os import glob list_of_files = glob.glob('./*.txt') for fileName in list_of_files: fin = open( fileName, "r" ) data_list = fin.readlines() fin.close() # closes file del data_list[0:17] del data_list[1:27] # [*:*] fout = open("stripD.xls", "w") fout.writelines(data_list) fout.flush() fout.close()