Coller du texte dans des signets défins dans un doc WORD

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : Coller du texte dans des signets défins dans un doc WORD

vannily

Bonjour a tous...et salut ANTP qui doit surement se rappeler de "Tonton Nily"..lol

j'aimerais coller du texte dans des signets que j'ai définit dans un document Word. j'ai récupéré un portion de code de Vb, mais je n'arrive pas à le retranscrire en Dédel (Delphi).

Code :

//* Jouvre les fichiers word *//
WordApp := CreateOleObject('Word.application');
WordApp.visible := true;
WordDocs := WordApp.documents;
WordDoc := WordDocs.open(CheminBDO + 'fichier.doc');
Clipboard.Clear;
Clipboard.AsText := Tableau_donnees[4];
tmp := 'Agence'; //* la valeur du signet dans Word *//
WordDoc.Bookmarks(tmp).Select; //* c une portion de mon code VB *//
WordDoc.Activate;
WordDoc.Selection.Paste

Si quelqu'un pourrais me dépanner, ça serait la classe. Merci à tous et si possible à toutes.

@+ et bon week end

---------------
TUPAC REST IN PEACE

Publicité

vannily

Essais ça man !

var
vBookMarks, vBookMark : variant;

......
....

Code :

Begin
WordApp := CreateOleObject('Word.application');
WordApp.visible := true;
WordDocs := WordApp.documents;
WordDoc := WordDocs.open(CheminBDO + 'DC4.doc');
vBookMarks := WordDoc.BookMarks;
Clipboard.Clear;
Clipboard.AsText := Tableau_donnees[4];
tmp := 'Agence';
if vBookMarks.Exists(tmp) then begin
vBookMark := vBookMarks.Item(tmp);
vBookMark.Select;
WordApp.selection.paste
end;

merci ki.....

---------------
TUPAC REST IN PEACE

antp

Super Administrateur
Champion des excuses bidons

vannily a écrit :

Bonjour a tous...et salut ANTP qui doit surement se rappeler de "Tonton Nily"..lol

Salut, mais j'ai jamais utilisé ces trucs dont je n'aurais pas pu t'aider

---------------
mes programmes ·· les voitures dans les films ·· apprenez à écrire

vannily

Bonjour,

Donc ça veut dire, ke g progressé et ke j'arrive à ton genoux maintenant? si ça continue le maitre va dépasser le décamaitre...lol

bon week end.

---------------
TUPAC REST IN PEACE

FORUM HardWare.fr

Programmation

Delphi/Pascal

Coller du texte dans des signets défins dans un doc WORD

Sujets relatifs
lire et afficher un fichier texte en C	Macro Word 2000
saisie de texte	Saisie de texte en HTML
supprimer un fichier texte depuis le vba/excel ????	[PHP] Remplacement de texte d'url par l'url...
HTML - Comment pouvoir bouger un formulaire(une zone de texte)	[C++]Port Serie -> Envoi d'un fichier texte...
[Word/VBA] 'Modifier Image' sur un .WMF inséré mais en VBA?	Problème IE et texte
Plus de sujets relatifs à : Coller du texte dans des signets défins dans un doc WORD

Page générée en 0.065 secondes