Exécution application externe shell AppActivate

Bonjour,

Je souhaite créer un dossier, mais avant, s'il existe, le supprimer

Code:

---

1 2 3

AppID = Shell("cmd /c rmdir /q /s " + strPathDirectory + "tmpXL\", vbHide) ' Là, il faut que j'attende la fin de l'exécution MkDir (strPathDirectory + "tmpXL")

---

Comment faire attedre la fin de l'exécution ?

J'ai essayé AppActivate(), mais je ne trouve pas les bons arguements.

Merci pour votre aide

Nicolas
strasbourg

Il existe une API ShellWait qui lance une application mais attend la fin de son execution pour continuer le code

Sur ce lient tu trouveras le code
http://docvb.free.fr/codedetail.php?idc=23

Et pourquoi pas

Code:

---

1 2 3 4 5

Dim fs as object Set fs = CreateObject("Scripting.FileSystemObject") fs.RmDir(strPathDirectory + "tmpXL") fs.MkDir(strPathDirectory + "tmpXL")

---

Merci beaucoup.

N'y a-t-il pas une fonction en VBA de base ?
Ca fait quand même lourd comme traitement juste pour attendre ...

Vite codé, mais bon ... A tout hasard.

aa

C'est parfait ... le mot "shellwait" me renvoie sous une multitude de sites, utilisant différentes manières.

Exemple sur notre site adoré

Résolu...

Citation:

---

Envoyé par Garuda

Et pourquoi pas

Code:

---

1 2 3 4 5

Dim fs as object Set fs = CreateObject("Scripting.FileSystemObject") fs.RmDir(strPathDirectory + "tmpXL") fs.MkDir(strPathDirectory + "tmpXL")

---

---

Parce que mon dossier n'est pas vide...

Mais je me permets de rebondir

Ce "CreateObject", comment connaitre les objets existants ? Est-ce du .Net ?

Citation:

---

Envoyé par Nico_stras

Parce que mon dossier n'est pas vide...

Mais je me permets de rebondir

Ce "CreateObject", comment connaitre les objets existants ? Est-ce du .Net ?

---

8O On est pas dans un forum VBA, ici ???

Citation:

---

Envoyé par Garuda

8O On est pas dans un forum VBA, ici ???

---

Si, justement, c'est pour ça que je m'interroge sur ces objets.
Est ce des objets internes à office ? VBA permet d'accéder à des objets .Net ?

Ca n'a rien avoir avec .NET.
C'est de l'Office.
Et ca existait avant .NET.