p
u
b
l
i
c
i
t
é
publicité

Discussion: VB Excel vers Word

  1. #1
    Invité de passage
    Homme Profil pro
    Consultant fonctionnel
    Inscrit en
    mai 2012
    Messages
    4
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations professionnelles :
    Activité : Consultant fonctionnel
    Secteur : Enseignement

    Informations forums :
    Inscription : mai 2012
    Messages : 4
    Points : 0
    Points
    0

    Par défaut VB Excel vers Word

    Bonjour, j'ai un long tableau créé avec Excel que j'ai copié dans un fichier Word en VB. Jusque là pas de problème. Ce long tableau a des lignes vides (cellules sans bordures, couleur et contenu). JE souhaite remplacer ces lignes vides pas des sauts de pages dans Word. Merci de m'aider.

  2. #2
    Rédacteur/Modérateur
    Avatar de jpcheck
    Homme Profil pro
    Consultant technique et formateur freelance
    Inscrit en
    juillet 2007
    Messages
    9 422
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 31
    Localisation : France, Paris (Île de France)

    Informations professionnelles :
    Activité : Consultant technique et formateur freelance
    Secteur : Finance

    Informations forums :
    Inscription : juillet 2007
    Messages : 9 422
    Points : 18 831
    Points
    18 831

    Par défaut

    Salut,

    j'ai un peu de mal à visualiser ton rendu final

    Autant s'il s'agit d'un tableau avec un seule colonne je veux bien, mais quid d'un tableau avec plusieurs colonnes ?

  3. #3
    Invité de passage
    Homme Profil pro
    Consultant fonctionnel
    Inscrit en
    mai 2012
    Messages
    4
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations professionnelles :
    Activité : Consultant fonctionnel
    Secteur : Enseignement

    Informations forums :
    Inscription : mai 2012
    Messages : 4
    Points : 0
    Points
    0

    Par défaut

    Citation Envoyé par jpcheck Voir le message
    Salut,

    j'ai un peu de mal à visualiser ton rendu final

    Autant s'il s'agit d'un tableau avec un seule colonne je veux bien, mais quid d'un tableau avec plusieurs colonnes ?
    _________________


    Merci pour s'être penché sur mon problème.
    En pièce jointe le fichier Excel qui génère un fichier Word.
    Comment faire pour que dans le Word les tableaux soient séparés par des sauts de page et non une ligne vide ?

    Encore merci.
    Fichiers attachés Fichiers attachés

  4. #4
    Rédacteur/Modérateur
    Avatar de jpcheck
    Homme Profil pro
    Consultant technique et formateur freelance
    Inscrit en
    juillet 2007
    Messages
    9 422
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 31
    Localisation : France, Paris (Île de France)

    Informations professionnelles :
    Activité : Consultant technique et formateur freelance
    Secteur : Finance

    Informations forums :
    Inscription : juillet 2007
    Messages : 9 422
    Points : 18 831
    Points
    18 831

    Par défaut

    Salut,

    le plus simple selon moi ca serait de passer d'un copier/coller complet à un copier/coller par bloc. Tu ajouterais apreès chaque collage un saut de page

    En plus, comme tu gères une plage codée en dur, c'est encore plus simple

  5. #5
    Invité de passage
    Homme Profil pro
    Consultant fonctionnel
    Inscrit en
    mai 2012
    Messages
    4
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations professionnelles :
    Activité : Consultant fonctionnel
    Secteur : Enseignement

    Informations forums :
    Inscription : mai 2012
    Messages : 4
    Points : 0
    Points
    0

    Par défaut conversion fichier excel vers word en VBA

    Citation Envoyé par jpcheck Voir le message
    Salut,

    le plus simple selon moi ca serait de passer d'un copier/coller complet à un copier/coller par bloc. Tu ajouterais apreès chaque collage un saut de page

    En plus, comme tu gères une plage codée en dur, c'est encore plus simple

    Merci pour ta réponse.
    Je ne comprends pas comment je peux séparer chaque tableau vu que je copie l'ensemble en VBA.
    Je suppose qu'il me manque le code pour transformer la ligne vide Excel en saut de page Word ?
    Merci de ton aide.

  6. #6
    Rédacteur/Modérateur
    Avatar de jpcheck
    Homme Profil pro
    Consultant technique et formateur freelance
    Inscrit en
    juillet 2007
    Messages
    9 422
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 31
    Localisation : France, Paris (Île de France)

    Informations professionnelles :
    Activité : Consultant technique et formateur freelance
    Secteur : Finance

    Informations forums :
    Inscription : juillet 2007
    Messages : 9 422
    Points : 18 831
    Points
    18 831

    Par défaut

    Salut,

    au lieu de
    - copier 1 fois tes n tableaux d'un coup, tu va faire
    - copier chaque tableau + ajout d'un saut de page dans ta feuille word

    Pour l'ajout de saut de page, tu peux utiliser l'enregistreur de macro

  7. #7
    Invité de passage
    Homme Profil pro
    Consultant fonctionnel
    Inscrit en
    mai 2012
    Messages
    4
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations professionnelles :
    Activité : Consultant fonctionnel
    Secteur : Enseignement

    Informations forums :
    Inscription : mai 2012
    Messages : 4
    Points : 0
    Points
    0

    Par défaut

    Citation Envoyé par jpcheck Voir le message
    Salut,

    au lieu de
    - copier 1 fois tes n tableaux d'un coup, tu va faire
    - copier chaque tableau + ajout d'un saut de page dans ta feuille word

    Pour l'ajout de saut de page, tu peux utiliser l'enregistreur de macro
    Bonjour,

    Je suis désolé mais j'ai du mal.
    Dans mon code qui copie le tableau Excel vers un fichier Word :


    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
    16
    17
    18
    19
    20
    Sub page_portrait_Word()
    Set wa = CreateObject("word.application")
    ' creation de la page word et plage de cellules à copier
    With wa
        .Visible = True
        .documents.Add
        Range("A2:D37").Copy
        .Selection.Paste
        .WordBasic.TogglePortrait Tab:=3
    End With
    ' notification des marges
    With wa.ActiveDocument.PageSetup
    .TopMargin = wa.CentimetersToPoints(0.5)
    .BottomMargin = wa.CentimetersToPoints(0.5)
    .LeftMargin = wa.CentimetersToPoints(0.5)
    .RightMargin = wa.CentimetersToPoints(0.5)
    End With
     
    Application.CutCopyMode = False
    End Sub
    Il faut que j'insère dans les pages Word un saut de page quand il y a une ligne vide : ici lignes 2, 8, 14, 20, 26, 32, 38

    Quel code faut-il et comment le placer dans celui existant ?

    Mille fois merci.

Discussions similaires

  1. problème copie Tableau de Excel vers Word
    Par el_titou007 dans le forum VBA Word
    Réponses: 2
    Dernier message: 02/04/2007, 09h42
  2. Réponses: 2
    Dernier message: 12/02/2007, 13h39
  3. [VBA-Word] Exportation Excel vers Word
    Par le_sonic dans le forum VBA Word
    Réponses: 6
    Dernier message: 20/12/2006, 17h18
  4. [VBA-A]Copier des données d'Excel vers Word
    Par soad029 dans le forum VBA Word
    Réponses: 15
    Dernier message: 16/03/2006, 11h56
  5. [VBA-E]Copie graphique de excel vers word
    Par conconbrr dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 21/02/2006, 10h49

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo