View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
miikka1978 miikka1978 is offline
external usenet poster
 
Posts: 1
Default New try, Help needed


I have 110 ranges that I have labeled (A1,A2,A3...A110). First, I would
like to select A1 and perform a certain task, and then I would like to
select A2 and perform the same task. The problem is that I don't know
how to write a code that uses for-loop to do the task for all the 110
ranges. Here you can see the code that I was able to create by
recording the macro. Could someone help me with this piece of code?

Sub AT()

Application.Goto Reference:="A1"
Selection.Copy
Sheets("AS").Select
Range("A63").Select
ActiveSheet.Paste
Application.Run "'Excel 7.0.xls'!TS"
Application.Run "'Excel 7.0.xls'!TT"
Application.Goto Reference:="A2"
Selection.Copy
Sheets("AS").Select
Range("A63").Select
ActiveSheet.Paste
Application.Run "'Excel 7.0.xls'!TS"
Application.Run "'Excel 7.0.xls'!TT"
End Sub


--
miikka1978
------------------------------------------------------------------------
miikka1978's Profile: http://www.excelforum.com/member.php...o&userid=32294
View this thread: http://www.excelforum.com/showthread...hreadid=553510