Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 4
Default How can I use Shapes in 2007?

In my 2003 excel macro sheet I used:
ActiveSheet.Shapes("Rectangle 23").Select
Selection.ShapeRange.ZOrder msoBringToFront
ActiveSheet.Shapes("Rectangle 24").Select
Selection.ShapeRange.ZOrder msoBringToFront
In 2007 these actions doesn't work. even as I record the action I don't see
them in 2007.
I like to hide some text to put a rectangle in front.

  #2   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 3,355
Default How can I use Shapes in 2007?

IIRC, the shapes code has changed a lot in 2007. I don't have it available,
so can't test right now. Maybe someone else can assist.

I would tweak it for 2003 though. This should get the job done in 2003.

ActiveSheet.Shapes("Rectangle 23").ShapeRange.ZOrder msoBringToFront
ActiveSheet.Shapes("Rectangle 24").ShapeRange.ZOrder msoBringToFront
--
HTH,
Barb Reinhardt


"nkat" wrote:

In my 2003 excel macro sheet I used:
ActiveSheet.Shapes("Rectangle 23").Select
Selection.ShapeRange.ZOrder msoBringToFront
ActiveSheet.Shapes("Rectangle 24").Select
Selection.ShapeRange.ZOrder msoBringToFront
In 2007 these actions doesn't work. even as I record the action I don't see
them in 2007.
I like to hide some text to put a rectangle in front.

  #3   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 2,420
Default How can I use Shapes in 2007?

It's actually more logical IMO in 2007

With ActiveSheet

.Shapes("Rectangle 23").ZOrder msoBringToFront
.Shapes("Rectangle 24").ZOrder msoBringToFront
End With


--
__________________________________
HTH

Bob

"nkat" wrote in message
...
In my 2003 excel macro sheet I used:
ActiveSheet.Shapes("Rectangle 23").Select
Selection.ShapeRange.ZOrder msoBringToFront
ActiveSheet.Shapes("Rectangle 24").Select
Selection.ShapeRange.ZOrder msoBringToFront
In 2007 these actions doesn't work. even as I record the action I don't
see
them in 2007.
I like to hide some text to put a rectangle in front.



  #4   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 4
Default How can I use Shapes in 2007?

When I use :

''Sheets("SCORECARD").Select
With ActiveSheet

.Shapes("Rectangle 23").ZOrder msoBringToFront
.Shapes("Rectangle 24").ZOrder msoBringToFront
End With

Nothing is changing.



"Bob Phillips" wrote:

It's actually more logical IMO in 2007

With ActiveSheet

.Shapes("Rectangle 23").ZOrder msoBringToFront
.Shapes("Rectangle 24").ZOrder msoBringToFront
End With


--
__________________________________
HTH

Bob

"nkat" wrote in message
...
In my 2003 excel macro sheet I used:
ActiveSheet.Shapes("Rectangle 23").Select
Selection.ShapeRange.ZOrder msoBringToFront
ActiveSheet.Shapes("Rectangle 24").Select
Selection.ShapeRange.ZOrder msoBringToFront
In 2007 these actions doesn't work. even as I record the action I don't
see
them in 2007.
I like to hide some text to put a rectangle in front.




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
Issue printing shapes in Excel 2007 [email protected] Excel Discussion (Misc queries) 1 June 25th 09 03:58 PM
Shapes on 2007 Spreadsheets BillCPA Excel Discussion (Misc queries) 5 March 12th 09 09:21 PM
Shapes in 2007 from 2003 WayneR Excel Discussion (Misc queries) 0 May 23rd 08 08:16 PM
Formatting shapes with excel 2007 Bucky Excel Discussion (Misc queries) 0 March 8th 07 07:49 PM
2007: new behavior of grouped shapes MrT Excel Programming 0 November 23rd 06 03:43 PM


All times are GMT +1. The time now is 04:26 PM.

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

About Us

"It's about Microsoft Excel"