Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
996 connectés 

  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  [VBA] Quitter une procédure

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

[VBA] Quitter une procédure

n°1525607
daniel-12
Posté le 07-03-2007 à 23:18:20  profilanswer
 

Bonsoir
 
j'ai une userform qui doit contenir une liste de fichier
lors de l'ouverture de cette userform, je verifie que le répertoire contenant les fichier est present de cette facon
 
X etant l'arborecence complète du répertoire
 
 
If Dir(X) <> "" Then
   MsgBox ("Le répertoire  " & X & " est present, donc on continu " )
Else
   MsgBox ("Le répertoire  " & X & " n'a pas été trouvé, donc on sort et decharge la userform " )
   Unload Me
End If
 
 
apparement "Unload me" ne fait pas son travail comme je le souhaiterais
Comment faire pour arreter la procedure et quitter immédiatement la userform ?
 

mood
Publicité
Posté le 07-03-2007 à 23:18:20  profilanswer
 

n°1525640
seniorpapo​u
Posté le 08-03-2007 à 07:14:50  profilanswer
 

Bonjour,
en principe cela fonctionne, mets ta procédure entière que l'on puisse voir
Cordialement

n°1525682
aprilthe5i​th
Posté le 08-03-2007 à 09:53:48  profilanswer
 

Tu dois avoir un "application.screenupdating=false" qui traine.

n°1526027
daniel-12
Posté le 08-03-2007 à 19:41:50  profilanswer
 

Laissez tomber
j'ai trouvé une autre solution plus pratique que de quitter le programme


Message édité par daniel-12 le 08-03-2007 à 21:47:27
n°1526145
tegu
Posté le 09-03-2007 à 09:22:25  profilanswer
 

Si X est seulement un répertoire et pas un fichier, alors Dir(X) renverra toujours ""
Ton code ne marchera pas dans ce cas.

 

Pour tester un répertoire il faut faire : Dir(X, vbDirectory)


Message édité par tegu le 09-03-2007 à 09:23:01

Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  [VBA] Quitter une procédure

 

Sujets relatifs
[VBA WORD] ouverture d'un fichier selon un template[VBA / DOS] Appeler une macro en DOS
VBA access requete SQL et fonction()VBA access fermer word [résolu]
creer et/ou modifier materiaux + l'appliquer + VBA + CATIAProcédure stockée
[Résolu][VBA ACCESS] LIKE + * ou % ?[VBA]cacher une ligne d'une listbox
Problème de code VBA...
Plus de sujets relatifs à : [VBA] Quitter une procédure


Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR