2009-07-24 8 views
1

Je ne sais pas si cette question va faire sens ou ne pas être ici va:MS Access - Sortie des données dans le dossier Windows, peut être supprimé après la procédure?

J'ai donc un certain VB qui produit des données à partir de certaines requêtes. Il suffit d'exporter l'ensemble de données résultant de la requête en tant qu'excel dans un fichier Excel, et il y en a plusieurs qui le font. Ils se déplacent tous automatiquement (ouvrir et fermer des événements sur des formulaires) dans le cadre d'un petit truc d'automatisation que j'utilise pour créer une présentation PowerPoint avec (ou éventuellement laisser les utilisateurs le faire) qui exécutent un tas de requêtes de Nth top, et puis créez ces graphiques, puis créez le ppt avec les graphiques et les données. Blah blah, donc ce que je me demande est, est-il un moyen d'accès, je peux vider ce dossier spécifique (supprimer tous ces fichiers Excel de sortie) à la fin du processus. parce qu'ils doivent continuellement être supprimés, ou la prochaine fois que vous l'exécutez, vous vous retrouvez avec 25 "voulez-vous remplacer ce fichier?" messages, et c'est juste ennuyeux. Je suis assez sûr qu'il y a une méthode macro de faire cela .... mais je ne sais vraiment pas ??? La raison pour laquelle je les exporte comme ceci est que j'ai besoin des données pour correspondre à la carte dans la présentation, et la meilleure façon (relative) que je peux rassembler, copier et coller d'Excel dans la section des notes de la ppt . Je ne sais pas comment le vb à partir de l'accès dans la section des notes, je ne sais pas comment le vb d'Excel dans la section des notes, donc cela devra faire je suppose.

merci les gars!

Répondre

2

Vous pouvez utiliser

Kill (strPath) 

supprimer un fichier à partir du disque, où strPath est le chemin vers le fichier. Répétez si nécessaire.

+0

sonne cool ... est-ce que j'utilise un docmd.kill (strPath)? pour l'utiliser? merci j'apprécie! – Justin

+0

qui serait pure VBA. Non DoCmd ou quoi que ce soit en face de lui. Vous devrez peut-être ajouter la référence "Visual Basic pour Applications" à votre projet - (dans la fenêtre Code) aller à Outils-> Références – BIBD

2

Si vous ne voulez pas détailler chaque fichier que vous pouvez mettre quelque chose comme:

del C:\FolderName\*.xls 

Dans un fichier batch.

Puis en VBA exécuter le fichier batch:

Call Shell("C:\folderdelete.bat") 

OU si vous vous sentez plus centrée sur le code:

Dim sDelFile As String 
sDelFile = Dir$("c:\FolderName\*.xls") 
Do While sDelFile <> "" 
    Kill "c:\FolderName\" & sDelFile 
    'need to specify full path again because a file was deleted 1 
    MyFile = Dir$("c:\FolderName\*.xls") 
Loop 

Je voudrais vraiment tester cela avant la mise en production.

+0

Ne doit pas être: Dim sDelFile As String sDelFile = Dir $ ("c : \ FolderName \ *. Xls ") Do while sDelFile <>" " Supprimer" c: \ FolderName \ "& sDelFile 'devez spécifier à nouveau le chemin d'accès complet car un fichier a été supprimé 1 sDelFile = Dir $ (" c : \ FolderName \ *. Xls ") Boucle –

+0

oups pas de mise en forme et maintenant je ne peux pas supprimer mon commentaire. MyFile devrait être sDelFile –

+0

merci les gars! comme toujours je l'apprécie .... je l'ai essayé et ça a plutôt bien marché! Cela résout ce problème pour moi ... Seth Je pense que vous avez répondu à environ la moitié des questions que j'ai posté ici alors merci l'homme! – Justin

Questions connexes