Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

XL 2013 Contrôle wordpad via VBA

Haso54

XLDnaute Nouveau
Bonjour à tous,
Je suis Haso54 31 ans, nouveau sur ce forum

Mon problème est le suivant :

J'aimerais via VBA contrôler wordpad.
Tout les jours j'ai une base de donner différentes (400 lignes en moyenne) qui se mette à jour automatiquement via SQL en colonne A.

Ma question est il possible de dire à vba de copier et saisir des touches dans wordpad ?
Désolé je ne peux avoir de PJ car c'est un fichier qui est sur mon lieu de travail

En gros
- Copier la colonne A de mon fichier excel
- Ouvrir Wordpad
- Touche CTRL + A (sélectionner ancien contenu)
- Touche SUPPR (supprimer le contenu)
- Touche CTRL + V ( coller nouveau contenu)
- Touche CTRL + S (enregistrer)
- Touche ALT + F4 (fermer wordpad)

Merci d'avance de prendre la peine de me lire
 

Staple1600

XLDnaute Barbatruc
Bonjour le fil, Haso54

Haso54 [Bienvenue sur le forum]
Pourquoi tu veux titiller Wordpad alors qu'Excel sait ouvrir un fichier texte tout seul comme un grand ?
Il sait aussi créer un fichier texte.

Le but recherché est-il celui-ci?
Exporter chaque jour le contenu de la colonne A d'un fichier Excel vers un fichier texte?
 

Haso54

XLDnaute Nouveau


Bonjour et merci pour ta réponse Staple1600,

Je suis obligé de passer par wordpad, de base c'est un fichier SRL qui s'ouvre avec Nexus terminal. Ce fichier SRL s'ouvre uniquement avec Wordpad. D'où la question de savoir si la vba pourrait contrôlé wordpad.

Oui le but est de prendre les données de la colonne A et l'extraire dans un fichier texte
 

Haso54

XLDnaute Nouveau
Non malheureusement j'ai aucune PJ.
J'arrive à ouvrir le fichier SRL via vba.
J'avais pris en screen pour faire quelques recherches voici le code que j'aimerais appliquer
 

Pièces jointes

  • 20191124_114052.jpg
    952.4 KB · Affichages: 59

Staple1600

XLDnaute Barbatruc
Re

Je me suis juste arrêté sur la première ligne du script qu'on peut lire leur site
Code:
OpenTextFile ("C:\temp\sample.cvs")
SetTextToken (";\t\r\n")

If FileExist ("C:\temp\outp.txt")
RemoveFile ("C:\temp\outp.txt")
EndIf

OpenOutputFile (0, "C:\temp\outp.txt")

AcceptEmptyItems (TRUE)

NumberItem (NC)
StringItem (NAME)

while ReadTextLine ()

if GetNextItem ()
if IsStringItemNotEmpty (TEXT_ITEM)
CopyStringItem (NAME, TEXT_ITEM)

GetNextItem ()
# Not needed/tested
GetNextItem ()
if IsStringItemNotEmpty (TEXT_ITEM)
WriteItemToFile (0, NAME)
AppendTabToFile (0)
WriteItemToFile (0, TEXT_ITEM)
AppendNewLineToFile (0)
IncNumberItem (NC)
endif
endif
endif
EndDo

CloseTextFile ()
CloseOutputFile (0)
PopUpMsg (NC)
On peut enregistré une feuille Excel en *.csv
 

Staple1600

XLDnaute Barbatruc
Re

Je n'en sais rien.
Je connais pas le terminal Nexus et je ne l'utilise donc pas.

Voir les liens de mon précédent message.

NB: Je dis simplement que si Nexus sait ouvrir un fichier *.csv alors pas besoin de Wordpad.
 

Discussions similaires

Réponses
8
Affichages
495
Réponses
2
Affichages
657
  • Question
Microsoft 365 VBA
Réponses
3
Affichages
445
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…