I had word file which consists of some records with some information as shown in bleow
.
RECORD ID: 02816914 PROBLEM DESCRIPTION:
PROBLEM REPORTER DATA PROBLEM ASSIGNMENT DATA
REPORTER NAME ------ AF/OPER INITIAL ASSIGNMENT
DATE OCCURRED ------ 12/04/07
TIME OCCURRED ------ 00:39
DATE ENTERED ------- 12/04/07 DATE RECOVERED ------ 12/04/07
TIME ENTERED ------- 00:39 TIME RECOVERED ------
PROBLEM INFORMATION RESOLVER INFORMATION
JOB NAME -----------AB1234 RESOLVER CLASS ------ 77777
PROGRAM NAME ------- N/A DATE CLOSED --------- 12/04/07
SYSTEM ID ---------- L123 TIME CLOSED --------- 04:09
ABEND CODE --------- FI1213
SEVERITY CODE ------ 04 PROBLEM STATUS ------ CLOSED
FREEFORM TEXT:
12/04/07 04:05 TBNAVAM PRODUCT: BAJAJ
RECORD ID: 02816915 PROBLEM DESCRIPTION:
PROBLEM REPORTER DATA PROBLEM ASSIGNMENT DATA
REPORTER NAME ------ AF/OPER INITIAL ASSIGNMENT
DATE OCCURRED ------ 12/04/07
TIME OCCURRED ------ 00:39
DATE ENTERED ------- 12/04/07 DATE RECOVERED ------ 12/04/07
TIME ENTERED ------- 00:39 TIME RECOVERED ------
PROBLEM INFORMATION RESOLVER INFORMATION
JOB NAME -----------AB1234 RESOLVER CLASS ------ 77777
PROGRAM NAME ------- N/A DATE CLOSED --------- 12/04/07
SYSTEM ID ---------- L123 TIME CLOSED --------- 04:09
ABEND CODE --------- FI1134
SEVERITY CODE ------ 04 PROBLEM STATUS ------ CLOSED
FREEFORM TEXT:
12/04/07 04:05 TBNAVAM PRODUCT: MARUTI
Now I am looking for a macro which reads the each line from starting to till the end of the document.
It should search for RECORD ID, ABEND CODE AND PRODUCT.
And if any word found the macro should copy paste the total line of that another new document.
Like below result in another document
RECORD ID: 02816914 PROBLEM DESCRIPTION:
ABEND CODE --------- FI1213
PRODUCT: BAJAJ
RECORD ID: 02816915 PROBLEM DESCRIPTION:
ABEND CODE --------- FI1134
PRODUCT: MARUTI
Could anyone please help with me the macro. Your help much appreciated