![]() |
| Le forum de référence en programmation et développement. Articles, cours et tutoriels du débutant au chef de projet et DBA confirmé. | |||||||
|
|||||||
![]() |
|
|
Outils de la discussion |
|
|
#1 (permalink) |
|
Invité de passage
![]() Date d'inscription: octobre 2008
Messages: 9
|
Bonjour à tous,
je rencontre un pb duquel je n'arrive pas à me sortir: j'ai crée un code en vba qui me permet de generer à partir d'un document Word d'autres document Word. Mon document de base contient des infos qui se repercutent sur les autres documents Word grace aux signets, jusque la tout va bien. la difficulté que je rencontre est que certaine données de mon document "maitre" sont contenues dans des cellules et lorsque ces cellules sont envoyées vers les signets, la mise en page est foutue en l'air j'ai des caractères improbables qui apparaissent. par exemple mon document maitre a une cellule qui contient la date 13/11/2008 quand je genere un docuemnt qui doit reprendre cette date j'obtiens date: 13/11/2008 alors que je voudrais obtenir: date : 13/11/2008 (donc pas de retour à la ligne, pas plusieurs lignes en dessous de la date, bref respecter la mise en page des signets) comment pourrais-je extraire seulement la chaine de caractère sans que celle ci soit fu format cellule? voici comment je procède pour remplir mes signets: Code :
WordDoc.Bookmarks("date").Range.Text = ActiveDocument.Tables(4).Rows(nb).Cells(2).Range.Text |
|
|
|
|
|
#2 (permalink) |
![]() Date d'inscription: février 2006
Localisation: Morlanwelz (Carnières)
Âge: 44
Messages: 10 459
|
Salut,
Lorsque tu récupères le contenu d'une cellule, tu l'as constaté, tu obtiens deux caractères supplémentaires. On peut les enlever avec une petite fonction de nettoyage. Code :
Public Function NetText(stTemp As String) As String NetText = Left(stTemp, len(stTemp)-2) End Function Code :
WordDoc.Bookmarks("date").Range.Text = NetText(ActiveDocument.Tables(4).Rows(nb).Cells(2).Range.Text) Code :
ActiveDocument.Tables(4).Cell(nb,2).Range.Text
__________________
J'ai pas encore de décodeur, alors, postez en clair ! Comment mettre une balise de code ? Ne posez pas de question par MP, c'est inutile. Les rubriques Office recrutent. Ma page d'accueil Consultez nos FAQ !! Word ; Access ; Outlook ; Excel ; PowerPoint ; SharePoint Si vous pensez que certains sujets manquent dans la FAQ, aidez nous ! Des images |
|
|
|
|
|
#3 (permalink) |
|
Invité de passage
![]() Date d'inscription: octobre 2008
Messages: 9
|
merci de ta réponse et en effet entre temps j'avais codé avec ce genre de fonction de nettoyage ce qui marche tres bien
mais, parce qu'il y a toujours un mais, je suis maintenant confronter à un autre problème toujours dans cette meme cellule qui contient une date, je bloque dans le cas ou cette cellule contient plusieurs date!! en effet, la premiere date est recuperable pour l'adresser au signet voulu mais la deuxieme date, je ne sais pas comment y faire reference. aurais-tu une idée? j'illustre par un exemple: ma cellule contient: 13/11/2008 14/11/2008 j'arrive a recuperer le 13/11/2008 par le "nettoyage" mais du coup je ne peux pas lire la seconde date merci du coup de main |
|
|
|
|
|
#6 (permalink) |
![]() Date d'inscription: février 2006
Localisation: Morlanwelz (Carnières)
Âge: 44
Messages: 10 459
|
Salut,
surprenant, j'arrive à lire plusieurs lignes ?
__________________
J'ai pas encore de décodeur, alors, postez en clair ! Comment mettre une balise de code ? Ne posez pas de question par MP, c'est inutile. Les rubriques Office recrutent. Ma page d'accueil Consultez nos FAQ !! Word ; Access ; Outlook ; Excel ; PowerPoint ; SharePoint Si vous pensez que certains sujets manquent dans la FAQ, aidez nous ! Des images |
|
|
|
|
|
#7 (permalink) |
|
Invité de passage
![]() Date d'inscription: octobre 2008
Messages: 9
|
en effet, surprenant, sans doute ton experience t'a permis de mieux coder que moi. Je me suis donc concoter une soluce qui , je pense, n'est pas digne des meilleurs developpeurs mais qui fonctionne!!miracle...
|
|
|
|
|
|
#8 (permalink) |
![]() Date d'inscription: février 2006
Localisation: Morlanwelz (Carnières)
Âge: 44
Messages: 10 459
|
Si ça fonctionne, c'est le principal.
__________________
J'ai pas encore de décodeur, alors, postez en clair ! Comment mettre une balise de code ? Ne posez pas de question par MP, c'est inutile. Les rubriques Office recrutent. Ma page d'accueil Consultez nos FAQ !! Word ; Access ; Outlook ; Excel ; PowerPoint ; SharePoint Si vous pensez que certains sujets manquent dans la FAQ, aidez nous ! Des images |
|
|
|
|
![]() |
![]() |
||
Pb de signets et cellule
|
||
| Outils de la discussion | |
|
|