My Online Training Hub

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

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

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
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
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
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: Hans Hallebeek
Guest(s) 8
Currently Browsing this Page:
1 Guest(s)
Top Posters:
Catalin Bombea: 1939
SunnyKow: 1432
Anders Sehlstedt: 918
Purfleet: 415
Frans Visser: 349
Hans Hallebeek: 333
David_Ng: 306
lea cohen: 248
Jessica Stewart: 219
A.Maurizio: 216
Newest Members:
Crystal Harris
Amaan Abdi
Sarah Yelland
Ahsan AYUB
Daniel Neilson
Joy Nicholes
Earl Hanlon
Paulo Pinto
Tavonga Machigere
Marc Poulopoulos
Forum Stats:
Groups: 3
Forums: 25
Topics: 7058
Posts: 30934

 

Member Stats:
Guest Posters: 49
Members: 34430
Moderators: 2
Admins: 3
Administrators: Mynda Treacy, Philip Treacy, Jessica
Moderators: Velouria, Riny van Eekelen