Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
relative versus specific cells in macros/vba
A macro I'm trying to write has to include a "copy-find-paste-modify" string,
but I don't know how to generalize the active cell choice to be dependant upon the results of the "find" rather than a specific cell typed in vba. So, how do I write "find cell, move four cells to the right of found cell, modify that cell" rather than, "move to r1c1, modify?" I'm looking essentially for a variable plug within r1c1 rather than a specific grid placement. |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
relative versus specific cells in macros/vba
Dim fCell as Range
Set fCell = Cells.Find(What:=SearchText, After:=StartCell, LookIn:=xlFormulas, _ LookAt:=xlWhole, SearchOrder:=xlByRows, _ SearchDirection:=xlNext, MatchCase:=True).Offset(0,4) fCell = "Hello From Iowa" HTH Die_Another_Day Stutsman wrote: A macro I'm trying to write has to include a "copy-find-paste-modify" string, but I don't know how to generalize the active cell choice to be dependant upon the results of the "find" rather than a specific cell typed in vba. So, how do I write "find cell, move four cells to the right of found cell, modify that cell" rather than, "move to r1c1, modify?" I'm looking essentially for a variable plug within r1c1 rather than a specific grid placement. |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
relative versus specific cells in macros/vba
One slight modification that makes things a bit more robust:
Dim fCell As Range Set fCell = Cells.Find(What:=SearchText, _ After:=StartCell, _ LookAt:=xlWhole, _ LookIn:=xlFormulas, _ SearchOrder:=xlByRows, _ SearchDirection:=xlNext, _ MatchCase:=True) If fCell Is Nothing Then Msgbox SearchText & " was not found." Else With fCell.Offset(0, 4) .Value = .Value & " modified" End With End If In article .com, "Die_Another_Day" wrote: Dim fCell as Range Set fCell = Cells.Find(What:=SearchText, After:=StartCell, LookIn:=xlFormulas, _ LookAt:=xlWhole, SearchOrder:=xlByRows, _ SearchDirection:=xlNext, MatchCase:=True).Offset(0,4) fCell = "Hello From Iowa" HTH Die_Another_Day Stutsman wrote: A macro I'm trying to write has to include a "copy-find-paste-modify" string, but I don't know how to generalize the active cell choice to be dependant upon the results of the "find" rather than a specific cell typed in vba. So, how do I write "find cell, move four cells to the right of found cell, modify that cell" rather than, "move to r1c1, modify?" I'm looking essentially for a variable plug within r1c1 rather than a specific grid placement. |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
multiple distances versus lowest time for a specific distance | New Users to Excel | |||
How do I write macros with relative reference cells | Excel Programming | |||
Macros - Relative cells in Excel | Excel Programming | |||
Create macros to print specific cells | Excel Programming | |||
Macros i XL 2003 versus 2000 - speed problems | Excel Programming |