Eric KERGRESSE
Expert éminent

//
Problématique :

Je veux savoir comment ouvrir en VBA un fichier en mode **écriture** lorsqu’il y a l’option « Lecture seule recommandée » dessus.
Je ne parle pas ici de l'attribut que l'on peut changer à partir d'Explorer mais de l'attribut ActiveDocument.ReadOnly (combiné avec ActiveDocument.ReadOnlyRecommended).
Avec un batch, j'ai besoin de faire un "search & replace" régulièrement dans une centaine de fichiers dont la moitié est en mode

En lire plus...

//
Ce billet fait suite à cette discussion : publipostage-filtrer-enregistrements

Il s'agit de faire un publipostage à partir d'un tableau Excel en fonction d'un champ nommé "POSITION". Ce champ peut contenir de 1 à 160 numéros différents. Le but est de pouvoir sélectionner la ou les positions en cours dans le tableau et d'éditer la liste en fonction de la position choisie.
A l'ouverture, le code recherche les différentes positions du document, les charge dans

En lire plus...

//
Ce billet fait suite à cette discussion : automatisation-renommer-fichiers-champs-doc-donnee-unique

Le code dans le fichier "Fichiers renommer 2018-10-21.docm" joint, charge, dans une boite de dialogue, les fichiers présents dans un répertoire des modèles (Nb : La variable contenant le chemin du répertoire est une constante).

En allant chercher le répertoire de destination avec le bouton "..." et après avoir saisi un nom de substitution

En lire plus...

Utilisation

Cet outil permet de surligner plusieurs chaines de caractères dans un document Word. Une sélection des couleurs système permet de différencier le surlignage des chaînes sélectionnées.
La sélection des chaines se fait directement sur le document



Les commandes de la barre d'accès rapide :

A l'ouverture du document support, la barre d'accès rapide est chargée de 4 boutons :

En lire plus...

Testé sur Office 2010 :

Dans un module standard :

Code vba :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
Option Explicit
 
Sub InfoSelection_De_Dolphy35()
'----------------------------------------------------
' Une adaptation du code trouvé dans :
' http://dolphy35.developpez.com/article/outlook/vba/
'----------------------------------------------------
 
'Déclaration des Objets et variables
Dim MonApply As Outlook.Application
Dim MonNSpace As Outlook.Namespace

En lire plus...