Trouver tous les tableaux de mon document et les convertir en texte

Trouver tous les tableaux de mon document et les convertir en texte - VB/VBA/VBS - Programmation

Marsh Posté le 23-06-2006 à 16:10:36    

Bonjour,
Comme l'indique le sujet, je voudrai : "trouver tous les tableaux de mon documents et les convertir en texte"
Je sais que c'est avec convertToText ms j'y arrive pas...??

Reply

Marsh Posté le 23-06-2006 à 16:10:36   

Reply

Marsh Posté le 23-06-2006 à 16:54:08    

acorsa a écrit :

Bonjour,
Comme l'indique le sujet, je voudrai : "trouver tous les tableaux de mon documents et les convertir en texte"
Je sais que c'est avec convertToText ms j'y arrive pas...??


quelle est ta syntaxe de ta fonction convertToText ? l'utilises tu déjà correctement ?:p

Reply

Marsh Posté le 23-06-2006 à 17:08:54    

A essayer


Sub Test()
Dim NbTableaux As Integer
Dim i As Integer
     NbTableaux = ActiveDocument.Tables.Count
     If NbTableaux > 0 Then
        For i = 1 To NbTableaux
             ActiveDocument.Tables(1).ConvertToText  Separator:=wdSeparateByTabs
        Next
     End If
End Sub


Message édité par kiki29 le 24-06-2006 à 04:35:57
Reply

Marsh Posté le 23-06-2006 à 17:09:45    

 Selection.Rows.ConvertToText Separator:=wdSeparateByTabs, NestedTables:= True
 
La syntaxe marche si je me place au début du tableau ou si je le sélectionne ms j'aimerai que ça le fasse automatiquement : recherche des tableaux, conversion en texte.
 
Merci

Reply

Marsh Posté le 24-06-2006 à 12:58:32    

voir post plus haut


Message édité par kiki29 le 24-06-2006 à 12:59:57
Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed