• Comment faire pour qu'une macro démarre toute seule ?

  • Comment générer du faux texte ?

  • PowerPoint et les fichiers MP3

  • Comment créer un bouton qui envoie le fichier en cours ?

  • A quoi sert l'ancre qui s'affiche quelquefois dans la marge gauche ?

  • Bonjour les Quickparts, adieu les Insertions Auto !

  • L'espace fine existe-t-elle dans Word ?

  • Comment attacher un modèle à un document ?

  • Comment insérer une image en fond de page?

  • Accentuer les majuscules

  • Mon clavier perso ou comment personnaliser son clavier

 
 

 

Vous l’avez remarqué, dans PowerPoint 2007, cette option a disparu des menus de formatage. Notez qu'elle a réapparu dans PowerPoint 2010.

Néanmoins, voici deux solutions :

  • Créez votre forme tramée dans Word (format de la forme automatique, effets de remplissage, motifs), copiez-la et collez-la dans PowerPoint. Cela fonctionne bien et vous pourrez même en faire des copier-coller dans PowerPoint, pour modifier ensuite la forme tout en gardant la trame
  • L’autre solution consiste à utiliser VBA. En effet si le tramage paraît supprimé de PowerPoint 2007, il existe toujours puisqu’on peut le créer par programmation !


Ainsi, voici un exemple de macro qui remplira les formes automatiques rectangulaires d’une trame diagonale claire et les formes automatiques elliptiques d’une trame grille de points :

Sub remplissage_trame()
'macro écrite par m@rina
Dim mapresentation As Object
Dim diapo As Object, forme As Object
Set mapresentation = ActivePresentation.Slides
For Each diapo In mapresentation
For Each forme In diapo.Shapes
If forme.AutoShapeType = msoShapeOval Then 'si les formes sont des ovales
forme.Fill.Patterned Pattern:=msoPatternDottedGrid 'remplissage d'une trame grille de points
End If
If forme.AutoShapeType = msoShapeRectangle Then 'si les formes sont des rectangles
'remplissage avec une trame diagonale claire
forme.Fill.Patterned Pattern:=msoPatternLightDownwardDiagonal
End If
Next forme
Next diapo
End Sub 

 

Nouveau sondage !

Les forums - Outlook ?

 
 
 

Statistiques

2861129
Aujourd'hui1801
Hier2042
Cette semaine3843
Ce mois-ci12015
Depuis janvier 20042861129
Compteur d'affichages des articles
5538714

A lire de toute urgence...

Qui est en ligne ?

Nous avons 38 invités et aucun membre en ligne