Bonjour,
Je souhaite, grâce à une macro VBA dans Access, OUVRIR un fichier texte avec Excel afin de pouvoir mettre certaines colonnes en MAJUSCULES. Puis enregistrer le fichier en format .txt, et enfin fermer Excel sans sauvegarder. Je dois faire cela pour 97 fichiers textes.
Ensuite j'importe ces fichiers dans Access pour avoir UNE table contenant les données de tous les fichiers textes (cette table contient alors environ 45000 enregistrements).
Je n'ai aucun souci pour l'importation. En revanche, pour le pré-traitement de mes fichiers textes, j'ai essayé quelque chose mais une erreur me dit que le répertoire n'est pas valide :
Comment résoudre ce problème ? De plus quand j'utilise une macro test pour enregistrer un fichiers texte, je ne souhaiterais pas voir les boites de dialogues du genre "Ce fichier existe déjà, voulez-vous le remplacer ?
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11 Public Function ColonnesMajuscules() Dim logiciel As String Dim fichier As String Dim alancer logiciel = "C:\Program Files\MicroSoft Office\Office\EXCEL.EXE" fichier = "Q:\GESTION\Tableaux de gestion\monFichier.txt" alancer = logiciel & " " & fichier Application = Shell(alancer, vbMaximizedFocus) End Function
Sinon, y aurait-il un moyen de mettre toutes les données de mes fichiers textes en majuscules sans passer par Excel ?
Aidez-moi SVP !
Merci d'avance pour vos pistes...
Partager