Transfer tableau word vers excel transposé ???
Résolu
moogu
Messages postés
26
Statut
Membre
-
eriiic Messages postés 24581 Date d'inscription Statut Contributeur Dernière intervention -
eriiic Messages postés 24581 Date d'inscription Statut Contributeur Dernière intervention -
Bonjour,
je bosse actuellement sur excel 2011, je dispose de plusieurs tableaux sur un fichier word (où il est écrit différentes caractéristiques sur les arbres) et il y a 500 tableaux.
je souhaiterais importer tous ces tableaux pour en informer plus qu'un sur excel, avec les caractéristiques en tête et ensuite le listing des arbres. J'ai déjà essayer plusieurs méthode qui n'aboutissent pas, si quelqu'un à une idée...
pour coller ces tableaux sur excel, les transposé et avoir kk chose de cohérent ???
voilà quelques jours que je surf sur les forums sans trouver une solution.
Merci, cordialement,
je bosse actuellement sur excel 2011, je dispose de plusieurs tableaux sur un fichier word (où il est écrit différentes caractéristiques sur les arbres) et il y a 500 tableaux.
je souhaiterais importer tous ces tableaux pour en informer plus qu'un sur excel, avec les caractéristiques en tête et ensuite le listing des arbres. J'ai déjà essayer plusieurs méthode qui n'aboutissent pas, si quelqu'un à une idée...
pour coller ces tableaux sur excel, les transposé et avoir kk chose de cohérent ???
voilà quelques jours que je surf sur les forums sans trouver une solution.
Merci, cordialement,
15 réponses
-
Bonjour,
Bon, problème, il faut connaitre vba word pour ton truc, et je ne connais pas.
Je te livre ou j'en suis car rien à faire, je ne trouve pas comment faire un truc. Il te reste donc une opération manuelle.
A chaque fichier la macro va s'arrêter dans VBE :
- activer la fenêtre excel
- faire Ctrl+A Ctrl+C
- réactiver la fenêtre VBE
- faire F5 pour relancer la macro
J'ai mis une textebox d'explication, quand tu connaitras la manip tu pourras la mettre en commentaire dans le code (Alt+F11 pour visualiser le code).
J'ai dû reprendre tes en-têtes de colonne :
- ils doivent être exactement identiques au texte du fichier (faire copier-coller), majuscules et accents compris.
- ils doivent être dans le même ordre d'apparition.
Le fichier xls doit être dans le même répertoire que les fichiers doc à traiter. Pour tester commence avec 2-3 doc seulement dans le répertoire.
Un fois traités ces fichiers doivent être supprimés, sinon ils seront ajoutés à nouveau.
Désolé pour la partie manuelle, ce n'est pas faute d'avoir cherché...
https://www.cjoint.com/?BLtpnFXbojp
eric
-
Bonsoir,
c'est sûr que si tu ne donnes pas d'exemple de tes données et de ce que tu veux obtenir tu risques d'attendre longtemps une réponse adéquate...
Déposer le fichier xls (réduit au nécessaire et anonymisé) sur cjoint.com et coller ici le lien fourni.
eric
-
Voici 2 liens, un vers le doc word qui est ma base et un autre vers mon doc excel qui doit être le résultat....
word : https://www.cjoint.com/?0Lth1ZRmCfg
excel : https://www.cjoint.com/?0Lth37Eirig
merci d'avance, -
Merci bien,
je vais voir ce que je peux faire car je suis novice sur excel mais je vais essayer de trouver....
a bientot,
cordialement -
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question -
Re,
Je fais d'une autre façon.
Dans 'VBE / outils / références', il faut cocher : Microsoft Word 14.0 Object Library
Ca devrait être ok, à tester :
https://www.cjoint.com/?BLtqRnUwLsV
eric -
C'est super sympa tout ce que tu as fais, mais je ne pense pas avoir le niveau en macro pour utiliser ce que tu m'as fournis :( j'ai passé une bonne partie de la soirée à le tourner dans tous les sens, je ne comprend pas comment ça fonctionne.
J'ai cocher : Microsoft Word 14.0 Object Library
Mais je ne sais pas quoi faire ensuite j'ai essayer de taper l'emplacement de mon fichier dans le module, mais il me dis qu'il y a une erreur de compilation "séparateur de liste ou )"....
bien dommage que je n'y arrive pas c'était exactement ce que je cherchais.
Merci encore, -
Voilà ce qui apparait dans le module et je ne sais pas trop où dois je modifier pour qu'il aye chercher mon fichier ??
imprime écran : https://www.cjoint.com/?0Lui0QxbE80
Cordialement,-
Bonjour,
Le fichier excel doit être dans le répertoire de tes fichiers doc (dit au post 3), il traitera tous les fichiers du répertoire.
Créée toi un répertoire de travail avec juste 3 doc au début pour tester.
Ensuite, une fois tout débogué et selon le temps de traitement, tu pourras y mettre des paquets plus importants.
eric -
Je suis désolé mais je ne dois pas avoir le niveau pour réaliser ce genre de manip... j'ai beau mettre les deux fichiers dans le même répertoire, j'ai toujours une erreur 68 et après je ne sais pas quoi faire...
merci encore pour votre investissement !!!!
imprime écran : https://www.cjoint.com/?0LuonOXwFx8 - voilà le résultat -
Tu n'as pas à modifier quoique ce soit dans le programme.
Il se débrouille tout seul pour trouver les fichiers à traiter du moment qu'ils sont dans le même répertoire. Evite de travailler sur le bureau, crée-toi un répertoire de travail sur C: ou D:
Si tu en mets 300 il traitera les 300 sans que tu les nommes. Mais bon, fais plutôt par petits paquets selon le temps de traitement.
Repars du fichier du post 5.
eric
PS: je viens de voir que dans Diagnostic et Conclusions des lignes étaient sautées et donc les suivantes non ramenées.
Il faudra que je complète le programme mais je n'ai pas trop le temps en ce moment. Si toi tu as moyen d'éviter ces sauts de lignes intempestifs précise-le moi stp -
Voilà ce qui apparait lorsque je clique sur "ajouter les fichiers du répertoire"
imp. écran : https://www.cjoint.com/?0LuoYmmv7y9
et là je bloke ! :( -
-
-
ça ne marche toujours pas, mais il fera jour demain,
je te remercie grandement pour le temps que tu passe sur ce projet,
bonne soirée
Fabien -
Bonjour,
j'ai put faire le test du fichier sur PC et il fonctionne parfaitement, je vous remercie,
je voulais savoir si il était possible, bien que ne connaissant pas la macro, de rajouter des colonnes avec d'autres caractéristiques apparaissant dans le tableaux ??
ou cela serait trop compliqué ?
cordialement,
fabien -
Je te remercie pour les champs mais je vais me contenter de ce que tu m'as donner dans un premier temps, merci.
Je commence à utiliser ton fichier à présent, qui s'avère être très utiles :)
mais je ne comprend pas car il y a certain fichier word qui passe très bien et d'autre où excel me présente une erreur d'éxécution "9"...
je ne vois pas de quoi cela peut venir car je fais toujours la même manip comme tu m'eux la expliquer.
Je te joint le fichier qui marche et celui qui ne marche pas,
voici le fichier qui fonctionne parfaitement : http://cjoint.com/?0LBo73xKHyj
et le fichier qui me présente l'erreur : http://cjoint.com/?0LBpaXu5ral
j'utilise ton fichier excel suivant : http://cjoint.com/?0LBpcisVUHV
merci !!!!!!
cordialement,
moogu-
Bonjour
Au début de recupData() j'ai mis une constante : Const maxLigData As Long = 150
Je l'ai fixée en fonction de ton fichier exemple, c'est trop juste.
C'est le nombre de ligne maxi pour un arbre dans ton doc. Met-là à 200-300, selon ce qui te parait le plus probable.
Sur ce fichier il y a également une difficulté pour récupérer le code diagnostic. Il faudrait peut-être plutôt récupérer celui 2 lignes en-dessous du nom ou ça ne te sert pas plus que ça ?
eric
-
-
Ok, j'essaye ça au plus vite et je te tiend au courant, merki !
le code diagnostic est assez important pour le suivi, quand penses tu ?
es que c'est jouable de le faire apparaître où ça demande trop de boulot ?
cordialement,
moogu -
Bonjour,
désolé de ma réponse tardive, j'ai essayer de modifier Const maxLigData As Long = 150 et de le passer à 300 mais j'ai toujours un problème d'éxecution au niveau de la ligne conclusion,
Capture ecran : http://cjoint.com/?3LFj0PEhXyo
je ne sais pas si ça te parle ??
j'ai essayer de bidouiller un peu, mais ce n'est pas très intuitif donc c'est pas facile,
merci d'avance,
cordialement
moogu,
P.S. pour le code diagnostique je pourrais faire un copier/coller sur une colonne c'est moins laborieux que sur la totalitée du tableau ;) -
Bonjour,
Je n'ai aucun problème avec le dernier doc que tu avais fourni en mettant Const maxLigData As Long = 200.
Donner la ligne en erreur n'est pas suffisant. Il faut le message d'erreur et le fichier en cause.
J'ai modifié un peu le programme :
- récup du code diagnostic sous le nom
- limitation des hauteurs de ligne par la constante Const nbLigAff = 3 ' nombre de lignes affichées par arbre
- mise en commentaire des colonnes G:I pour consulter facilementleur contenu complet
https://www.cjoint.com/?BLFlacBh1C8
eric
Jamais tu ne répondras à un mp non sollicité...
Bon, ça c'est fait. -
Ok,
je viens d'essayer le fichier que tu m'as transmis,
joint : http://cjoint.com/?0LFlA49rkQJ
lorsque j'ajoute le répertoire suivant : http://cjoint.com/?0LFlBIfJH8D
j'obtiens le message suivant (imprime écran du dernier post) :
Erreur d'exécution "9" - l'indice n'appartient pas à la sélection
je clique sur débogage, et j'obtient la ligne
While Trim(data(lig2, 1) <> Trim(shGest.Cells(1, colDest)) en surbrillance jaune
je travaille maintenant sur windows 7 avec office 2010...
merci,
cordialement-
Re,
tu as CONCLUSION au singulier sur les deux 1ers arbres et la recherche du champ se fait sur CONCLUSIONS au pluriel, donc échec.
J'ai ajouté une détection de ce type d'erreur, et annonce en fin de traitement les champs non trouvés. Les champs suivants seront également absents puisqu'on a atteint maxLigData.
De plus je recherche maintenant si la chaine 'nom du champ' est contenue plutôt que exacte, mais avec un risque de fausses détections (minime, ça dépend si un nom de champs peut se trouver contenu au mauvais endroit en colonne A de Feuil2). Si tu as besoin d'un nouveau champ DIAG par exemple c'est mort...
Si ça se produit j'ai laissé l'ancienne ligne de code en commentaire. Il suffit d'inverser la ' au début des 2 lignes Loop Until pour réactiver la recherche exacte.
https://www.cjoint.com/?BLFq7LT8P0m
eric -
-
-
-
-
Bonjour,
en effet je n'ai pas été très clair, désolé,
du coup je me retrouve avec plusieurs dossier de fichiers comme ci-contre :
https://www.cjoint.com/?0Cvi2G7Mqjx
je dois dans un premier temps, tous les enregistrer en pdf telle quel :
exemple : https://www.cjoint.com/?0Cvi4BXdZv3
dans un deuxième temps,
- à partir de l'original, je dois modifier la police sur tous le document (en Verdana)
- je dois supprime les lignes et contenu suivant :
CONCLUSION
DIAGNOSTIC
OBSERVATIONS
ETALEMENT MOYEN PRECONISE
SURFACE TERRIERE
COEFFICIENT D'ELANCEMENT
DIAGNOSTIC HAUTEUR
DIAGNOSTIC ÂGE
ÂGE ONTOLOGIQUE
- supprimer le mots TABLEAU de tous les documents
- passer en corps 12 les titres suivants :
DETERMINATION BOTANIQUE
AUTECOLOGIE
EXPERTISE
- passer les lignes suivante en fond vert et texte en blanc :
ORGANES OBSERVATIONS
PARAMETRES CARACTERISTIQUES
PARAMETRES DE L'ARBRE OBSERVATIONS / RELEVES
- passer toute les colonnes de gauches en fer à gauche (voir exemple)
puis enregistrer en pdf,
genre mission impossible pour moi qui débute tous juste dans la macro,
j'espère qu'une âme courageuse pourra m'aider
exemple fichier excel : https://www.cjoint.com/?0CvluTRRZcs
exemple résultat final : https://www.cjoint.com/?0CvlvP7XztI
en vous remerciant d'avance pour vos réponse,
bien cordialement,
fab