Find/Replace text in Excel 2001

Should be easy, but i'm in a crunch and need help fast.

I have a column:

PROC5 Provider




Q-67047



Q-39884

Q-22709
Q-97099

Q-60021


I want to keep all the blank rows blank, and change any field that has data (all starting wtih Q) to the text "Midas"

Help please :)

Thanks in advance.
slatefamilyAsked:
Who is Participating?

[Product update] Infrastructure Analysis Tool is now available with Business Accounts.Learn More

x
I wear a lot of hats...

"The solutions and answers provided on Experts Exchange have been extremely helpful to me over the last few years. I wear a lot of hats - Developer, Database Administrator, Help Desk, etc., so I know a lot of things but not a lot about one thing. Experts Exchange gives me answers from people who do know a lot about one thing, in a easy to use platform." -Todd S.

netballiCommented:
Hello,

try the following formula in column B1, assuming the data is in column A

=IF(ISBLANK(A1),"",CONCATENATE("Q-",A1))
0
wshark83Commented:
try CTRL H- and find Q- and replace with text but this will keep the numbers

alternatively here's a macro which will do that (you will need to change the range("A1:A15"):

Sub Workbook_BeforePrint()
    Dim r As Range
    Set r = ThisWorkbook.Sheets(1).Range("A1:A15")
    For Each cell In r
        If IsEmpty(cell) Then
        ElseIf LCase(Mid(cell.Value, 1, 1)) = "q" Then cell.Value = "Midas"
          Exit For
        End If
    Next
End Sub
0
slatefamilyAuthor Commented:
well I was able to use this formula to do what I needed it to:

=SUBSTITUTE(FA14, FA14, "Midas")
0
CompTIA Network+

Prepare for the CompTIA Network+ exam by learning how to troubleshoot, configure, and manage both wired and wireless networks.

slatefamilyAuthor Commented:
I wanted to take out the whole cell that contained any text and replace it with a generic term.  The substitution formula I found online is what helped me, I am not sure this was the correct way to do it but I achieved what I needed.  If anyone else can post a way to do it without using another column field, I would still be interested.
0
lee555J5Commented:
Do you have to have a formula or VBA? If not, use wshark83's suggestion but with a wildcard.

Hit [Ctrl-H]
Find what: Q-*
Replace with: Midas

Lee
0

Experts Exchange Solution brought to you by

Your issues matter to us.

Facing a tech roadblock? Get the help and guidance you need from experienced professionals who care. Ask your question anytime, anywhere, with no hassle.

Start your 7-day free trial
slatefamilyAuthor Commented:
I was hoping to use something like that but I got an error

Doc1.doc
0
slatefamilyAuthor Commented:
I couldn't get the macro to work.
0
lee555J5Commented:
Are you using Excel 2010, and your question title "Excel 2001" is a typo?

I just tested this on 2 boxes running Win7 SP1 64bit and Office 2010 SP1 32bit. If a single cell is selected, it does the whole sheet. If more than 1 cell is selected, it works only on the selected range. Mine seems to be doing exactly what you need yours to do, I don't know why yours isn't working.

Are your cells containing "Q-*" just data cells, or is the "Q-*" the result of a formula?
0
Rory ArchibaldCommented:
Your data are actually formulas. Use:

Find: ="Q-*"
Replace: Midas
0
slatefamilyAuthor Commented:
Does not work.  Microsoft Excel cannot find any data to replace.  Check to see if your data and formatting are correct.
0
slatefamilyAuthor Commented:
TYPO, it is 2007
0
slatefamilyAuthor Commented:
lee555J5,

The cells contaning Q- are just text.
0
slatefamilyAuthor Commented:
I got it to work!
0
lee555J5Commented:
What made it work? What fixed it?
0
wshark83Commented:
i tested the macro and that worked so strange why it didn't work on yours....well done atleast its solved
0
slatefamilyAuthor Commented:
I think why it originally didn't work for either (macro included), was because the file was protected.
0
It's more than this solution.Get answers and train to solve all your tech problems - anytime, anywhere.Try it for free Edge Out The Competitionfor your dream job with proven skills and certifications.Get started today Stand Outas the employee with proven skills.Start learning today for free Move Your Career Forwardwith certification training in the latest technologies.Start your trial today
Microsoft Excel

From novice to tech pro — start learning today.