如何在Notepad ++中复制所有加入书签的行

我想去所有书签行并复制它们。

这将是按F2然后按Ctrl + D的自动方式。

我已经尝试了宏和两个\ 1查找和替换正则表达式。

---------------------以前的例子------------------------

hostname RTA 
interface Loopback0
 ip address 203.250.13.41 255.255.255.0
interface Ethernet0
 ip address 203.250.14.1 255.255.255.0
router ospf 10
 network 203.250.13.41 0.0.0.0 area 1
 network 203.250.0.0 0.0.255.255 area 0.0.0.0

上面有8行代码。我为第2和第4行添加了书签。

------------------------ -----------------后的示例

hostname RTA 
interface Loopback0
interface Loopback0
 ip address 203.250.13.41 255.255.255.0
interface Ethernet0
interface Ethernet0
 ip address 203.250.14.1 255.255.255.0
router ospf 10
 network 203.250.13.41 0.0.0.0 area 1
 network 203.250.0.0 0.0.255.255 area 0.0.0.0

notepad++

— barryoff
source

两者（宏和RegEx）都有效吗？！？;）你可以说得更详细点吗？

— g2mk 2016年

例如，如果第10行和第20行被加入书签，则两者都不起作用。我想在第21行添加一行，这是第20行的副本。在第11行添加一行，这是第10行的副本。

— barryoff 2016年

是的 - 这是一个N ++错误...在你录制的宏中尽快删除书签。

— g2mk 2016年

我对此的不妥协解决方案是： -

-add“## BOOKmarked LiNe ##”到每个加书签的行

- 在vbs文件中运行以下内容

- 删除所有“## BOOKmarked LiNe ##”条目。

outFile="C:\Users\user\Desktop\test_loop1-out.txt"
Set objFSO=CreateObject("Scripting.FileSystemObject")
Set objFS = CreateObject("Scripting.FileSystemObject")

Set objFileout = objFSO.CreateTextFile(outFile,True)

Set objFile = objFS.OpenTextFile(strFile)

Do Until objFile.AtEndOfStream
strLine= objFile.ReadLine
objFileout.Write strLine & vbCrLf
if strLine.contains("##BOOKmarked LiNe##") Then objFileout.Write strLine & vbCrLf
Loop
objFile.Close
objFileout.Close

— barryoff
source