Clear Bookmark Content (Image)

[teddy b via OfficeKB.com]

Hope some one can help.

I have a userForm with 3 options. My logo will call out from excel file base
on my selection. I encounter the problem when i reselect the option. The logo
will overlap the old 1.

How to clear the old logo and place the new 1?

Thanks.

 

[Word Heretic]

G'day "teddy b via OfficeKB.com" <[email protected]>,

It is either an InlineShape or a ShapeRange.

Steve Hudson - Word Heretic

steve from wordheretic.com (Email replies require payment)
Without prejudice


teddy b via OfficeKB.com reckoned:

 

[teddy b via OfficeKB.com]

How to wrap the image within a FRAME and TABLE in header using VBA?

Thanks.

G'day "teddy b via OfficeKB.com" <[email protected]>,

It is either an InlineShape or a ShapeRange.

Steve Hudson - Word Heretic

steve from wordheretic.com (Email replies require payment)
Without prejudice

teddy b via OfficeKB.com reckoned:

Hope some one can help.

[quoted text clipped - 5 lines]

Thanks.

 

[Word Heretic]

G'day "teddy b via OfficeKB.com" <[email protected]>,

Convert the Shape to an InlineShape


Steve Hudson - Word Heretic

steve from wordheretic.com (Email replies require payment)
Without prejudice


teddy b via OfficeKB.com reckoned:

How to wrap the image within a FRAME and TABLE in header using VBA?

Thanks.

G'day "teddy b via OfficeKB.com" <[email protected]>,

It is either an InlineShape or a ShapeRange.

Steve Hudson - Word Heretic

steve from wordheretic.com (Email replies require payment)
Without prejudice

teddy b via OfficeKB.com reckoned:

Hope some one can help.

[quoted text clipped - 5 lines]

Thanks.

 

[teddy b via OfficeKB.com]

With ActiveDocument.Sections(1).Headers(wdHeaderFooterFirstPage).Range.Tables
(1).Cell(1, 1).Range
.Delete
.InlineShapes.AddPicture FileName:="C:\Program Files\
Microsoft Office\Templates\" & LogoFName, LinkToFile:=False
End With

I did set Application.Options.PrintDrawingObjects = False
Also not working. Any idea how to wrap it (image) in script? My image sit
inside header within a frame and table.

Thanks.

G'day "teddy b via OfficeKB.com" <[email protected]>,

Convert the Shape to an InlineShape

Steve Hudson - Word Heretic

steve from wordheretic.com (Email replies require payment)
Without prejudice

teddy b via OfficeKB.com reckoned:

How to wrap the image within a FRAME and TABLE in header using VBA?

[quoted text clipped - 16 lines]

 

[Word Heretic]

G'day "teddy b via OfficeKB.com" <[email protected]>,

Close A cell range includes the End Of Cell marker which cannot be
overwritten. Thus:

Dim PicRange as Range

'All one line

Set PicRange =
ActiveDocument.Sections(1).Headers(wdHeaderFooterFirstPage).Range.Tables(1).Cell(1,
1).Range


With PicRange
.Delete
.Collapse wdcollapsestart

'All one line

.InlineShapes.AddPicture FileName:="C:\Program Files\Microsoft
Office\Templates\" & LogoFName, LinkToFile:=False, Range:=PicRange
End With

Set PicRange = Nothing



Steve Hudson - Word Heretic

steve from wordheretic.com (Email replies require payment)
Without prejudice


teddy b via OfficeKB.com reckoned:

With ActiveDocument.Sections(1).Headers(wdHeaderFooterFirstPage).Range.Tables
(1).Cell(1, 1).Range
.Delete
.InlineShapes.AddPicture FileName:="C:\Program Files\
Microsoft Office\Templates\" & LogoFName, LinkToFile:=False
End With

I did set Application.Options.PrintDrawingObjects = False
Also not working. Any idea how to wrap it (image) in script? My image sit
inside header within a frame and table.

Thanks.

G'day "teddy b via OfficeKB.com" <[email protected]>,

Convert the Shape to an InlineShape

Steve Hudson - Word Heretic

steve from wordheretic.com (Email replies require payment)
Without prejudice

teddy b via OfficeKB.com reckoned:

How to wrap the image within a FRAME and TABLE in header using VBA?

[quoted text clipped - 16 lines]

Thanks.