My Online Training Hub

Learn Dashboards, Excel, Power BI, Power Query, Power Pivot

You are here: Home / VBA code to search for text (keywords) in an excel cell and change the font color when match found|VBA & Macros|Excel Forum|My Online Training Hub
Avatar
sp_LogInOut Log In sp_Registration Register
sp_Search Search
Advanced Search|Last Search Results
Search
Forum Scope



Match



Forum Options



Minimum search word length is 3 characters - maximum search word length is 84 characters
sp_Search Search
sp_RankInfo
Lost password?
sp_PrintTopic sp_TopicIcon
VBA code to search for text (keywords) in an excel cell and change the font color when match found
Avatar
RachaelH
Member
Members

Power BI
Level 0
Forum Posts: 6
Member Since:
June 27, 2016
sp_UserOfflineSmall Offline
1
November 27, 2017 - 12:51 pm
sp_Permalink sp_Print

Hi I am after some VBA code which might make life  easier for myself and a few colleagues!

I have an excel spreadsheet which has text in column A (Description). In the text in this column I wish to search for several keywords which are listed in  column E (Keywords). When the macrco finds a keyword in column A it should change the font of the found word to red. A word repeated should be changed twice. Example below 

Thanks for your assistance 

 

Description       Keywords
Mary had a little lamb       Mary
When in Rome do as the Romans do       Rain
Mary Mary quite contrary       rain
The rain in Spain falls mainly on the plain        
This little pig when to market        
Rain rain go away        
sp_AnswersTopicSeeAnswer See Answer
Avatar
clark shao
Member
Members
Level 0
Forum Posts: 44
Member Since:
November 19, 2017
sp_UserOfflineSmall Offline
2
November 27, 2017 - 1:48 pm
sp_Permalink sp_Print

Hi,

Please test the atached file. You can enter new strings in column A and add more keywords in column E.

Clark

sp_AnswersTopicAnswer
Answers Post
Avatar
RachaelH
Member
Members

Power BI
Level 0
Forum Posts: 6
Member Since:
June 27, 2016
sp_UserOfflineSmall Offline
3
November 28, 2017 - 9:34 am
sp_Permalink sp_Print

Hi Clark, Thanks for this. It worked really well.

Avatar
Samantha Wiederkehr

New Member
Members
Level 0
Forum Posts: 1
Member Since:
May 6, 2020
sp_UserOfflineSmall Offline
4
May 6, 2020 - 7:26 pm
sp_Permalink sp_Print sp_EditHistory

Hi Clark,

Thank you for your help! It works very well and I am very grateful for that. Can you show me how to do it?

sp_Feed
Go to top
Forum Timezone: Australia/Brisbane
Most Users Ever Online: 245
Currently Online: RAQUEL ACION, Dana Friedt, Nada Perovic
Guest(s) 11
Currently Browsing this Page:
1 Guest(s)
Top Posters:
SunnyKow: 1432
Anders Sehlstedt: 870
Purfleet: 412
Frans Visser: 346
David_Ng: 306
lea cohen: 219
A.Maurizio: 202
Jessica Stewart: 202
Aye Mu: 201
jaryszek: 183
Newest Members:
terimeri dooriyan
Jack Aston
AndyC
Denise Lloyd
michael serna
mashal sana
Tiffany Kang
Leah Gillmore
Sopi Yuniarti
LAFONSO HERNANDEZ
Forum Stats:
Groups: 3
Forums: 24
Topics: 6218
Posts: 27266

 

Member Stats:
Guest Posters: 49
Members: 31901
Moderators: 3
Admins: 4
Administrators: Mynda Treacy, Philip Treacy, Catalin Bombea, FT
Moderators: MOTH Support, Velouria, Riny van Eekelen