Language problems with HTML export

  • Thread starter Thread starter Rene
  • Start date Start date
R

Rene

Hi experts,

the HTML export of my german version of PPT2000 is annoying me! I need
some help:

1. Is there a way to make my entire PPT2000 act like the english
version? During HTML export all mouseover descriptions among other
things are automatically in German. I can't think of a different way
to avoid this.

2. I found a great VBA code
(http://support.microsoft.com/support/kb/articles/q245/4/68.asp) for
changing the language setting for all text boxes in a presentation.
GREAT! (Thanks to Echo in the archive)..... however... this does not
effect the notes of each slide. Can somebody tell me how to modify the
code accordingly so that the language of the notes will also be
changed?

Thanks everyone!
René
 
1. Is there a way to make my entire PPT2000 act like the english
version? During HTML export all mouseover descriptions among other
things are automatically in German. I can't think of a different way
to avoid this.
Click to expand...

If you'd like, give the free PPT2HTML demo at http://ppt2html.pptools.com a try
It automatically assigns tooltip text in English for action settings, but you
can substitute your own text in any language for the defaults, or you can
assign Web text to the shape and it turns into ALT text in the HTML, so you can
add whole paragraphs of explanation if you like.
2. I found a great VBA code
(http://support.microsoft.com/support/kb/articles/q245/4/68.asp) for
changing the language setting for all text boxes in a presentation.
GREAT! (Thanks to Echo in the archive)..... however... this does not
effect the notes of each slide. Can somebody tell me how to modify the
code accordingly so that the language of the notes will also be
changed?
Click to expand...

This modified version should do it:

Sub Lingo()

' Declare variables.
Dim sld As Slide
Dim shp As Shape

' Loop through all of the slides in the presentation.
For Each sld In ActivePresentation.Slides

' Loop through each shape on each slide.
For Each shp In sld.Shapes

' If the Shape is a text box...
If shp.Type = msoTextBox Or msoPlaceholder Then
If shp.HasTextFrame Then

' ...then change the language to US English.
' NOTE: To change the language ID to another language,
' change the msoLanguageID value here to a
' different language.
shp.TextFrame.TextRange.LanguageID = msoLanguageIDEnglishUS

End If
End If
Next

' ADD THIS:
For Each shp In sld.NotesPage.Shapes

' If the Shape is a text box...
If shp.Type = msoTextBox Or msoPlaceholder Then
If shp.HasTextFrame Then

' ...then change the language to US English.
' NOTE: To change the language ID to another language,
' change the msoLanguageID value here to a
' different language.
shp.TextFrame.TextRange.LanguageID = msoLanguageIDEnglishUS

End If
End If
Next
' END OF ADDITION

Next

End Sub

--
Steve Rindsberg, PPT MVP
PPT FAQ: www.pptfaq.com
PPTools: www.pptools.com
================================================
Featured Presenter, PowerPoint Live 2004
October 10-13, San Diego, CA www.PowerPointLive.com
================================================
 
Thanks Steve!

I tried the ppt2html but could not find a way to get a display with
the notes in a separate frame, like with the internal export function.
Also I couldn't get the outline to be displayed. Is thera a template
available, that will do that?

Thanks!
René
 
I tried the ppt2html but could not find a way to get a display with
the notes in a separate frame, like with the internal export function.
Click to expand...

It was originally written for people who specifically didn't WANT to use frames.
It can add a list of slide titles down the left, framelessly now. I'll likely add the
ability to use framesets later, but it's pretty low on the list.
Also I couldn't get the outline to be displayed. Is thera a template
available, that will do that?
Click to expand...

Outline, with all the body text and so forth, for the whole presentation, no.
You can get the title/body text and other text in each slide's individual html file
though.

Or as above, a list of slide titles - see this:

Make Table of Contents-style links to the other slides in your presentation
http://www.rdpslides.com/pptools/ppt2html/FAQ00173.htm
Thanks!
René



If you'd like, give the free PPT2HTML demo at http://ppt2html.pptools.com a try
It automatically assigns tooltip text in English for action settings, but you
can substitute your own text in any language for the defaults, or you can
assign Web text to the shape and it turns into ALT text in the HTML, so you can
add whole paragraphs of explanation if you like.


This modified version should do it:

Sub Lingo()

' Declare variables.
Dim sld As Slide
Dim shp As Shape

' Loop through all of the slides in the presentation.
For Each sld In ActivePresentation.Slides

' Loop through each shape on each slide.
For Each shp In sld.Shapes

' If the Shape is a text box...
If shp.Type = msoTextBox Or msoPlaceholder Then
If shp.HasTextFrame Then

' ...then change the language to US English.
' NOTE: To change the language ID to another language,
' change the msoLanguageID value here to a
' different language.
shp.TextFrame.TextRange.LanguageID = msoLanguageIDEnglishUS

End If
End If
Next

' ADD THIS:
For Each shp In sld.NotesPage.Shapes

' If the Shape is a text box...
If shp.Type = msoTextBox Or msoPlaceholder Then
If shp.HasTextFrame Then

' ...then change the language to US English.
' NOTE: To change the language ID to another language,
' change the msoLanguageID value here to a
' different language.
shp.TextFrame.TextRange.LanguageID = msoLanguageIDEnglishUS

End If
End If
Next
' END OF ADDITION

Next

End Sub
Click to expand...
[/QUOTE]

--
Steve Rindsberg, PPT MVP
PPT FAQ: www.pptfaq.com
PPTools: www.pptools.com
================================================
Featured Presenter, PowerPoint Live 2004
October 10-13, San Diego, CA www.PowerPointLive.com
================================================
 
Back
Top