probleme de tab pendant copie

phestaca

XLDnaute Nouveau
bonjour a tous,

je suis en train de créer une macro qui me réccupere de données dans excel pour les mettre dans un ppt en fonction de différents choix.

jusque la tout va bien, sauf pour ceci :

Code:
With PptDoc
    Range("C6:C9").Copy
    .Slides(i).Shapes("RegChange").TextFrame.TextRange.Paste
    .Slides(i).Shapes("RegChange").TextFrame.TextRange.ParagraphFormat.Alignment = ppAlignLeft
 
End With

en effet j'ai 4 lignes contenues dans 4 cellules que je veux mettre dans une zone de texte que j'ai créé. Pourquoi 4 ? car j'ai un lien hypertexte dans la deuxieme cellule et que je veux avoir 4 paragraphes
C6 : P1
C7 : P2 avec lien hypertexte
C8 : P3
C9 : P4
tout marche avec cela mais cela me rajoute des tab avant de passer a chaque ligne dans ma zone de texte ...
Ca me ralonge donc mon texte pour rien et mon lien hypertexte qui est souligné est donc rallongé du type :
lien______

pas tres joli donc ... j'ai essayer d'enlever les chr(9) comme je sais faire dans une chaine de caractere, mais cela supprime le lien hypertexte en meme temps ...

vous avez des idées pour résoudre mon pb ?

merci d'avance !
 

Membres actuellement en ligne

Statistiques des forums

Discussions
314 628
Messages
2 111 337
Membres
111 104
dernier inscrit
JEMADA