pilotage de notepad depuis Excel

[jean- luc]

Bonjour j ai fai une interface avec une textBox et un bouton
et j aimerai lorsque j appue sur ce bouton
copier dans un fichier texte (via le bloc note par exemple) le contenue de la cellule A1 de ma feuille puis aller a la ligne et coller le contenu de ma textBox aller de nouveau a la ligne et enfin copier le contenu de la cellule A2.
Donc il faut ouvrir le bloc note ecrire successivement contenue de A1, textBox et A2. enregistrer le fichier text dans mes documents (voir meme plutot l enregistre en HTML si cest possible je metterai les balise de code HTML dans les cellule de A1 et A2)
et finalement ouvrir ce dossier.
Et si je rappuye sur le boutton il refasse la meme chose en ecrasant l ancien dossier et en le remplacer par le nouveau
merci d avance

 

[sylsyl]

Salut Jean Luc,

voici un article que je viens de trouver, peut etre pourra t'il t'aider...

(et hop ! un super copier/coller)

Ouvrir Notepad

Sub DDEtoBlocNotes()
dim Datarange As range
chan = application.DDEInitiate(app:="NOTEPAD", topic:="C:\abcédaire\test.txt")
Set Datarange = thisworkbook.worksheets("Accueil").range("a1:m1")
Datarange.Copy
application.DDEExecute chan, "[EDITIONCOLLER]"
application.DDETerminate chan
end Sub

Ecrire un fichier texte
Sub WriteTextFile()
Open "c:\windows\desktop\myfile.txt" for Output As #1
Print #1, "This is a line of text."
Print #1, "And here is another."
Close #1
end Sub

Voila, je ne pense pas que ca resoudra ton probleme mais c'est, a monavis, un bon debut.

A++, Sylsyl.

P.S.: c'etait sur le site http://xlbysteph.free.fr/aideinformatique/, site que l'on m'a conseille sur ce forum.