txt小说怎样批量加目录

① txt文件怎么做目录

用dos实现，很简单的。
步骤1、新建一个文本文档（txt格式）
步骤2、打开输入以下内容回
“dir /s /n >目录.txt”
注意不要引号，答然后点选另存为，“文件名”栏改为“目录.bat”注意要去掉txt后缀，文件类型改为所有，即可。双击运行。可以移动到任何文件夹生成。

② 请问txt小说如何批量修改章节名称，第一章、第二章...第一二三四章 替换成第1章、第2章...第1234章；

如下所示，试试其对应的功能。选择文档批处理功能卡，勾选doc类型，使用添加文件按钮将txt文档添加入列表中。

③ 使用word怎么批量修改txt小说章节名称

1. ctrl+H打开替换对话框，单击高级，勾选使用通配符，在查找框中原样输入：第[一二三四五六七八九十]@章

2. 在替换为框中输入：究极武装^&

3. 单击全部替换即可。熟悉word的通配符替换，可以实现很多你意向不到的功能。

4. 第二个问题要采用VBA编程才能实现！

5. 在工具=宏-宏...中，打开对话框，新建一个宏，创建，打开VBA编辑器，将里面的内容清空，然后将如下代码粘贴进去后按F5键运行即可。（只适用于<1000的情形下）

Sub MyReplace()

Selection.HomeKey

Selection.WholeStory

WholeText = Selection.Text

Debug.Print WholeText

WholeTextTmp = ""

Do Until WholeText = ""

MyChTmp = Left(WholeText, 1)

If InStr("一二三是五六七八九十百", MyChTmp) Then

MyCh = MyCh + MyChTmp

Else

If Len(MyCh) = 1 Then

Select Case MyCh

Case "一": MyCh = "001"

Case "二": MyCh = "002"

Case "三": MyCh = "003"

Case "四": MyCh = "004"

Case "五": MyCh = "005"

Case "六": MyCh = "006"

Case "七": MyCh = "007"

Case "八": MyCh = "008"

Case "九": MyCh = "009"

Case "十": MyCh = "010"

End Select

ElseIf Len(MyCh) = 2 Then

Select Case MyCh

Case "二十": MyCh = "020"

Case "三十": MyCh = "030"

Case "四十": MyCh = "040"

Case "五十": MyCh = "050"

Case "六十": MyCh = "060"

Case "七十": MyCh = "070"

Case "八十": MyCh = "080"

Case "九十": MyCh = "090"

Case "一百": MyCh = "100"

Case "十一": MyCh = "011"

Case "十二": MyCh = "012"

Case "十三": MyCh = "013"

Case "十四": MyCh = "014"

Case "十五": MyCh = "015"

Case "十六": MyCh = "016"

Case "十七": MyCh = "017"

Case "十八": MyCh = "018"

Case "十九": MyCh = "019"

End Select

ElseIf Len(MyCh) = 3 Then

Select Case Left(MyCh, 1)

Case "二": a = "2"

Case "三": a = "3"

Case "四": a = "4"

Case "五": a = "5"

Case "六": a = "6"

Case "七": a = "7"

Case "八": a = "8"

Case "九": a = "9"

End Select

Select Case Right(MyCh, 1)

Case "一": b = "1"

Case "二": b = "2"

Case "三": b = "3"

Case "四": b = "4"

Case "五": b = "5"

Case "六": b = "6"

Case "七": b = "7"

Case "八": b = "8"

Case "九": b = "9"

End Select

MyCh = "0" + a + b

ElseIf Len(MyCh) = 4 Then

Select Case Left(MyCh, 1)

Case "一": a = "1"

Case "二": a = "2"

Case "三": a = "3"

Case "四": a = "4"

Case "五": a = "5"

Case "六": a = "6"

Case "七": a = "7"

Case "八": a = "8"

Case "九": a = "9"

End Select

Select Case Right(MyCh, 1)

Case "一": b = "1"

Case "二": b = "2"

Case "三": b = "3"

Case "四": b = "4"

Case "五": b = "5"

Case "六": b = "6"

Case "七": b = "7"

Case "八": b = "8"

Case "九": b = "9"

End Select

MyCh = a + "0" + b

ElseIf Len(MyCh) = 5 Then

Select Case Left(MyCh, 1)

Case "一": a = "1"

Case "二": a = "2"

Case "三": a = "3"

Case "四": a = "4"

Case "五": a = "5"

Case "六": a = "6"

Case "七": a = "7"

Case "八": a = "8"

Case "九": a = "9"

End Select

Select Case Mid(MyCh, 3, 1)

Case "一": b = "1"

Case "二": b = "2"

Case "三": b = "3"

Case "四": b = "4"

Case "五": b = "5"

Case "六": b = "6"

Case "七": b = "7"

Case "八": b = "8"

Case "九": b = "9"

End Select

Select Case Right(MyCh, 1)

Case "一": c = "1"

Case "二": c = "2"

Case "三": c = "3"

Case "四": c = "4"

Case "五": c = "5"

Case "六": c = "6"

Case "七": c = "7"

Case "八": c = "8"

Case "九": c = "9"

End Select

MyCh = a + b + c

End If

WholeTextTmp = WholeTextTmp + MyCh + MyChTmp

MyCh = ""

End If

WholeText = Mid(WholeText, 2)

Loop

Selection.WholeStory

Selection.Text = WholeTextTmp

MsgBox "查找替换完毕!"

End Sub

④ txt电子书如何添加目录

那是因为阅读器只识别第几章、第几节的关键字，如：第一章、---------第五章。

⑤ TXT电子书中如何加目录

这个可以在来电脑上编辑，把文本按源卷、章、节标明，如第一部分，第一卷、第一章、第一节等，或第1部分、第1卷、第1章、第1节等，标题完后换行，以此类推，都编辑好了，就发到手机上，阅读器一般会自动读取文本里的章节生成目录（主要是识别文本中第*部[分]、第*卷、第*章、第*节等文字而形成目录，*表示一、二、三、四...或者1、2、3、4...），我用的是多看阅读，我按照这个方法可以生成目录，还有页码显示。你可以试下。下面上图

⑥ word或txt中如何给小说作品的章节批量修改章节序号

如果整部小说在一个文档里，那就用通配符（或正则表达式），先全部删除原来的编号，然后都改成自动编号。

⑦ 怎么在一个1M以上的txt小说中加入txt章节目录

是否可以用txt切割器，弄成小段小段的再处理。
强烈推荐txt切割器，看txt小说必备啊~~~~
网上搜一下，很多

⑧ 用什么方法可以给TXT小说加目录~像UMD一样~

你可以下载一个小说阅读器，里面就可以把小说按页数或章节分着看，只是好像没有目录。我本人用的是迷你小说阅读器，可以设置成按页数或章节看的