Macro excel : exporter des feuilles dans des templates word

[jabrane]

Bonjour;
j'ai réaliser un macro excel en VB qui fait l 'export de la ligne selectionné dans la feuille excel vers une template word , a l'aide des signet dans la template.doc. Mais, j'ai trouvé beaucoup des problemes dans ce macro:

1. Le chemin des fichier excel et word peut changer, d une machine a l'autre, d'ou je doit avoir un chemin generique pour tout les utilisateurs.

2.Le macro contient une boucle:
"""
For i = 1 To 109
WordDoc.Bookmarks("Signet" & i).Range.Text = Cells(ActiveCell.Row, i)
Next i
""""
*109 est le numero de la derniere colonne , peut-on la remplacer avec une variable , n par exemple.
*dans la feuilles excel , y en a des cellules qui ne vont pas etre exporté vers le fichier word , mais si je les supprime du document word , le macro ne fonctionne plus , d ou je doit inserer les signets dans un autre endroit du document et ce n'est pas du tout beau.

3.mon Macro est enregistré dans ( PERSO.XLS) , et sa fonctionne pour tout les classeurs excel; mais si je veut travaillé sur autre machine , que doit-je faire ??

4.Merci pour votre aides et vos temps.

 

[jabrane]

Re : Macro excel : exporter des feuilles dans des templates word

La ligne 1 de ce "tableau" contient-elle ces entêtes ? et démarre-t-elle bien en colonne 1 ?
Si oui :

Code Visual Basic :n = Cells(1, Columns.Count).End(xlToLeft).Column