| Home |
| Search |
| Today's Posts |
|
#5
Posted to microsoft.public.excel.programming
|
|||
|
|||
Find/Replace text with formula
They all worked for me.
-- Regards, Tom Ogilvy "Jasmine" wrote: Thank you! That worked. "Gary Keramidas" wrote: maybe something like this, just adjust the range in column j Sub test() Dim cell As Range For Each cell In Range("j1:j100") cell.Replace What:="0", Replacement:="=(E" & cell.Row & "+F" & cell.Row & _ "+G" & cell.Row & "+H" & cell.Row & ")-I" & cell.Row, LookAt:= _ xlPart, SearchOrder:=xlByRows, MatchCase:=False Next Range("J5").Select End Sub -- Gary "Jasmine" wrote in message ... I have a spreadsheet with a column that has the value 0 in some cells. I want to write a macro to do a search for column J and every time it finds 0 it puts my formula in there. I got it to put the formula in there, but not adjust for what row it is on. Columns("J:J").Select Selection.Replace What:="0", Replacement:="=(E3+F3+G3+H3)-I3", LookAt:= _ xlPart, SearchOrder:=xlByRows, MatchCase:=False Range("J5").Select This works fine for row 3, but for row 5 it should put =(E5+F5+G5+H5)-I5. I know there is an easy way to do this, but it is eluding me right now. Any help would be greatly appreciated! Thanks! |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| Find & replace with text | Excel Discussion (Misc queries) | |||
| Replace can't find text | Excel Discussion (Misc queries) | |||
| find text in cell and replace it with part of the text in that ce. | Excel Discussion (Misc queries) | |||
| Find & Replace in Text Box | Excel Discussion (Misc queries) | |||
| Find and Replace Text | Excel Programming | |||
Threaded Mode
