Voir le flux RSS

Eric KERGRESSE

  1. Word - Récupérer les informations relatives aux index dans une matrice

    par , 28/11/2019 à 06h01
    -
    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,
    ...
    Catégories
    Sans catégorie
    Miniatures attachées Fichiers attachés
  2. Récupérer la valeur d'une cellule d'un tableau Excel inséré dans word.

    par , 03/09/2019 à 08h02
    .
    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.

    ...
    Miniatures attachées Fichiers attachés
  3. VBA Word : Insérer une puce automatiquement à chaque saut de ligne dans un contrôle de contenu texte enrichi.

    par , 15/03/2019 à 06h03
    /
    Il s'agit d'obtenir le résultat suivant :

    Nom : Capture.JPG
Affichages : 1398
Taille : 15,3 Ko

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    Sub TestMettreUnePuceApresRetourChariot()
     
    Dim I As Integer
    Dim DocEnCours As Document
     
        Set DocEnCours = ActiveDocument
        With DocEnCours
     
             If .ContentControls.Count = 0 Then Exit Sub
     
             For I = 1 To .ContentControls.Count
                 If .ContentControls(I).Type = wdContentControlRichText
    ...
  4. [Actualité] Word : Ouvrir en écriture un fichier "Lecture seule recommandée"

    par , 10/11/2018 à 15h11
    //
    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 ...

    Mis à jour 10/11/2018 à 16h27 par Eric KERGRESSE

    Catégories
    Programmation
  5. WORD : Publipostage avec filtrage des enregistrements.

    par , 22/10/2018 à 07h48
    //
    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 ...

    Mis à jour 10/11/2018 à 15h16 par Eric KERGRESSE

    Catégories
    Programmation
    Miniatures attachées Fichiers attachés
Page 1 sur 6 12345 ... DernièreDernière