Cách sao chép tất cả các dòng được đánh dấu trong Notepad ++

Tôi muốn đi qua tất cả các dòng đánh dấu và sao chép chúng.

Đây sẽ là một cách tự động để nhấn F2 rồi Ctrl + D.

Tôi đã thử các macro và hai \ 1 với tìm và thay thế bằng các biểu thức thông thường.

--------------------- Ví dụ trước ------------------------

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

Có 8 dòng mã ở trên. tôi đánh dấu dòng 2 & 4.

------------------------ Ví dụ sau -----------------

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

Giải pháp không phù hợp của tôi cho vấn đề này là: -

-add "## BOOKmarked LiNe ##" cho mỗi dòng được đánh dấu

-Tạo sau đây trong một tập tin vbs

-xem tất cả các mục "## 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