VBA: Delete duplicate searched string

[sr1111]

VBA: Delete duplicate searched string.
I have attached an example input, string to search, and output sheet in an excel workbook.

Input Sheet:

VBA keep only one searched string.xlsx
	A	B	C	D	E
2	#VBA: keep only one searched string searched string searched string searched string. #VBA: keep only searched string one searched string. The list of search stings searchedCSV string searched string is given in sheet 2. In sheet1, with #VBA check if a given string is CSV searched string found more than once in a paragraph/line. If found more than once then keep only one. I want to do this both in an excel sheet with CSV searched string multiple column data in multiple rows as well as in a CSV or text file.
3
4	searched string searched string #VBA: keep only one searched string. #VBA: keep only one searched string. searched string searched string searched stringThe list of search stings is given in sheet 2. In sheet1, with #VBA check if a given string is found more than once #VBA #VBA #VBA #VBA #VBA #VBA #VBA #VBA #VBA #VBA #VBA #VBA in a paragraph/line. If found more than once then keep only one. #VBA #VBA #VBA #VBA I want to do this both in an excel sheet with multiple column data in multiple rows as well as in a CSV or text file.
5
6	#VBA: keep only one searched string. #VBA: keep only one searched string. The list of search stings is given in sheet 2. In sheet1, with #VBA check if a given string is found more than once in a paragraph/line. If found more than once then keep only one. I want to do this both in an excel sheet with multiple column data in multiple rows as well as in a CSV or text file. #VBA: keep only one searched string. #VBA: keep only one searched string. searched string searched string searched string searched string The list of search stings is given in sheet 2. searched string searched string searched string searched string In sheet1, with #VBA check if a given string is found more than once in a paragraph/line. If found more than once then keep only one. I want to do this both in an excel sheet with multiple column data in multiple rows as well as in a CSV or text file.
7
8
9
10
11		#VBA: #VBA keep only one searched string. #VBA: #VBA #VBAkeep only one searched string. searched string searched string searched string searched string searched string In sheet1, with #VBA check if a given string is found more than #VBA once in a paragraph/line. If found more than #VBA once then keep only one. #VBA: keep only one searched string. The list of search stings is given in sheet 2. In sheet1, with #VBA check if a given string is found more than #VBA once in a paragraph/line. If found more than #VBA once then keep only one. I want to do this both in an excel sheet with multiple column data in multiple rows as well as in a CSV or text file.
12
13
14					#VBA: keep only one searched string. In sheet1, with #VBA check if a given string is found more than once in a paragraph/line. If found more than once then keep only one. I want to do this both in an excel sheet with multiple column data in multiple rows as well as in a CSV or text file. #VBA: keep only one searched string. In sheet1, with #VBA check if a paragraph/line given string is found more than once in a paragraph/line paragraph/line. If found more than once then keep only one. I want to do this both in an excel sheet with multiple column data in multiple rows as well as in a CSV or text file.
Input

String to search Sheet:

VBA keep only one searched string.xlsx
	A	B	C	D	E	F	G
1
2	paragraph/line
3
4						searched string
5	#VBA
6
7
8
9
String to search

Output Sheet:

VBA keep only one searched string.xlsx
	A	B	C	D	E
2	#VBA: keep only one searched string . #VBA: keep only searched string one . The list of search stings searchedCSV string searched string is given in sheet 2. In sheet1, with #VBA check if a given string is CSV searched string found more than once in a paragraph/line. If found more than once then keep only one. I want to do this both in an excel sheet with CSV searched string multiple column data in multiple rows as well as in a CSV or text file.
3
4	searched string #VBA: keep only one searched string. #VBA: keep only one searched string. searched string searched stringThe list of search stings is given in sheet 2. In sheet1, with #VBA check if a given string is found more than once in a paragraph/line. If found more than once then keep only one. I want to do this both in an excel sheet with multiple column data in multiple rows as well as in a CSV or text file.
5
6	#VBA: keep only one searched string. #VBA: keep only one searched string. The list of search stings is given in sheet 2. In sheet1, with #VBA check if a given string is found more than once in a paragraph/line. If found more than once then keep only one. I want to do this both in an excel sheet with multiple column data in multiple rows as well as in a CSV or text file. #VBA: keep only one searched string. #VBA: keep only one searched string. The list of search stings is given in sheet 2. searched string In sheet1, with #VBA check if a given string is found more than once in a paragraph/line. If found more than once then keep only one. I want to do this both in an excel sheet with multiple column data in multiple rows as well as in a CSV or text file.
7
8
9
10
11		#VBA: keep only one searched string. #VBA: keep only one searched string. searched string In sheet1, with #VBA check if a given string is found more than once in a paragraph/line. If found more than once then keep only one. #VBA: keep only one searched string. The list of search stings is given in sheet 2. In sheet1, with #VBA check if a given string is found more than once in a paragraph/line. If found more than once then keep only one. I want to do this both in an excel sheet with multiple column data in multiple rows as well as in a CSV or text file.
12
13
14					#VBA: keep only one searched string. In sheet1, with #VBA check if a given string is found more than once in a paragraph/line. If found more than once then keep only one. I want to do this both in an excel sheet with multiple column data in multiple rows as well as in a CSV or text file. #VBA: keep only one searched string. In sheet1, with #VBA check if a paragraph/line given string is found more than once in a paragraph/line paragraph/line. If found more than once then keep only one. I want to do this both in an excel sheet with multiple column data in multiple rows as well as in a CSV or text file.
Output

 

[sr1111]

Looking for a simple VBA solution.