Hi all,
I found a solution to this problem myself: I use a Ref-field which refers to
the includepicture-field on the first page. This works even if the bookmark
is in the body of the document (which I do not run the updatefunction of
non-updatable fields on)

Birgit

"Birgit" schreef in bericht
...
Hi all,
I now run into problems on updating my second page header which is
unfortunately not completely the same as the firstpage header because it
contains a pagenumber.

If there is not yet a second page when the code is run then the following
code will not give a proper result: No logo if user creates a second page

Any suggestions except to temporarily create a second page?

Birgit
code below:

For i = 1 To myDoc.Sections.Count
' update header (mydoc is generally the active document)

myDoc.Sections(i).Headers(wdHeaderFooterFirstPage) .Range.Fields.Update
'update non-updatables
For Each afield In
myDoc.Sections(i).Headers(wdHeaderFooterFirstPage) .Range.Fields
On Error Resume Next
If afield.LinkFormat.AutoUpdate = False Then
afield.LinkFormat.Update
Next afield
'update header

myDoc.Sections(i).Headers(wdHeaderFooterPrimary).R ange.Fields.Update
'update non-updatables
For Each afield In
myDoc.Sections(i).Headers(wdHeaderFooterPrimary).R ange.Fields
On Error Resume Next
If afield.LinkFormat.AutoUpdate = False Then
afield.LinkFormat.Update
Next afield
Next i


I wrote earlier today:
Hi all, hi Cindy,
I find I have to use the following code just once after the document has
been assigned its proper logo (I'm glad I don't have to swap logo's once
they are set):

Dim afield As Field
For Each afield In
ActiveDocument.Sections(1).Headers(wdHeaderFooterF irstPage).Range.Fields
On Error Resume Next
If afield.LinkFormat.AutoUpdate = False Then afield.LinkFormat.Update
Next afield

This way the docproperty inside the includepicture seems to be converted
to the text of the documentproperty. The application.version suggestion
works as a treat with this.

I'll implement this for all headers and I think I'll be set.

Thanks again,
Birgit
"Cindy M -WordMVP-" schreef in bericht
news:VA.0000a797.00652947@speedy...
Hi Birgit,

In which version of Office does this change? And how can I check the
user's
version of Office? The code needs to run on all versions unfortunately.

I think it was in 2000. You can check which version using
Application.Version

Cindy Meister
INTER-Solutions, Switzerland
http://homepage.swissonline.ch/cindymeister (last update Jun 8 2004)
http://www.word.mvps.org

This reply is posted in the Newsgroup; please post any follow question
or
reply in the newsgroup and not by e-mail :-)