[Powerpoint 2003]taal powerpoint presentatie in 1x wijzigen?

Pagina: 1
Acties:

  • jaspov
  • Registratie: Januari 2000
  • Laatst online: 02-07 19:39
Ik heb een powerpoint presentatie waarin verschillende tekstvakken met verschillende talen staan. Die moeten allemaan naar NL toe. Nu kan ik per tekstvak de taal instellen, maar als ik met ctrl-a alle slides selecteer en dan de taal aanpas, gebeurt er niets. Ik heb weinig zin om alle slides en slide-elementen één voor één op NL te zetten, dat moet handiger kunnen.

Ik ben bekend met instellingen voor default taal (zag ik andere topics over), maar hier gaat het er dus om om eenmalig van alle slides de taal op NL te zetten.

  • F_J_K
  • Registratie: Juni 2001
  • Niet online

F_J_K

Moderator CSA/PB/AI

Front verplichte underscores

VBA: objShape.TextFrame.TextRange.LanguageID = msoLanguageIDDutch

Of je dan alle objecten hebt weet ik niet zeker, maar dat is natuurlijk uit te zoeken :)

'Multiple exclamation marks,' he went on, shaking his head, 'are a sure sign of a diseased mind' (Terry Pratchett, Eric)


  • jaspov
  • Registratie: Januari 2000
  • Laatst online: 02-07 19:39
Thanks! Ik wil dit graag proberen, maar waar vul ik dit in? Dit is geen menuoptie, is dit een macro?

  • Puch-Maxi
  • Registratie: December 2003
  • Laatst online: 25-07 23:59
Het betreft een VBA code.. Visual Basic for Applications

My favorite programming language is solder.


  • F_J_K
  • Registratie: Juni 2001
  • Niet online

F_J_K

Moderator CSA/PB/AI

Front verplichte underscores

Dit is inderdaad een klein stukje van een VBA-script.
Pseudocode:
code:
1
2
3
4
5
for each sl in ActivePresentation.Slides
 for each objShape in sl.Shapes
    IF objShape.Type = ([i]??ik weet niet welke, check F1[/] then objShape.TextFrame. (etc)
  next
next


Maar als je VBA niet eens herkend wil je er waarschijnlijk nog niet aan beginnen.

'Multiple exclamation marks,' he went on, shaking his head, 'are a sure sign of a diseased mind' (Terry Pratchett, Eric)