Export liste colonne Excel vers Word
Résolu
criscrof
Messages postés
66
Date d'inscription
Statut
Membre
Dernière intervention
-
criscrof Messages postés 66 Date d'inscription Statut Membre Dernière intervention -
criscrof Messages postés 66 Date d'inscription Statut Membre Dernière intervention -
A voir également:
- Export liste colonne Excel vers Word
- Liste déroulante excel - Guide
- Déplacer colonne excel - Guide
- Word et excel gratuit - Guide
- Trier colonne excel - Guide
- Word 2013 - Télécharger - Traitement de texte
3 réponses
yg_be
Messages postés
23541
Date d'inscription
Statut
Contributeur
Dernière intervention
Ambassadeur
1 584
bonjour, pour ton second soucis, je pense qu'il faut retirer les commentaires de save et close.
pour ton premier soucis, les doublons se suivent-ils toujours?
pour ton premier soucis, les doublons se suivent-ils toujours?
Bonjour,
voir ceci et lire le 1er commentaire
https://excel.developpez.com/faq/?page=Word#LireChampWord
voir ceci et lire le 1er commentaire
https://excel.developpez.com/faq/?page=Word#LireChampWord
yg_be
Messages postés
23541
Date d'inscription
Statut
Contributeur
Dernière intervention
Ambassadeur
1 584
petite amélioration:
Option Explicit Public Sub Eport_DLT() Dim WordApp As Word.Application Dim WordDoc As Word.Document Dim ancien As String, nouveau As String, vale As String Dim lig1 As Long Dim sh As Worksheet Set sh = ThisWorkbook.Sheets("2018") ancien = "" For lig1 = 6 To sh.UsedRange.Rows(sh.UsedRange.Rows.Count).row nouveau = sh.Cells(lig1, 33).Text If nouveau <> "" And nouveau <> ancien Then If vale = "" Then vale = nouveau Else vale = vale & Chr(10) & nouveau End If ancien = nouveau End If Next lig1 Set WordApp = New Word.Application Set WordDoc = WordApp.Documents.Open("Mon doc word") WordApp.Visible = True WordDoc.Bookmarks("DLT").Range.Text = vale WordDoc.Save WordDoc.Close Set WordDoc = Nothing Set WordApp = Nothing End Sub
Bonjour,
Merci pour tout, mais le souci reste le même. Le code s'arrete à la première ligne
Dim WordApp As Word.Application
et ouvre la fenetre : Erreur de compilation : type défini par l'utilisateur non défini.
Je ne suis pas très câlé en VBA.
La première macro est liée à un bouton, qui se trouve sur ma feuille "Tableau de Bord" et qui me permet d'ourvrir Word et exporter les données, jusque là pas de souci.
La deuxième macro doit récupérer les données d'une autre feuille "2018" (même classeur) et doit les exporter dans le même doc word et en même temps que la première.
Je dois bien la déclarer dans un module, et normalement cela devrait fonctionner avec le même bouton ?
Merci encore pour vos conseils et aides.
Merci pour tout, mais le souci reste le même. Le code s'arrete à la première ligne
Dim WordApp As Word.Application
et ouvre la fenetre : Erreur de compilation : type défini par l'utilisateur non défini.
Je ne suis pas très câlé en VBA.
La première macro est liée à un bouton, qui se trouve sur ma feuille "Tableau de Bord" et qui me permet d'ourvrir Word et exporter les données, jusque là pas de souci.
La deuxième macro doit récupérer les données d'une autre feuille "2018" (même classeur) et doit les exporter dans le même doc word et en même temps que la première.
Je dois bien la déclarer dans un module, et normalement cela devrait fonctionner avec le même bouton ?
Merci encore pour vos conseils et aides.
Si il ne lit pas les réponses qui lui sont faites, il ne risque pas d'y arriver!
https://forums.commentcamarche.net/forum/affich-35288167-export-liste-colonne-excel-vers-word#7
https://forums.commentcamarche.net/forum/affich-35288167-export-liste-colonne-excel-vers-word#7
Bonjour,
Je me rends compte que je n'avais pas dit un "grand merci beaucoup" à toutes vos réponses et conseilles... Désolé pour ce "raté" ! je reviens vers vous car j'aimerais faire une petite modif (un petit plus) dans le code ci-dessus. Je cherche à insérer la suppression des doublons de la colonne (AG ou 33), afin qu'il ne m'exporte pas toute les données dans le fichier Word. Est-ce possible sans réécrire l'ensemble du code ? Ce n'est peut-être pas sorcié, mais je n'y arrive pas.
Merci par avance !
Je me rends compte que je n'avais pas dit un "grand merci beaucoup" à toutes vos réponses et conseilles... Désolé pour ce "raté" ! je reviens vers vous car j'aimerais faire une petite modif (un petit plus) dans le code ci-dessus. Je cherche à insérer la suppression des doublons de la colonne (AG ou 33), afin qu'il ne m'exporte pas toute les données dans le fichier Word. Est-ce possible sans réécrire l'ensemble du code ? Ce n'est peut-être pas sorcié, mais je n'y arrive pas.
Merci par avance !
Désolé de rpondre tardivement, je viens de tester chez moi. mais sous excel 2013... j'ai la version 2010 au boulot.
Le code s'arrete à la première ligne
Dim WordApp As Word.Application
et ouvre la fenetre : Erreur de compilation : type défini par l'utilisateur non défini.