精华内容
下载资源
问答
  • 今天分享一个批量提取txt文件内容至Excel的代码。举个栗子,有一批txt文件,需要将所有txt文件里的内容汇总至工作簿里。简单编了几个数据,然后复制了几份……如下:当然每个txt里的内容是相同的。来看一看使用效果...

    40a978b74773e3e11063dfa3dee2fc4e.gif

    大家好,我是知了。

    今天分享一个批量提取txt文件内容至Excel的代码。

    举个栗子,有一批txt文件,需要将所有txt文件里的内容汇总至工作簿里。简单编了几个数据,然后复制了几份……如下:5cb6dd4a5f709f44b3f292b0ed9fa039.png当然每个txt里的内容是相同的。

    ec68b2dac1e3cfec175de5d59dc2d264.png

    来看一看使用效果:

    5eb2c518b38829b328fefdb076135632.gif

    —  —

    代码如下:

    向左滑动查看更多

    Sub gettxt()Dim arr, fpath, fnameDim s As StringDim l As Integer, y As Integer
        fpath = ThisWorkbook.Path
        fname = Dir(fpath & "\" & "*.txt"'当前路径文本文件名
        k = 0
        y = 1
        Application.ScreenUpdating = FalseDo While fname <> ""
            Open fpath & "\" & fname For Input As #1 '读取文件Do While Not EOF(1)     ' 循环至文件尾。
                Line Input #1, s         '读取一行If Len(s) > 0 ThenDo Until InStr(s, "  ") = 0 '测试是否有两个以上空格
                        s = VBA.Replace(s, "  "" "'替换成一个空格Loop
                    arr = VBA.Split(s, " "'以一个空格分成数组,如果制表符是其他符号需调整参数,例如:arr = VBA.Split(s, "丨"),以丨为制表符。
                    l = UBound(arr) '数组长度
                    ActiveSheet.Cells(y, 1).Resize(1, l + 1) = arr '写进工作表
                    y = y + 1End IfLoop
            Close #1
            fname = Dir
            k = k + 1Loop
        Application.ScreenUpdating = True
        MsgBox "共合并 " & k & " 个 txt 文件"End Sub

    —  —

    Tips:

    1.工作簿与txt文件同路径。

    2.栗子中以空格为制表符,可根据实际情况修改,修改方法详见代码注释。

    文件已上传至公众号,后台回复620,即可收到下载链接。

    后会有期。

    -END-

    展开全文
  • 如果工作表中有很多批注,如何批量修改批注内容?今天教大家两种方法,批注量少用第一种方便,量大建议用第二种。案例:下图 1 的工作表中有很多重复的批注,请将批注内容全部修改为“Excel学习世界”,效果如下图 2...

    如果工作表中有很多批注,如何批量修改批注内容?

    今天教大家两种方法,批注量少用第一种方便,量大建议用第二种。

    案例:

    下图 1 的工作表中有很多重复的批注,请将批注内容全部修改为“Excel学习世界”,效果如下图 2 所示。

    c48867aca568a192812a08e3e889e69e.png
    555f1d3c191b49e63a24ed68f00b60de.png

    解决方案 1:

    1. 先将其中任意一个批注内容修改为“Excel学习世界”

    f6dfe4a2aca8d85f887bb4a35b04aa51.png

    2. 选中修改了批注的单元格 --> 按 Ctrl+C

    87817d3ceb0be67f4cbf24db06753493.png

    3. 按住 Ctrl 键,用鼠标选中需要修改批注的其他单元格 --> 选择菜单栏的“开始”-->“粘贴”-->“选择性粘贴”

    2e632fed04724c360a618ed727222d45.png

    4. 在弹出的对话框中选择“批注”--> 点击“确定”

    822fcdf0593e15dd1221117d76e54240.png
    e7a74a6346872248fdfe156f038e5733.png

    解决方案 2:

    1. 关闭这个工作簿,找到 Excel 文件所在的目录 --> 将文件名后缀修改为压缩文件 .rar

    67a0da1323afc7f9266925a3b0386f4d.png
    a0a94e63dbbead111bc979bc1d170ad6.png

    2. 不用理睬警告框内容,点击“是”

    2a5c8ff92f638f37f571a534ebbe1584.png
    38a71ca27fb459d866b39c4266cfef59.png

    3. 打开压缩包,找到 xl 目录下的 comments1.xml 文件

    * 本例中只有一个工作表有批注,所以只有一个 comments 文件,如果多个工作表有批注,会依次显示 comments1.xml、comments2.xml、comments3.xml……

    e46f5f135d62d6eae53942d85cf32ce9.png
    26c7a2b09b58e91f44ad69d0d7acdf22.png

    4. 将压缩包中的 comments1.xml 文件拖到到文件夹中

    d901a6b72daffa647c6bb6fc4d09cabe.gif

    5. 选中文件夹中的 comments1.xml 文件 --> 右键单击 --> 在弹出的菜单中选择“打开方式”-->“记事本”

    2e3fc777baed09a3b8c022bc8df7d2b8.png
    e26d4c789725f422dedbdb5ab1cd0df0.png

    6. 按 Ctrl+H --> 在弹出的对话框中将“学习Excel”替换为“Excel学习世界”--> 点击“全部替换”--> 关闭记事本

    85ba67507bbe9a6eaff6f68828ded7f4.png

    7. 将文件夹下的 comments1.xml 文件拖动到压缩文件包的 xl 目录下,覆盖原来的文件。

    13856be9842cf3e0fdd2b46c3799f0f0.gif

    8. 删除文件夹下的 comments1.xml 文件

    9. 将文件名的后缀由 .rar 改回 .xlsx

    99b23f24eed83c417d79b85ac6eb5a30.png
    56a827dcf8e78546a2432e0c327ff57d.png
    ef726275fabcdcdececd99cb3500c9cd.png

    打开 Excel 文件,就能看到批注都修改好了。

    555f1d3c191b49e63a24ed68f00b60de.png

    很多同学会觉得 Excel 单个案例讲解有些碎片化,初学者未必能完全理解和掌握。不少同学都希望有一套完整的图文教学,从最基础的概念开始,一步步由简入繁、从入门到精通,系统化地讲解 Excel 的各个知识点。

    现在终于有了,以下专栏,从最基础的操作和概念讲起,用生动、有趣的案例带大家逐一掌握 Excel 的操作技巧、快捷键大全、函数公式、数据透视表、图表、打印技巧等……学完全本,你也能成为 Excel 高手。

    展开全文
  • 评论区旁友建议使用narsort排序而不是直接修改文件名。我觉得相关条件下也可以,所以原文末尾加上了narsot排序法。以下是原文2019-05-09最近实验室小可爱帮忙做实验和记录实验数据,不过新手总有些错误操作,比方说...

    评论区旁友建议使用narsort排序而不是直接修改文件名。我觉得相关条件下也可以,所以原文末尾加上了narsot排序法。

    以下是原文

    2019-05-09

    最近实验室小可爱帮忙做实验和记录实验数据,不过新手总有些错误操作,比方说因为忘记修改存储路径导致图片的命名带括号同时无法排序。比如下图:Fig. 因为括号前有空格和数字,同时括号内数字不等长,MATLAB的dir无法正常排序

    在使用MATLAB中“列出当前工作目录中的文件”函数dir的帮助下,我们得到下述排序结果:Fig. 非正常命名的MATLAB自动排序结果

    这种排序方式的问题就是,会得到规律变化的时序信号,给人一种我终于可以毕业的错觉。所以为了能让不分时序的MATLAB得到时序的正常图片序列,需要将图片名改为如下格式:Fig. 这才是看起来可能让小可爱和我都毕业的图像序列名

    所需MATLAB的lines如下:

    ****注意!使用前务必备份需要改名的数据!万一造成数据丢失也不会少篇paper~

    %% Rename image Seq

    filePath = uigetdir; % 兄贵你要处理文件所在的文件夹

    files = dir(filePath); % 看看这个文件夹的名字有多可怕

    oldName = cell(length(files)-2, 1);

    for ii = 3:length(files)

    oldName{ii-2} = files(ii).name;

    end

    newName = cell(length(oldName), 1);

    for ii = 2:length(oldName)

    a = oldName{ii};

    b = str2num(a(12:end-6)); % 删不需要的char

    c = num2str(b, '%06d'); % 使文件名等长

    newname{ii} = ['B4_', c, '.tiff']; % 改个小改改的名字

    movefile([filePath '\' oldName{ii}], [filePath '\' newName{ii}]) % 亲测可用

    end

    最后的结果就是上一个截图和下面这个截图了:Fig. 虽然这组数据对毕业没有什么太大的贡献,我还是很喜欢它们

    希望这篇文章能对和我一样经常dir找不到文件的旁友有所帮助。

    以下是2019-05-12新加内容:

    评论区旁友推荐使用的narsort函数非常好用,以前亲测可用。相关链接见参考文献3和4。

    在去年我的数据文件名全是自然排序的时候我用了参考文献4~ CSDN的博客,一直很喜欢,直到换了课题和设备。如果数据组成结构比较单一,不是结构体套结构体再套...,无限建议使用narsort~~~

    narsort函数在批量修改文件名之前用过,但是后来放弃了,不过一时想不起来为什么后来放弃使用这个函数。那么最近几天看了一下数据的组成结构,明白了当时自己为什么在后期的实验处理中放弃MATLAB社区中都极为推崇的自然排序:数据来源于不同的采样设备,多数工业设备都比较老旧,不会采取自然命名法。同时,由于处理方式未知,一组数据不太可能只处理一次。自然排序法加入批次处理后,要求文件名序列 must be a cell array.,实际上在整体运行的时候结构体的结构体里的元胞数组。。。一个循环,然后再存进结构体里,然后粘贴名字又一个循环。其实和事先找出异常组单独修改相比,看个人需要。目前资瓷改文件名。

    lingling

    参考文献:

    展开全文
  • 这是一批来自采集内容的标题,因为“重复标题”比“重复正文”,后果严重一些。所以对标题,进行二次处理,争取和原始标题,意思差不多,但又有些区别。尝试第一招:片段颠倒既已标点符号分割标题,然后再随机打乱。...

    a00d6226f83cd8ebdb496e7a9a567b3d.png

    这是一批来自采集内容的标题,因为“重复标题”比“重复正文”,后果严重一些。

    所以对标题,进行二次处理,争取和原始标题,意思差不多,但又有些区别。

    尝试第一招:片段颠倒

    既已标点符号分割标题,然后再随机打乱。

    结果“卒”812ad66e4e684f24fee6dc3af8180c1f.png

    161595ef302fdfc2a56b42a505c7ac85.png

    片段打乱后,通过“百度短文本相似度AI”跑一下,这就是100%一样啊

    所以百度看待标题,不是一段str,而是str分词后的list,str再怎么乱,其list是一致的。

    所以外面一些程序,比如采集一篇新闻,按段落打乱,或按句子打乱,都是无效的。

    尝试第二招:二次翻译

    3d314116233dda2f50d1e80476b98357.png

    结果“卒”812ad66e4e684f24fee6dc3af8180c1f.png

    有些结果过于魔幻,曲解了原标题的本意,甚至是完全没有可读性。

    也许看截图里的效果还行,但是我这里测试的几百个标题,没有可读性的比例,目测还挺多的

    尝试第三招:同义词替换

    be9d051533064fe07287fb8dee6051dd.png

    结果“略有尴尬”。

    目测大部分满足可读,但是尴尬的是,有些词替换不是近义词,而是反义词。

    由于近义词模块用的synonyms(主要是因为不花钱),可能该模块所定义的“近义”,是机器学习层面的‘相似性’,比如‘低调’和‘高调’经常出现在同一篇文档,则判定‘高调’是‘低调’的近义词

    如果用汉语层面的近义词,比如用新华字典的近义词API(如果有的话),来替换当前的synonyms,应该效果好很多。至少不会将“低调”,替换成“高调”...

    虽然相似度没有拉开很大,但总比“完全重复”强。

    也并不是所有分词后的词项都进行同义词替换,为了满足大部分标题修改后,具备可读性,做了一些调整:

    1)普通名词、动词、形容词、副词、动名词,进行同义词替换

    2)一个字的,不做替换

    3)助词、拟声词、叹词,删除

    4)专有名词,不做替换(比如《人民的名义》)

    展开全文
  • 近期碰到咨询批量修改文件名的简单方法,也碰到了有人好多文件名不规范,自己慢慢手动修改的情况。用Excel批量修改文件名是一个常用的技巧,今天分享给大家。如下图,我们收集到的文件名称不统一,需要把这些名称...
  • judge) %闰年 % else % fprintf('%g year is ordinary year\n',judge) %平年 % end end 结果展示: 批量修改某一文件夹下所有文件的名字: filePath='E:\1SMAPDATA\01COM\01Spr';%文件夹路径 fileFolder=fullfile...
  • 答案就这一句话:s=datestr(info.FileModDate,'...1.对于数据处理初学者来说,如何批量对数据文件进行重命名呢?有人提出了以下算法:x = dir('D:\Program Files\MATLAB\R2010b\test\test\*.a');y = dir('D...
  • 在办公软件处理中,会遇到一种情况,有大批量的文件需要重命名,如果一个一个命名,则效率底下且极易出错,今天来学习一个Excel小技巧,用Excel轻松批量修改文件名。第一步,文件归档。我们将需要修改文件名的文件...
  • 读取该文件的内容:i = 0; while ~feof(fid) % 这个循环的作用是从文件头读到底 tline = fgetl(fid); % 读取一行 i = i+1; content = tline; % 把每一行的内容储存到"content"这个cell里 end写入内容:for i =....
  • 不知道大家是否遇见过这样的问题,分布下去的任务,结果收上来的文件, 命名是五花八门,如果要将文件的名字重新整理,需要花费不少的时间。...批量.xls2、把txt的后缀,改成bat。得到3、双击context.bat...
  • %stdin标准输入PicFormat = {'*.bmp','Bitmap image (*.bmp)';...'*.jpg','JPEG image (*.jpg)' ;...'*.*','All Files (*.*)'};% 利用uigetfile函数交互式选取训练样本图片[FileName FilePath,flag] = uigetfile...
  • 【小应用】批量修改txt内容

    千次阅读 2018-09-21 15:58:28
    import os ...with open('1.txt','r') as f: #打开原文件 with open('new.txt','w') as ff: #创新新文件 for line in f.readlines(): #逐行读取 if line[0] !='-': #读取首字符不是‘-‘的行 ...
  • 1、我是新建了一个MATLAB的函数reading_txt.m存放代码2、首先通过dir获取目标目录下所有txt文件的文件名,存放于namelist数组中。3、构建元胞数组存放文件名4、构建元胞数组存放点。function [ len,var ] = reading_...
  • 任意一个字符 7 ^d 域 2 ^* 任意多个字符 8 ^w 空白区(空格、不间断空格、以及任意顺序的格式标记) 3 ^# 任意数字 9 ^f 脚注标记 4 ^$ 任意字母 10 ^e 尾注标记 5 ^p 段落标记 11 ^& 原查找内容 6 ^t 格式标记 12 ^...
  • %更新文本字符串的值 注:本文根据MATLAB官网内容修改而成。 我推荐给你以下的视频教程,特点是没有PPT,不掺水,直接编程环境下的实操课程: 用100分钟了解MATLAB编程知乎 - 安全中心​www.1data.pro 《MATLAB编程...
  • JAVA新手,要实现批量打开一文件夹下的TXT和XML然后查找指定内容,然后在后面添加内容。问题1:XML需要查找JAVA新手,要实现批量打开一文件夹下的TXT和XML然后查找指定内容,然后在后面添加内容。问题1:XML需要查找是...
  • /** * @author: DevRongTai * @description: TXTUtil * @date: 2020/12/31 14:12 */ public class TXTUtil { /** * @Description 读取txt中的内容 * @return void * @throws **/ public static List txt2String...
  • TXT文档内容批量修改专家

    热门讨论 2012-04-23 11:26:31
    TXT文档内容批量修改专家 能功能非常的不错 很好用的噢 我用了 好久了 里面有破解的 没有病毒的 放心使用吧 杀毒软件会误报噢
  • 再将cvc-09和cvc-14红外行人检测数据集用于YOLO网络的训练时,由于图像标注的txt文件格式不同,所以需要我们转化。 cvc标注文件格式为: cvc标注文件前五个数字分别表示中心坐标和长宽,即在图片中的真是像素值。 ...
  • 在该目录下新建一个名为 dir.txt 的文本文件,写入以下内容:dir/s>1.txt释义:这是 DOS 命令,意思是列出本文件夹中的所有文件并将文件名写入一个名为 1.txt 的文件中2. 将 dir.txt 文件的后缀名改为 .bat...
  • asp html txt 多文件内容批量修改替换工具 可用于对文本文件中的文字内容进行修改替换,可选择同一目录中的所有某类型文件进行批量修改替换,程序支持多行文字的修改替换。特别适用于网站设计中批量处理网页文件或...
  • 批量修改文件内容 bat

    2018-01-11 17:04:26
    可以批量替换文件里内容的小bat。可是不能零积分分享。bat内容,见下面的描述: @echo off for /f "delims=" %%i in ('dir /s/b t\\*.txt') do ( for /f "delims=" %%a in ('type "%%~fi"') do ( set "foo=%%a" ...
  • 为您提供TXT文件批量修改下载,txt文件批量修改能够对指定文件夹中的多个txt文件内容批量进行查找替换。软件支持GBK、UTF8编码的文件,支持只查找,不替换,获得包含指定内容的文件路径列表。功能介绍 1、对指定...
  • 对大量txt格式的小说删除其中网址 解决思路: 列出目录下的全部文件 读取文件 将文件中网址替换(全为中文小说,可直接替换掉英文) 写入新文件 删除旧文件 源码 import re import os txtlist=os.listdir("C:\...
  • 批量修改文件内容

    2018-02-25 14:30:56
    str_file=os.getcwd() for dirpaths, dirnames, filenames in os.walk(str_file): for filename in filenames: if filename.endswith('.txt'): with open(filename,'r')as f: ...
  • 快速批量修改word文档内容

    千次阅读 2020-11-01 17:32:37
    这里写自定义目录标题快速批量修改word文档内容用到的库具体修改的需求1.批量替换标题中“[ ]”里的内容2.批量替换word表格里的内容(两个表格里的替换的内容相同)3.保存时文件名的替换(文件名与文档标题相同)...
  • c# .net批量修改文件内容

    千次阅读 2018-10-26 15:03:15
    项目中会碰到需要批量替换修改html、txt等文件的内容,以下贴出我的一个工具类 //读取需要替换的文本 String pathTemp = System.Environment.CurrentDirectory + "\\temp.html"; String ...
  • 有一个txt文件,aaaaaa - 0 1 2 3 4 想生成如下新的txt文件: 第一个:aaaaaa-0 1 2 3 5 第二个:aaaaaa-0 1 2 3 6 . . 第252个:aaaaaa-5 6 7 8 9 文字部分不变,数字递增,但不重复(0-9随机5个不同数字组合...

空空如也

空空如也

1 2 3 4 5 ... 20
收藏数 421
精华内容 168
关键字:

批量修改txt内容