View Single Post
  #3   Report Post  
Posted to microsoft.public.excel.programming
Noob McKnownowt Noob McKnownowt is offline
external usenet poster
 
Posts: 37
Default Macro to Copy and Paste to all worksheets after a point.

Hey Terry, i would try and set a loop, something like

for each WrkSht in thisworkbook.worksheets
if wrksht.name = "blah" then
goto mynext
else
What you want to copy i.e. sheet1.range("D2:D5").copy
where you want to paste it i.e.
wrksht.name.range("D2:D5").pastespecial
end if

mynext:
nextwrksht

have a play and get it do what you want. HTH pal

The Noob.

"Terry" wrote:

I posted this question, but in a rather more long winded way yesterday but
was hoping for an answer if i word it a little more simply. Essentially, I
need to design a macro to Copy information from a worksheet and paste to
other worsksheets after this point - but not necessarily worksheets with a
fixed name or to ALL other worksheets after it.

I can do it to worksheets with fixed names - something like

Sheets("Mon").Select
Cells.Select
Selection.Copy
Sheets("Tues").Select
Cells.Select
ActiveSheet.Paste


I'm just after some tips to make this more flexible. For instance, looking
at the above example, I may want to copy to all sheets that begin with "Tues
......."

I realise I can copy and paste manually but for my needs, thats not
particularly useful - this need to be a command button that updates other
sheets quickly if information in one sheet is changed.

I suppose I'm not looking for a definitve answer, just some tips and
pointers - my excel knowldege is good, but programming not so!!!!

Thanks in advance for any help!!!