Résultats pour "word"

469 résultats pour cette recherche

Bonjour,

Le but est la création d'un fichier Word à partir d'autres fichiers Word et d'un tableur Excel.

En entrée j'ai :

  • Un word basique qui servira de support au document final (avec une page de garde et des styles de titre)
  • Plusieurs petits words (article 1, article 2, article 3...)
  • Un Excel qui regroupe :
    Les chemins d'accès aux plusieurs petits words en Feuil1
  • Des informations de base (Titre du document final, logo, adresse, date...) en Feuil2
  • Le sommaire du document final en Feuil3

En sortie je souhaite obtenir :

Un fichier word (le document final) construit sur la base du word support, qui suit le sommaire (en Feuil3 de l'excel) et qui intègre les petits words dans les parties qui leurs sont allouées.

Grosso modo je souhaite mettre en page toutes les informations que j'ai séparément pour que ça ne fasse qu'un seul document cohérent.

Je débute sous VBA mais j'ai envie d'apprendre donc let's go ! Merci pour l'aide que vous pourrez m'apporter.

Slash

1article-1.docx (13.14 Ko)
1article-2.docx (14.77 Ko)
0article-3.docx (20.17 Ko)
2classeur1.xlsx (10.79 Ko)
1doc1.docx (42.67 Ko)

Bonjour à tous,

Nouveau sur ce site, il est possible que ce sujet ait déjà été traité et je m'excuse si il y a redondance du coup.

Je cherche à simplifier et automatiser la rédaction d'un compte-rendu hebdomadaire sous word qui viendra puiser ses données dans un tableau excel faisant office de journal de bord ou de main courante électronique.

Certaines semaines il peut n'y avoir aucun événement, d'autres semaines de multiples événements, c'est le numéro de semaine qui permet de lister ces données.

En fichiers joints la main courante excel et le compte-rendu word

Merci d'avance pour votre support et vos propositions de solutions

2cr-hebdo.xlsx (156.85 Ko)
1cr-hebdo.zip (12.37 Ko)

Bonjour,J'ai developpé il y a quelques temps une application vba sur excel qui permet d'ouvrir des documents word, de les completer automatiquement et de les enregistrer en pdf. Une dixaine de personnes l'utilise et le tracage est effectué sur ce même fichier excel.

Initialement, nous etions tous sur Office 2010 mais nous passons progressivement sur Office 2016. Vous voyez le probleme arriver, un jour une personne a utilisé l'application sous office 2016, la référence "Word Application 14" a été remplacée automatiquement par la référence "Word Application 16" et depuis on ne peut plus utiliser le fichier sous Office 2010 sans modifier manuellement la référence car la référence "Word Application 16" n'est pas reconnu par Office 2010.J'ai essayé la solution ici : https://forum.excel-pratique.com/viewtopic.php?t=129117

Mais ca ne marche pas car j'ai besoin des références pour faire fonctionner mon application.

Une solution pour cette période transitoire ? Est-ce possible d'automatiser la selection d'une référence via macro ? Du genre, si l'application detecte qu'on utilise Office 2010, elle decoche la référence "Word Application 16" si elle existe et coche "Word Application 14".

Merci d'avance !

Lucas

Bonjour,

J'ai un fichier Excel avec plusieurs tableaux différents. Pour l'instant je copie-colle avec liaison chaque tableau dans le Word en sélectionnant seulement ceux qui dont le total est supérieur à 0.

J'aimerais automatiser cette étape en disant à Excel de copier-coller avec liaison seulement les tableaux dont le montant égale 0 dans une partie de Word prédéfinie. Ou alors, à l'aide d'un bouton à coté de chaque tableau et du coup c'est l'utilisateur qui définit s'il veut ce tableau ou pas dans le Word.

De plus, j'aimerais que les colonnes des tableaux soient toutes d'une taille prédéfinie (pas égale). Par exemple, que la colonne 1 mesure 5cm, la colonne mesure 2cm, la colonne 3 mesure 1cm.

J'espère avoir été assez claire dans mon explication.

Merci d'avance pour vos réponses.

Bonjour à tous,

Je débute et bricole en vba (mal d'ailleurs) et j'ai un besoin :

Je souhaite injecter des informations contenues dans des cellules excel vers une trame word (ST).

La trame word est préparée avec des signets. (1 signet = une information à renseigner depuis excel)

J'ai besoin depuis excel, de sélectionner une ou plusieurs lignes et injecter les données dans la trame .

1 ligne excel concerne 1 référence pièce et donc 1 seul fichier word à générer au final.

Chaque fichier word devra porter le nom de la cellule "RAS"

Quelqu'un serait en mesure de m'aider ?

Merci d'avance

3st.docx (16.27 Ko)
3inject-do.xlsm (16.19 Ko)

Bonjour

Existe t'il un moyen de renommer une série de fichier (+ de 200)?

ex:

A-2019-03-12-BlaBlaBla-Dupont Tintin-Haddock Milou

en

A-2019-03-12-Dupont Tintin-Haddock Milou

En fait effectuer juste la suppression de Blablabla dans tous les fichiers

Merci

Bonjour,

Je cherche à exporter mon graphique excel sur mon fichier word à l'emplacement souhaité. Pour le moment ma formule me permet bien de transférer mon graphique sur mon fichier word mais il se met n'importe où et pas au niveau de mon signet (qui se nomme "Signet01").

Sub graph()

Dim EmpDoc

'récupère l'emplacement et le nom de fichier dans la variable EmpDoc

EmpDoc = Sheets("Parametreseditions").Range("B1").Value & "\" & Sheets("Parametreseditions").Range("B2")

MsgBox (EmpDoc)

'ouvre le document word

Set WordApp = CreateObject("word.Application")

WordApp.Visible = True

Set WordDoc = WordApp.Documents.Open(EmpDoc)

Sheets("Graphiques").Activate

ActiveSheet.ChartObjects("Graphique 4").Copy

WordDoc.Range.PasteAndFormat (13)

End Sub

Voici ma formule pour le moment. Merci d'avance pour votre aide:)

Bonjour à tous,

J'espère que vous vous portez bien.

Je souhaiterais effectuer des calculs / formules automatiques simples sur un document Word.

Il s'agit des calculs de base d'une facture :

PU HT

TVA

TOTAL HT

TOTAL TTC

La contrainte est que je souhaite conserver la mise en page de la facture, exactement comme dans l'exemple en pièce jointe.

(A la base j'avais essayé d'exporter le document word en excel mais toute la mise en page a sauté)

Je souhaite simplement indiquer les valeurs numériques surlignées en vert (quantité et PU TTC) pour que les valeurs surlignées en jaune se calculent automatiquement.

Est-ce que cela est possible avec word ?

Vous trouverez le modèle de facture que je souhaite utiliser en pièce jointe.

Merci d'avance pour vos réponse et pour votre aide.

Bien à vous

8test-facture.docx (26.42 Ko)

Bonjour à tous,

Je souhaite ouvrir un document word dont le titre varie en fonction d'une précédente recherche, s'affichant dans la case C16 d'une des feuilles de mon classeur nommée "Recherche".

Pour le moment, j'utilise la macro suivante qui me permet d'ouvrir un document word quand j'entre son nom, mais je n'arrive pas à la modifier pour que le nom change automatiquement:

Sub Resultat()

' Envoie l'utilisateur sur les resultats de la recherche

Dim WordApp As Object

Dim WordDoc As Object

Dim titre As String

titre = "chemindudocument" & File01 & "01111.docx"

Set WordApp = CreateObject("Word.Application")

Set WordDoc = WordApp.Documents.Open(titre)

WordApp.Visible = True

'...

Set WordDoc = Nothing

Set WordApp = Nothing

Sheets("Synthese").Select

End Sub

Auriez vous des idées pour résoudre ce problème?

Merci d'avance pour vos réponses!!

Bonjour

J'aimerais un Code vba pour insérer un tableau qui n'est pas fixe (change en fonction des lignes) dans word

ci joint esquisse

1classeur1.xlsx (9.08 Ko)

Bonjour

J'aimerai un Code VBA pour insérer des tableaux d'excel dans word par un bouton

Merci

Bonjour,

Je suis novice sur VBA et je souhaite trouver une écriture permettant de remplacer les signets d'un document word par n'importe quelle information de mon fichier excel, tout en sachant qu'il fait plusieurs pages. Ma question est la suivante, comment aller chercher une donnée dans une page précise? Tout en sachant qu'il pourra s'agir d'un graphique.

Sub ouvrir()

Dim EmpDoc

'récupère l'emplacement et le nom de fichier dans la variable EmpDoc

EmpDoc = Sheets("Parametreseditions").Range("B1").Value & "\" & Sheets("Parametreseditions").Range("B2")

MsgBox (EmpDoc)

'ouvre le document word

Set wordapp = CreateObject("word.Application")

wordapp.Visible = True

wordapp.Documents.Open EmpDoc

' libérer la mémoire

Set objWord = Nothing

End Sub

Voici la manière dont je souhaite ouvrir le document word, cette formule fonctionne. Mais je n'arrive pas à l'adapter pour remplacer mes signets par une donnée d'une page précise.

Merci d'avance pour votre aide

Bonjour,

Je vous ai déjà sollicités et vous m'avez été d'un grand secours

J'ai conçu un outil de recherche de documents qui pourra être utilisé par plusieurs de mes collègues.

Pour éviter que des courriers vierges ne le soient plus ... j'ai enregistré mes courriers en modèles Word

Super... mais mon formulaire est incapable de les ouvrir... Que faire ???

Pourriez-vous m'aider SVP ???

Merci d'avance

Emmanuelle

Bonjour à toutes et tous,

J'ai un fichier WORD 2013 dans lequel j'ai copié avec Lien des parties de tableaux Excel 2013.

Ces parties sont définies par des plages nommées. L'intégration se passe bien sauf pour quelques tableaux , pourtant je procède toujours de la même manière :

Fichier Source Elément

C:\..\Synth.. Existant!LIS_EXIS

C:\..\Synth.. Etat!LIS_ETAT

C:\..\Synth.. CONFORMITE!L2C5

le troisième tableau, issu d'un même fichier sort en L2C5 au lieu de la plage nommée LIS_CONFOR. Et je n'arrive pas à modifier cela.

Avez-vous une idée d'où cela peut provenir ? Ou à défaut comment modifier la liaison et remplacer L2C5 par la plage nommée ?

Merci par avance !

Eric

Bonjour à tout le monde,

Je voudrai pourvoir exporter des colonnes d'un tableau excel et les mettre dans un tableau word.

En sachant que le tableau word est sur plusieurs pages.

Les deux tableaux ont le même nombre de colonnes mais pas le même nombre de lignes.

J'ai essayé plusieurs macro mais sans de solution qui fonctionne.

Est il possible de réaliser cette fonction?

Je mets ci joint les deux documents.

Merci D'avance.

Cordialement.

3ct.xlsx (65.63 Ko)
21.zip (20.88 Ko)

Bonjour à toutes et tous,

Je dois générer un document Word réalisé à partir de données piochées dans Excel.

Je ne souhaite pas faire de publipostage, je pilote tout depuis Excel.

Avec un publipostage, on peut facilement utiliser une règle si ... alors ... sinon et ajouter des accords où bon nous semble.

Avec l'utilisation de VBA et des signets, le souci c'est que les signets sont détruits au moment du remplissage et on ne peut donc pas utiliser leur valeur pour créer une règle.

Comment faites-vous de votre côté ? Je tourne en rond, ne trouve rien de probant sur le net, je n'en peux pluuuuuuus

Par avance merci à ceux qui prendront la peine de me répondre.

Bonjour,

J'ai besoin de mettre en place un système de rédaction de texte avec compteur de lettres, de mots, de mots dans des paragraphes.

Il faut que cette solution puisse intégrer un correcteur d’orthographe à la saisie.

J'ai plusieurs choses, mais aucunes ne convient.

1- Word seul ne compte que les mots du document. Pas suffisant. Il me faut le nombre de caractères en plus. Et par paragraphe. Et ce avec comptage à la saisie en live. Et visu sans aller fouiller dans un menu. Mais directement sur le document.

2- Word avec un objet Excel intégré avec des formules de calculs.

a- Calcul du nb de caractères, mots, etc ok. Mais l'accès à l'objet nécessite un double clic (un peu long)

b- Le correcteur d'orthographe Word ne prend pas la main sur l'objet Excel.

3- Excel seul intègre un correcteur mais qui n'a rien à voir avec celui de Word. J'ai besoin que les mots soient soulignés en rouge comme dans Word.

Un exemple en pièce jointe dans une feuille Excel pour matérialiser mon besoin.

Ce sont les deux pistes que j'avais. Si vous avez d'autres idées je prends aussi

Merci de votre aide.

5redac.xlsx (9.99 Ko)

Bonjour ,

J'ai un ficher excel comportant x tableaux (x allant de 1 à 5). Je cherche à les exporter vers un document word via une boucle.

Quand je lance la boucle "1 To 1" cela fonctionne, sinon bug.

Auriez-vous une solution ?

Merci.

2aoper2.zip (11.13 Ko)
3aoper.xlsm (27.52 Ko)

Bonjour,

J'ai des données sur ma feuille excel, je souhaiterai que celles-ci se mettent en forme de tableau dans un document Word trié par mois.

Auriez-vous une idée ?

Merci

excel word
3tableau.xlsx (9.88 Ko)
2etat.zip (12.92 Ko)

Bonjour,

J'ai créé un document Word qui me sert de modèle, et j'ai créé une macro excel pour le remplir en fonction des données de mes tableaux.

J'arrive très bien à inscrire dans mon document word les données de mon tableau à l'aide des signets, mais j'aimerais désormais cocher des cases à cocher dans mon document word en fonction du texte contenu dans certaines cellules.

Typiquement "Si "telle cellule" contient "blabla" alors cocher telle case à cocher.

J'ai essayé plusieurs choses mais rien ne marche :

1er essai :

If InStr(Cells(AN, ligne), "Oui") > 0 Then

wDoc.CheckBox1 = True

End If

2ème essai :

Dim grue As String

grue = "AN" & ligne

If UCase(Range(grue)) = "oui" Then

wDoc.Bookmarks("case_echafaudage") = True 'j'ai mis un signet sur la case à cocher "echafaudage"

End If

Je pense qu'avec la deuxième solution la partie "test du texte de la cellule" est bon mais je n'arrive pas à faire cocher une case...

En résumé (et pardon pour le pavé)....Comment appeler une case à cocher d'un document Word dans une macro Excel?

MERCI!!!! =D

Recherches récentes

exporter calendrierregrouper fichiersrechercheh inverseeexporter grapheexporter wordrechercherword automatiquepaieagedonnees word chiuxdonnees word choixutiliser base donnees remplir document wordchevauxcombobox compteurredondance formulecriteriavide criteriavideenvoie mailcsv accent