• Comment générer du faux texte ?

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

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

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

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

  • PowerPoint et les fichiers MP3

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

  • Comment attacher un modèle à un document ?

  • Mon clavier perso ou comment personnaliser son clavier

  • Bonjour les Quickparts, adieu les Insertions Auto !

  • Accentuer les majuscules

 
 

Avec une macro :

 

Public Sub test()
'macro écrite par Guy Moncomble
Dim OldShape As Shape
NewType = msoShapeRectangle
For Each OldShape In ActiveDocument.Shapes
OldShape.Select
If OldShape.Type = msoShapeRectangle Then
OldShape.AutoShapeType = msoShapeRoundedRectangle
End If
Next OldShape
End Sub



 

Nouveau sondage !

Les forums - Outlook ?

 
 
 

Statistiques

2861183
Aujourd'hui1855
Hier2042
Cette semaine3897
Ce mois-ci12069
Depuis janvier 20042861183
Compteur d'affichages des articles
5538838

A lire de toute urgence...

Qui est en ligne ?

Nous avons 54 invités et aucun membre en ligne