Menu

Code to replace specific text

Search this Thread

Prev

Previous Post

Next Post

Next

#6

Report Post

Posted to microsoft.public.excel.programming

Bruno Campanini[_2_] Bruno Campanini[_2_] is offline

Bruno Campanini[_2_] is offline

external usenet poster

Posts: 74

Default

Code to replace specific text

After serious thinking wrote :
Hi

I'm wondering if anyone could advise me on this.

Within a worksheet detailing business credit card purchases, I have 2 columns
which list a description of the purchase (col G) and the name of the vendor
(col H)

I'm currently working on a macro that sorts the worksheet by various
criteria, and I want to include in the same macro an element of tidying the
data so that, if the 'description' cell says 'No Description' (this is from
the credit card source data), I'd like to replace it with the content of the
corresponding vendor cell:

Col G Col H
Laptop PC Store
No Description PC Store
Keyboard Amazon

becomes

Col G Col H
Laptop PC Store
PC Store PC Store
Keyboard Amazon

And I'm completely stumped on how to do it.

======================================
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel
As Boolean)

If Not IsEmpty(Target) And Target(, 0) = "No Description" Then
Target(, 0) = Target
End If

End Sub
=======================================

DoubleClick a non-blank cell to the right of "No Description".

Bruno

Reply With Quote

Reply With Quote

Thread Tools	Search this Thread
Show Printable Version	Search this Thread: Advanced Search
Display Modes
Switch to Linear Mode Switch to Hybrid Mode Threaded Mode

Posting Rules
Smilies are On [IMG] code is On HTML code is Off Trackbacks are On Pingbacks are On Refbacks are On

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
How can I replace text with a specific number?	Emma O''Shaughnessy	Excel Discussion (Misc queries)	3	July 3rd 08 12:14 PM
FIND SPECIFIC TEXT AND REPLACE IT	Tree	Excel Worksheet Functions	5	March 27th 08 12:27 AM
Code to find and replace words inside of a text box	RJR[_2_]	Excel Programming	1	February 21st 07 06:38 PM
Replace text with variable using VBA replace code?	Mike[_112_]	Excel Programming	2	November 9th 06 06:06 PM
Replace text in specific column	Gijs Breedveld	Excel Programming	6	June 19th 06 07:10 PM

All times are GMT +1. The time now is 02:52 PM.

About Us

"It's about Microsoft Excel"

Contact Us ExcelBanter forum home Privacy Statement