Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Shapes in header
Can someone tell me if it is possible to access the properties of shapes
that are 'hidden' in the header of a word-document, without having to use the following code: ActiveWindow.ActivePane.View.SeekView = wdSeekCurrentPageHeader & ActiveWindow.ActivePane.View.SeekView = wdSeekMainDocument Example: --------------------------------- Sub test() Dim shape As Variant ActiveWindow.ActivePane.View.SeekView = wdSeekCurrentPageHeader For Each shape In ActiveDocument.ActiveWindow.Selection.HeaderFooter .Shapes Debug.Print shape.Name Next shape ActiveWindow.ActivePane.View.SeekView = wdSeekMainDocument End Sub ---------------------------------- I would think that it is possible to access those shapes directly, instead of having to revert to the header/footer view. I am using Word2000. Thx, Sander |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Shapes in header
This is the excel forum - try in the word newsgroup and
you might get somewhere. |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Shapes in header
On Thu, 31 Jul 2003 05:31:55 -0700, Shunt wrote:
This is the excel forum - try in the word newsgroup and you might get somewhere. You're right. My mistake. Moved to -- microsoft.public.word.vba.general SL |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
excel document with shapes on it but the shapes do not print | Excel Worksheet Functions | |||
Naming Auto Shapes and Creating new Shapes | Excel Discussion (Misc queries) | |||
When drawing shapes in excel the shapes keep disappearing | Excel Discussion (Misc queries) | |||
How can i get more 3D shapes for Auto shapes in excel? | Excel Discussion (Misc queries) | |||
How can i get more 3D shapes for Auto shapes in excel? | Excel Discussion (Misc queries) |