recherche de répertoire et traitement....

recherche de répertoire et traitement.... - VB/VBA/VBS - Programmation

Marsh Posté le 30-06-2005 à 15:13:46    

Cela va bientot faire 48h que je décortique aide d'excel et internet, a la recherche des 2 fonctions qui me manque !!!!! j en peux plus !!!!!!
...donc si quelqu un pouvait avoir l'extrême gentillesse de m'aider, ça m'éviterait de finir à l'asile...
Je m'explique:
 
1)je voudrai faire une fonction permettant de rechercher un sous-répertoire dans un répertoire spécifique. S'il existe, tant mieux, on continue, sinon, il le crée , et on continue quand meme.
 
2)La même chose mais pour un fichier xls. Autrement dit, recherhce du fichier dans un répertoire (le sous-répertoire présente ci-dessus, en fait). s'il n'existe pas, on le crée, sinon, on l'ouvre et on y ouvre une nouvelle feuille.
 
Je ne crois pas avoir vu un poste répondant à ma question, mais j'assure pas.....

Reply

Marsh Posté le 30-06-2005 à 15:13:46   

Reply

Marsh Posté le 30-06-2005 à 15:43:09    

Salut!
Le programme ci-dessous va chercher le sous-répertoire "Data" sur le C. S'il ne le trouve pas, il le crée. Voilà pour la question1. La 2 arrive
MyFile = Dir("C:\Data", vbDirectory)
If MyFile = "" Then
    MkDir "C:\Data"
End If

Reply

Marsh Posté le 30-06-2005 à 15:49:53    

Alors, pour chercher un fichier, c'est le même principe:
     
    MyFile = Dir("C:\Data\FTP_liste.txt", vbDirectory)
    If MyFile = "" Then
 
Pour le code pour créer un nouveau fichier, tu n'as qu'à utiliser l'enregistreur automatique d'excel: t'ouvre une nouvelle feuille puis tu l'enregistres dans le répertoire désiré.

Reply

Marsh Posté le 30-06-2005 à 16:02:24    

ca marche !!!! merci, je t aime toi !!!! juste quand les messieurs en blanc ils allaient me passer la chemise qui s attache dans le dos !!!!! merci, merci, merci !!!!

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed