|
A simpler way
Hi,
Is there a more efficient was of writiing the following code: Application.Goto Reference:="ICT1" Selection.ClearContents Application.Goto Reference:="ICT2" Selection.ClearContents Application.Goto Reference:="ICT3" Selection.ClearContents Application.Goto Reference:="ICT4" Selection.ClearContents ICT1 etc. are simply non-contiguous named ranges. Thanks in Advance and all the best as always, Matt |
A simpler way
On Thu, 22 Jan 2009 16:27:01 -0800, veryeavy
wrote: Hi, Is there a more efficient was of writiing the following code: Application.Goto Reference:="ICT1" Selection.ClearContents Application.Goto Reference:="ICT2" Selection.ClearContents Application.Goto Reference:="ICT3" Selection.ClearContents Application.Goto Reference:="ICT4" Selection.ClearContents ICT1 etc. are simply non-contiguous named ranges. Thanks in Advance and all the best as always, Matt Simpler would be: ================== Range("ICT1,ICT2,ICT3,ICT4").ClearContents ================= However, you should be aware that these Names will not be legal in Excel 2007 in native mode, as ICT1, etc, are all valid cell references. --ron |
A simpler way
Many thanks, Ron.
Your observations re Range Names was especially useful. So do I love my employer enough to make my code forward compatible? That will require some pondering) Cheers, Matt "Ron Rosenfeld" wrote: On Thu, 22 Jan 2009 16:27:01 -0800, veryeavy wrote: Hi, Is there a more efficient was of writiing the following code: Application.Goto Reference:="ICT1" Selection.ClearContents Application.Goto Reference:="ICT2" Selection.ClearContents Application.Goto Reference:="ICT3" Selection.ClearContents Application.Goto Reference:="ICT4" Selection.ClearContents ICT1 etc. are simply non-contiguous named ranges. Thanks in Advance and all the best as always, Matt Simpler would be: ================== Range("ICT1,ICT2,ICT3,ICT4").ClearContents ================= However, you should be aware that these Names will not be legal in Excel 2007 in native mode, as ICT1, etc, are all valid cell references. --ron |
A simpler way
On Thu, 22 Jan 2009 17:32:05 -0800, veryeavy
wrote: Many thanks, Ron. Your observations re Range Names was especially useful. So do I love my employer enough to make my code forward compatible? That will require some pondering) Cheers, Matt Glad to help. Good luck with your pondering :-) --ron |
A simpler way
On Jan 22, 8:32*pm, veryeavy
wrote: Many thanks, Ron. Your observations re Range Names was especially useful. So do I love my employer enough to make my code forward compatible? That will require some pondering) Cheers, Matt "Ron Rosenfeld" wrote: On Thu, 22 Jan 2009 16:27:01 -0800, veryeavy wrote: Hi, Is there a more efficient was of writiing the following code: Application.Goto Reference:="ICT1" * *Selection.ClearContents * *Application.Goto Reference:="ICT2" * *Selection.ClearContents * *Application.Goto Reference:="ICT3" * *Selection.ClearContents * *Application.Goto Reference:="ICT4" * *Selection.ClearContents ICT1 etc. are simply non-contiguous named ranges. Thanks in Advance and all the best as always, Matt Simpler would be: ================== Range("ICT1,ICT2,ICT3,ICT4").ClearContents ================= However, you should be aware that these Names will not be legal in Excel 2007 in native mode, as ICT1, etc, are all valid cell references. --ron Dim x as Integer For x=1 to 4 Range("ICT"&x).ClearContents Next x |
| All times are GMT +1. The time now is 10:28 PM. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com