I tend to agree with Divakar. But in case you'd still want to go with the
original request, here's the macro
Sub CopyShapesAcross()
Dim shp As Shape
Dim lngLoop As Long
Application.ScreenUpdating = False
Set shp = Sheets(1).Shapes("NameOfShape")
For lngLoop = 2 To Sheets.Count
If Sheets(lngLoop).Type = xlWorksheet Then
shp.Copy
Sheets(lngLoop).Paste
Application.Goto Sheets(lngLoop).Cells(1)
With Sheets(lngLoop).Shapes(shp.Name)
.Top = shp.Top
.Left = shp.Left
End With
End If
Next lngLoop
With Application
.Goto Sheets(1).Cells(1)
.ScreenUpdating = True
End With
End Sub
Regards,
Sam Mathai Chacko (GL)
On Wed, Oct 12, 2011 at 9:03 PM, Divaker Pandey <divake...@gmail.com> wrote:
> it is so easy, if you use hyperlink instead of button
>
> Divaker
>
>
>
> On Wed, Oct 12, 2011 at 5:15 PM, Eddie <eddiejame...@googlemail.com>wrote:
>
>> Hi,
>>
>> I have a workbook with around 100 worksheets. The first sheet acts as
>> a summary/introductory or front end and has links to other "sub-
>> sheets". In the first sub-sheet I've created a button containing a
>> macro that returns you to the introduction sheet. What I'd like to do
>> is copy this button onto each of the sub-sheets, however Excel doesnt
>> allow me to paste into multiple sheets. Is there anyway of replicating
>> this button in multiple sheets without having to do this manually for
>> each sheet?
>>
>> Any help very much appreciated.
>>
>> --
>>
>> ----------------------------------------------------------------------------------
>> Some important links for excel users:
>> 1. Follow us on TWITTER for tips tricks and links :
>> http://twitter.com/exceldailytip
>> 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
>> 3. Excel tutorials at http://www.excel-macros.blogspot.com
>> 4. Learn VBA Macros at http://www.quickvba.blogspot.com
>> 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
>>
>> To post to this group, send email to excel-macros@googlegroups.com
>>
>> <><><><><><><><><><><><><><><><><><><><><><>
>> Like our page on facebook , Just follow below link
>> http://www.facebook.com/discussexcel
>>
>
> --
>
> ----------------------------------------------------------------------------------
> Some important links for excel users:
> 1. Follow us on TWITTER for tips tricks and links :
> http://twitter.com/exceldailytip
> 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
> 3. Excel tutorials at http://www.excel-macros.blogspot.com
> 4. Learn VBA Macros at http://www.quickvba.blogspot.com
> 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
>
> To post to this group, send email to excel-macros@googlegroups.com
>
> <><><><><><><><><><><><><><><><><><><><><><>
> Like our page on facebook , Just follow below link
> http://www.facebook.com/discussexcel
>
--
Sam Mathai Chacko
--
----------------------------------------------------------------------------------
Some important links for excel users:
1. Follow us on TWITTER for tips tricks and links :
http://twitter.com/exceldailytip
2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
3. Excel tutorials at http://www.excel-macros.blogspot.com
4. Learn VBA Macros at http://www.quickvba.blogspot.com
5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
To post to this group, send email to excel-macros@googlegroups.com
<><><><><><><><><><><><><><><><><><><><><><>
Like our page on facebook , Just follow below link
http://www.facebook.com/discussexcel
