Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.misc
Matt7102
 
Posts: n/a
Default Using Find & Replace to edit cell references in links

I built the following macro to edit cell references in links to an adjacent
page, and it works great- even though it must be updated daily. Basicly, it
changes the link from b to c, then c to d...t to u, etc as the days of the
month go by... It has a shortcoming- on the 20th of the month, with formulas
such as =T532-AT532; the macro changes AT to AU. ( see macro below ) I have
been running a manual find and replace on the single column range effected to
restore the AT from AU. I'm sure there is a better tool for the job, but I'm
no expert....any good ideas? tia, Matt

Range("AT514,AT517:AT602,AT604:AT633").Select
Range("AT604").Activate
ActiveWindow.SmallScroll Down:=-95
Range("AT514,AT517:AT602,AT604:AT633,AV517:AV602,A V571:AV633").Select
Range("AV571").Activate
ActiveWindow.LargeScroll Down:=-3

Range("AT514,AT517:AT602,AT604:AT633,AV517:AV602,A V571:AV633,AY514,AY517:AY602,AY604:AY633" _
).Select
Range("AY604").Activate
ActiveWindow.SmallScroll Down:=-99
Range( _

"AT514,AT517:AT602,AT604:AT633,AV517:AV602,AV571:A V633,AY514,AY517:AY602,AY604:AY633,BA517:BA602,BA5 71:BA633" _
).Select
Range("BA571").Activate
Selection.Replace What:="T", Replacement:="U", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
End Sub
Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

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
Adding a row to worksheet does not update cell references in another. blausen Excel Worksheet Functions 5 February 25th 06 09:14 PM
Can I find and replace "white space" in a cell in Excel? biggyb75 Excel Worksheet Functions 7 July 11th 05 04:58 PM
HOW DO I TOGGLE FROM FIND AND REPLACE TO A CELL EASILY? kmk Excel Discussion (Misc queries) 1 June 25th 05 02:51 PM
find and replace cell reference to a new worksheet Johnny Van Excel Worksheet Functions 0 June 23rd 05 03:41 AM
How can I do a find and replace for a cell that has multiple line. yrat Excel Discussion (Misc queries) 1 April 19th 05 03:48 PM


All times are GMT +1. The time now is 02:47 AM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Copyright ©2004-2024 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"