Select a range of cells to cpy based on a text searh

		Microsoft Office Forums > Microsoft Excel > Excel
Select a range of cells to cpy based on a text searh

FAQ

Thread Tools

Display Modes

07-18-2023, 01:27 PM

Alansidman Alansidman is offline

Windows 11 Select a range of cells to cpy based on a text searh

Office 2021

עַם יִשְׂרָאֵל חַי

Join Date: Apr 2019

Location: Steamboat Springs

Posts: 115

Here is a VBA solution

Code:

Option Explicit

Option Compare Text
Sub Safeway()
    Dim rng As Range, c As Range
    Set rng = Range("B3:F14") 'Change this range to your actual range of data.
    For Each c In rng
        If InStr(c, "Safeway") > 0 Then
            c.EntireRow.Interior.ColorIndex = 6
        End If
    Next c
    MsgBox "Action Completed"
End Sub

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Distribute text in one cell across a range of cells (overcoming selection.range.cells.count bug)	slaycock	Word VBA	0	02-18-2017 07:00 AM
Dynamically select a TextBox based on range value	IIOII	Word VBA	8	07-20-2016 11:28 PM
Help with Index Function to Select Range of Cells	bretyuin	Excel	1	02-24-2016 05:11 AM
select a cluster of point from a range based on x and y values	sandcharles	Excel	5	02-19-2015 06:15 AM
Color-fill a range of cells, based on text in a different sheet. Possible?	unittwentyfive	Excel	2	06-01-2014 06:48 AM