Eric KERGRESSE
Expert éminent sénior

-
Ce billet est issu de cette discussion : Insertion-pdf-complet-entre-2-feuilles-calcul-excel

La solution proposée consiste à éditer en .pdf les différents documents dans un répertoire dédié et d'utiliser la Dll PDFCREATOR_COM (version gratuite) pour assembler le tout dans un seul .pdf. Ce code avait été récupéré sur Internet et avait servi à assembler des résultats de mesures d'environ une cinquantaine de fichiers pouvant faire plusieurs pages chacun.

• Le

En lire plus...

'
Discussion d'origine : Changement-couleur-cellule-fonction-menu-deroulant

Il s'agit de mettre un fond de cellule de la même couleur que la couleur de fond d'un contrôle ContentControl dont la couleur change en fonction du contenu avec l'événement Document_ContentControlOnExit. Le principe est d'indexer les ContentControls à l'ouverture du document et de charger une matrice pour établir la correspondance entre la cellule et l'index du contrôle.

En lire plus...

-



Dans un module standard :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Option Explicit

' La DLL Excel doit être cochée

Public ListeCle As Variant, ListeElement As Variant

Sub ChargerLaCombobox1()

Dim J As Long, DerniereLigne As Long
Dim Chemin As String

Dim xlApp As Excel.Application 'Application Excel pour ouvrir un fichier XLS
Dim xlWb As Excel.Workbook     'Classeur Excel
Dim xlWs As Excel.Worksheet

En lire plus...

-
Le code ci-dessous est issu de cette discussion Index-word-modification-mise-page-ajout-donnees, où l'interlocuteur cherche à identifier la page du document pour chacune des entrées d'une base de données à partir de la collection d'index de son document. Le code ne traite que du remplissage de la matrice.

Code :

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

1
2
3
4
5
Sub RepererLesIndex()

Dim I As Long, J As Long, IndexMatrice As Long
Dim Contenu As String, ContenuNom As String, ContenuPrenoms As String,

En lire plus...

.
Ce billet est issu de cette discussion : Formule-utilisant-nbr-fixe-signet-cellule-tableau-excel-insere-word-resultat

J'ai regardé avec VBA comment on pouvait récupérer une valeur d'un tableau Excel incorporé dans Word.

Le code ci-dessous permet de mettre à jour un signet PourcentageAcompte calculé à partir de la valeur de l'acompte correspondant au signet Acompte et du montant TTC correspondant à la zone nommée "TotalTtc" du tableau.

En lire plus...