J'ai quelques petits soucis avec l'instruction "Dir" qui ne semble pas
réagir de la même façon selon le système d'exploitation.
Lorsqu'elle est exécutée sur un dossier inexistant sous W2000Pro elle
renvoie bien "Vide" ( ce qu'elle est censée faire d'après l'aide et ce que
j'aimerai bien qu'elle fasse tout le temps !!!!)
Sous XP la même instruction bug invariablement pour cause de conflit de
type.
Si quelqu'un/quelqu'une a une idée, je suis preneur !!
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
JLuc
*Bonjour V!nce*, J'ai fais un petit test : XP Home, Excel 2000 Sub test() fichiers = Dir(ActiveWorkbook.Path & "*.ppt") If fichiers = "" Then MsgBox "Pas de fichiers !" Else MsgBox fichiers End If End Sub Ca marche ! Pas d'erreurs
Bonjour à toutes et tous.
J'ai quelques petits soucis avec l'instruction "Dir" qui ne semble pas réagir de la même façon selon le système d'exploitation. Lorsqu'elle est exécutée sur un dossier inexistant sous W2000Pro elle renvoie bien "Vide" ( ce qu'elle est censée faire d'après l'aide et ce que j'aimerai bien qu'elle fasse tout le temps !!!!) Sous XP la même instruction bug invariablement pour cause de conflit de type.
Si quelqu'un/quelqu'une a une idée, je suis preneur !!
Merci de m'avoir lu
A+
-- ____ ( O | O ) -- _oooO_ JLuc _Oooo_
O-O
*Bonjour V!nce*,
J'ai fais un petit test : XP Home, Excel 2000
Sub test()
fichiers = Dir(ActiveWorkbook.Path & "*.ppt")
If fichiers = "" Then
MsgBox "Pas de fichiers !"
Else
MsgBox fichiers
End If
End Sub
Ca marche ! Pas d'erreurs
Bonjour à toutes et tous.
J'ai quelques petits soucis avec l'instruction "Dir" qui ne semble pas réagir
de la même façon selon le système d'exploitation.
Lorsqu'elle est exécutée sur un dossier inexistant sous W2000Pro elle renvoie
bien "Vide" ( ce qu'elle est censée faire d'après l'aide et ce que j'aimerai
bien qu'elle fasse tout le temps !!!!)
Sous XP la même instruction bug invariablement pour cause de conflit de type.
Si quelqu'un/quelqu'une a une idée, je suis preneur !!
*Bonjour V!nce*, J'ai fais un petit test : XP Home, Excel 2000 Sub test() fichiers = Dir(ActiveWorkbook.Path & "*.ppt") If fichiers = "" Then MsgBox "Pas de fichiers !" Else MsgBox fichiers End If End Sub Ca marche ! Pas d'erreurs
Bonjour à toutes et tous.
J'ai quelques petits soucis avec l'instruction "Dir" qui ne semble pas réagir de la même façon selon le système d'exploitation. Lorsqu'elle est exécutée sur un dossier inexistant sous W2000Pro elle renvoie bien "Vide" ( ce qu'elle est censée faire d'après l'aide et ce que j'aimerai bien qu'elle fasse tout le temps !!!!) Sous XP la même instruction bug invariablement pour cause de conflit de type.
Si quelqu'un/quelqu'une a une idée, je suis preneur !!
Merci de m'avoir lu
A+
-- ____ ( O | O ) -- _oooO_ JLuc _Oooo_
O-O
V!nce
Salut,
Ok, effectivement j'ai essayé ta sub et ça fonctionne chez moi aussi, sauf quand tu "vise" un disque qui n'existe pas et c'est en fait ce que je veux faire. J'essaie de pointer vers un répertoire réseau, si je ne le trouve pas ( dir(réseau) = "") je pointe alors vers un autre emplacement sur un disque local...
Y a t'il un moyen de détecter ou non la présence d'un répertoire autrement que par l'instruction dir ???
En tout cas merci de ta réponse qui m'a permis d'éclaircir un peu le problème !
A+
"JLuc" a écrit dans le message de news:
*Bonjour V!nce*, J'ai fais un petit test : XP Home, Excel 2000 Sub test() fichiers = Dir(ActiveWorkbook.Path & "*.ppt") If fichiers = "" Then MsgBox "Pas de fichiers !" Else MsgBox fichiers End If End Sub Ca marche ! Pas d'erreurs
Bonjour à toutes et tous.
J'ai quelques petits soucis avec l'instruction "Dir" qui ne semble pas réagir de la même façon selon le système d'exploitation. Lorsqu'elle est exécutée sur un dossier inexistant sous W2000Pro elle renvoie bien "Vide" ( ce qu'elle est censée faire d'après l'aide et ce que j'aimerai bien qu'elle fasse tout le temps !!!!) Sous XP la même instruction bug invariablement pour cause de conflit de type.
Si quelqu'un/quelqu'une a une idée, je suis preneur !!
Merci de m'avoir lu
A+
-- ____ ( O | O ) -- _oooO_ JLuc _Oooo_
O-O
Salut,
Ok, effectivement j'ai essayé ta sub et ça fonctionne chez moi aussi, sauf
quand tu "vise" un disque qui n'existe pas et c'est en fait ce que je veux
faire.
J'essaie de pointer vers un répertoire réseau, si je ne le trouve pas (
dir(réseau) = "") je pointe alors vers un autre emplacement sur un disque
local...
Y a t'il un moyen de détecter ou non la présence d'un répertoire autrement
que par l'instruction dir ???
En tout cas merci de ta réponse qui m'a permis d'éclaircir un peu le
problème !
A+
"JLuc" <ns.jeanluc.laurent@free.fr.ns> a écrit dans le message de news:
mn.6c3d7d63a7ae0b89.40692@free.fr.ns...
*Bonjour V!nce*,
J'ai fais un petit test : XP Home, Excel 2000
Sub test()
fichiers = Dir(ActiveWorkbook.Path & "*.ppt")
If fichiers = "" Then
MsgBox "Pas de fichiers !"
Else
MsgBox fichiers
End If
End Sub
Ca marche ! Pas d'erreurs
Bonjour à toutes et tous.
J'ai quelques petits soucis avec l'instruction "Dir" qui ne semble pas
réagir de la même façon selon le système d'exploitation.
Lorsqu'elle est exécutée sur un dossier inexistant sous W2000Pro elle
renvoie bien "Vide" ( ce qu'elle est censée faire d'après l'aide et ce
que j'aimerai bien qu'elle fasse tout le temps !!!!)
Sous XP la même instruction bug invariablement pour cause de conflit de
type.
Si quelqu'un/quelqu'une a une idée, je suis preneur !!
Ok, effectivement j'ai essayé ta sub et ça fonctionne chez moi aussi, sauf quand tu "vise" un disque qui n'existe pas et c'est en fait ce que je veux faire. J'essaie de pointer vers un répertoire réseau, si je ne le trouve pas ( dir(réseau) = "") je pointe alors vers un autre emplacement sur un disque local...
Y a t'il un moyen de détecter ou non la présence d'un répertoire autrement que par l'instruction dir ???
En tout cas merci de ta réponse qui m'a permis d'éclaircir un peu le problème !
A+
"JLuc" a écrit dans le message de news:
*Bonjour V!nce*, J'ai fais un petit test : XP Home, Excel 2000 Sub test() fichiers = Dir(ActiveWorkbook.Path & "*.ppt") If fichiers = "" Then MsgBox "Pas de fichiers !" Else MsgBox fichiers End If End Sub Ca marche ! Pas d'erreurs
Bonjour à toutes et tous.
J'ai quelques petits soucis avec l'instruction "Dir" qui ne semble pas réagir de la même façon selon le système d'exploitation. Lorsqu'elle est exécutée sur un dossier inexistant sous W2000Pro elle renvoie bien "Vide" ( ce qu'elle est censée faire d'après l'aide et ce que j'aimerai bien qu'elle fasse tout le temps !!!!) Sous XP la même instruction bug invariablement pour cause de conflit de type.
Si quelqu'un/quelqu'une a une idée, je suis preneur !!
Merci de m'avoir lu
A+
-- ____ ( O | O ) -- _oooO_ JLuc _Oooo_
O-O
JLuc
*Bonjour V!nce*, Dans ce cas, essaie peut etre avec :
*DriveExists, méthode*
Description
Renvoie la valeur True si le lecteur spécifié existe, False dans le cas contraire.
Syntaxe
object.DriveExists(drivespec)
La syntaxe de la méthode DriveExists comprend les éléments suivants :
Élément Description object Correspond toujours au nom d'un objet FileSystemObject. drivespec Une lettre désignant un lecteur ou une spécification de chemin complète.
Remarques
Pour les lecteurs de supports amovibles, la méthode DriveExists renvoie True même si le lecteur ne contient pas de support. Utilisez la propriété IsReady de l'objet Drive pour déterminer si un lecteur est prêt.
Ou :
*FolderExists, méthode*
Description
Renvoie la valeur True si un dossier spécifié existe, False dans le cas contraire.
Syntaxe
object.FolderExists(folderspec)
La syntaxe de la méthode FolderExists comprend les éléments suivants :
Élément Description object Correspond toujours au nom d'un objet FileSystemObject. folderspec Le nom du dossier dont l'existence doit être déterminée. Une spécification de chemin complet (absolue ou relative) est nécessaire si le dossier ne se trouve pas dans le dossier courant.
Salut,
Ok, effectivement j'ai essayé ta sub et ça fonctionne chez moi aussi, sauf quand tu "vise" un disque qui n'existe pas et c'est en fait ce que je veux faire. J'essaie de pointer vers un répertoire réseau, si je ne le trouve pas ( dir(réseau) = "") je pointe alors vers un autre emplacement sur un disque local...
Y a t'il un moyen de détecter ou non la présence d'un répertoire autrement que par l'instruction dir ???
En tout cas merci de ta réponse qui m'a permis d'éclaircir un peu le problème !
A+
"JLuc" a écrit dans le message de news:
*Bonjour V!nce*, J'ai fais un petit test : XP Home, Excel 2000 Sub test() fichiers = Dir(ActiveWorkbook.Path & "*.ppt") If fichiers = "" Then MsgBox "Pas de fichiers !" Else MsgBox fichiers End If End Sub Ca marche ! Pas d'erreurs
Bonjour à toutes et tous.
J'ai quelques petits soucis avec l'instruction "Dir" qui ne semble pas réagir de la même façon selon le système d'exploitation. Lorsqu'elle est exécutée sur un dossier inexistant sous W2000Pro elle renvoie bien "Vide" ( ce qu'elle est censée faire d'après l'aide et ce que j'aimerai bien qu'elle fasse tout le temps !!!!) Sous XP la même instruction bug invariablement pour cause de conflit de type.
Si quelqu'un/quelqu'une a une idée, je suis preneur !!
Merci de m'avoir lu
A+
-- ____ ( O | O ) -- _oooO_ JLuc _Oooo_
O-O
-- ____ ( O | O ) -- _oooO_ JLuc _Oooo_
O-O
*Bonjour V!nce*,
Dans ce cas, essaie peut etre avec :
*DriveExists, méthode*
Description
Renvoie la valeur True si le lecteur spécifié existe, False dans le cas
contraire.
Syntaxe
object.DriveExists(drivespec)
La syntaxe de la méthode DriveExists comprend les éléments suivants :
Élément Description
object Correspond toujours au nom d'un objet FileSystemObject.
drivespec Une lettre désignant un lecteur ou une spécification de
chemin complète.
Remarques
Pour les lecteurs de supports amovibles, la méthode DriveExists renvoie
True même si le lecteur ne contient pas de support. Utilisez la
propriété IsReady de l'objet Drive pour déterminer si un lecteur est
prêt.
Ou :
*FolderExists, méthode*
Description
Renvoie la valeur True si un dossier spécifié existe, False dans le cas
contraire.
Syntaxe
object.FolderExists(folderspec)
La syntaxe de la méthode FolderExists comprend les éléments suivants :
Élément Description
object Correspond toujours au nom d'un objet FileSystemObject.
folderspec Le nom du dossier dont l'existence doit être déterminée. Une
spécification de chemin complet (absolue ou relative) est nécessaire si
le dossier ne se trouve pas dans le dossier courant.
Salut,
Ok, effectivement j'ai essayé ta sub et ça fonctionne chez moi aussi, sauf
quand tu "vise" un disque qui n'existe pas et c'est en fait ce que je veux
faire.
J'essaie de pointer vers un répertoire réseau, si je ne le trouve pas (
dir(réseau) = "") je pointe alors vers un autre emplacement sur un disque
local...
Y a t'il un moyen de détecter ou non la présence d'un répertoire autrement
que par l'instruction dir ???
En tout cas merci de ta réponse qui m'a permis d'éclaircir un peu le problème
!
A+
"JLuc" <ns.jeanluc.laurent@free.fr.ns> a écrit dans le message de news:
mn.6c3d7d63a7ae0b89.40692@free.fr.ns...
*Bonjour V!nce*,
J'ai fais un petit test : XP Home, Excel 2000
Sub test()
fichiers = Dir(ActiveWorkbook.Path & "*.ppt")
If fichiers = "" Then
MsgBox "Pas de fichiers !"
Else
MsgBox fichiers
End If
End Sub
Ca marche ! Pas d'erreurs
Bonjour à toutes et tous.
J'ai quelques petits soucis avec l'instruction "Dir" qui ne semble pas
réagir de la même façon selon le système d'exploitation.
Lorsqu'elle est exécutée sur un dossier inexistant sous W2000Pro elle
renvoie bien "Vide" ( ce qu'elle est censée faire d'après l'aide et ce que
j'aimerai bien qu'elle fasse tout le temps !!!!)
Sous XP la même instruction bug invariablement pour cause de conflit de
type.
Si quelqu'un/quelqu'une a une idée, je suis preneur !!
*Bonjour V!nce*, Dans ce cas, essaie peut etre avec :
*DriveExists, méthode*
Description
Renvoie la valeur True si le lecteur spécifié existe, False dans le cas contraire.
Syntaxe
object.DriveExists(drivespec)
La syntaxe de la méthode DriveExists comprend les éléments suivants :
Élément Description object Correspond toujours au nom d'un objet FileSystemObject. drivespec Une lettre désignant un lecteur ou une spécification de chemin complète.
Remarques
Pour les lecteurs de supports amovibles, la méthode DriveExists renvoie True même si le lecteur ne contient pas de support. Utilisez la propriété IsReady de l'objet Drive pour déterminer si un lecteur est prêt.
Ou :
*FolderExists, méthode*
Description
Renvoie la valeur True si un dossier spécifié existe, False dans le cas contraire.
Syntaxe
object.FolderExists(folderspec)
La syntaxe de la méthode FolderExists comprend les éléments suivants :
Élément Description object Correspond toujours au nom d'un objet FileSystemObject. folderspec Le nom du dossier dont l'existence doit être déterminée. Une spécification de chemin complet (absolue ou relative) est nécessaire si le dossier ne se trouve pas dans le dossier courant.
Salut,
Ok, effectivement j'ai essayé ta sub et ça fonctionne chez moi aussi, sauf quand tu "vise" un disque qui n'existe pas et c'est en fait ce que je veux faire. J'essaie de pointer vers un répertoire réseau, si je ne le trouve pas ( dir(réseau) = "") je pointe alors vers un autre emplacement sur un disque local...
Y a t'il un moyen de détecter ou non la présence d'un répertoire autrement que par l'instruction dir ???
En tout cas merci de ta réponse qui m'a permis d'éclaircir un peu le problème !
A+
"JLuc" a écrit dans le message de news:
*Bonjour V!nce*, J'ai fais un petit test : XP Home, Excel 2000 Sub test() fichiers = Dir(ActiveWorkbook.Path & "*.ppt") If fichiers = "" Then MsgBox "Pas de fichiers !" Else MsgBox fichiers End If End Sub Ca marche ! Pas d'erreurs
Bonjour à toutes et tous.
J'ai quelques petits soucis avec l'instruction "Dir" qui ne semble pas réagir de la même façon selon le système d'exploitation. Lorsqu'elle est exécutée sur un dossier inexistant sous W2000Pro elle renvoie bien "Vide" ( ce qu'elle est censée faire d'après l'aide et ce que j'aimerai bien qu'elle fasse tout le temps !!!!) Sous XP la même instruction bug invariablement pour cause de conflit de type.
Si quelqu'un/quelqu'une a une idée, je suis preneur !!
Merci de m'avoir lu
A+
-- ____ ( O | O ) -- _oooO_ JLuc _Oooo_
O-O
-- ____ ( O | O ) -- _oooO_ JLuc _Oooo_
O-O
V!nce
Tout ça m'a l'air pas mal du tout !!! Je m'en vais essayer ça de ce pas
En tout cas merci A+
"JLuc" a écrit dans le message de news:
*Bonjour V!nce*, Dans ce cas, essaie peut etre avec :
*DriveExists, méthode*
Description
Renvoie la valeur True si le lecteur spécifié existe, False dans le cas contraire.
Syntaxe
object.DriveExists(drivespec)
La syntaxe de la méthode DriveExists comprend les éléments suivants :
Élément Description object Correspond toujours au nom d'un objet FileSystemObject. drivespec Une lettre désignant un lecteur ou une spécification de chemin complète.
Remarques
Pour les lecteurs de supports amovibles, la méthode DriveExists renvoie True même si le lecteur ne contient pas de support. Utilisez la propriété IsReady de l'objet Drive pour déterminer si un lecteur est prêt.
Ou :
*FolderExists, méthode*
Description
Renvoie la valeur True si un dossier spécifié existe, False dans le cas contraire.
Syntaxe
object.FolderExists(folderspec)
La syntaxe de la méthode FolderExists comprend les éléments suivants :
Élément Description object Correspond toujours au nom d'un objet FileSystemObject. folderspec Le nom du dossier dont l'existence doit être déterminée. Une spécification de chemin complet (absolue ou relative) est nécessaire si le dossier ne se trouve pas dans le dossier courant.
Salut,
Ok, effectivement j'ai essayé ta sub et ça fonctionne chez moi aussi, sauf quand tu "vise" un disque qui n'existe pas et c'est en fait ce que je veux faire. J'essaie de pointer vers un répertoire réseau, si je ne le trouve pas ( dir(réseau) = "") je pointe alors vers un autre emplacement sur un disque local...
Y a t'il un moyen de détecter ou non la présence d'un répertoire autrement que par l'instruction dir ???
En tout cas merci de ta réponse qui m'a permis d'éclaircir un peu le problème !
A+
"JLuc" a écrit dans le message de news:
*Bonjour V!nce*, J'ai fais un petit test : XP Home, Excel 2000 Sub test() fichiers = Dir(ActiveWorkbook.Path & "*.ppt") If fichiers = "" Then MsgBox "Pas de fichiers !" Else MsgBox fichiers End If End Sub Ca marche ! Pas d'erreurs
Bonjour à toutes et tous.
J'ai quelques petits soucis avec l'instruction "Dir" qui ne semble pas réagir de la même façon selon le système d'exploitation. Lorsqu'elle est exécutée sur un dossier inexistant sous W2000Pro elle renvoie bien "Vide" ( ce qu'elle est censée faire d'après l'aide et ce que j'aimerai bien qu'elle fasse tout le temps !!!!) Sous XP la même instruction bug invariablement pour cause de conflit de type.
Si quelqu'un/quelqu'une a une idée, je suis preneur !!
Merci de m'avoir lu
A+
-- ____ ( O | O ) -- _oooO_ JLuc _Oooo_
O-O
-- ____ ( O | O ) -- _oooO_ JLuc _Oooo_
O-O
Tout ça m'a l'air pas mal du tout !!!
Je m'en vais essayer ça de ce pas
En tout cas merci
A+
"JLuc" <ns.jeanluc.laurent@free.fr.ns> a écrit dans le message de news:
mn.72217d633970df63.40692@free.fr.ns...
*Bonjour V!nce*,
Dans ce cas, essaie peut etre avec :
*DriveExists, méthode*
Description
Renvoie la valeur True si le lecteur spécifié existe, False dans le cas
contraire.
Syntaxe
object.DriveExists(drivespec)
La syntaxe de la méthode DriveExists comprend les éléments suivants :
Élément Description
object Correspond toujours au nom d'un objet FileSystemObject.
drivespec Une lettre désignant un lecteur ou une spécification de chemin
complète.
Remarques
Pour les lecteurs de supports amovibles, la méthode DriveExists renvoie
True même si le lecteur ne contient pas de support. Utilisez la propriété
IsReady de l'objet Drive pour déterminer si un lecteur est prêt.
Ou :
*FolderExists, méthode*
Description
Renvoie la valeur True si un dossier spécifié existe, False dans le cas
contraire.
Syntaxe
object.FolderExists(folderspec)
La syntaxe de la méthode FolderExists comprend les éléments suivants :
Élément Description
object Correspond toujours au nom d'un objet FileSystemObject.
folderspec Le nom du dossier dont l'existence doit être déterminée. Une
spécification de chemin complet (absolue ou relative) est nécessaire si le
dossier ne se trouve pas dans le dossier courant.
Salut,
Ok, effectivement j'ai essayé ta sub et ça fonctionne chez moi aussi,
sauf quand tu "vise" un disque qui n'existe pas et c'est en fait ce que
je veux faire.
J'essaie de pointer vers un répertoire réseau, si je ne le trouve pas (
dir(réseau) = "") je pointe alors vers un autre emplacement sur un disque
local...
Y a t'il un moyen de détecter ou non la présence d'un répertoire
autrement que par l'instruction dir ???
En tout cas merci de ta réponse qui m'a permis d'éclaircir un peu le
problème !
A+
"JLuc" <ns.jeanluc.laurent@free.fr.ns> a écrit dans le message de news:
mn.6c3d7d63a7ae0b89.40692@free.fr.ns...
*Bonjour V!nce*,
J'ai fais un petit test : XP Home, Excel 2000
Sub test()
fichiers = Dir(ActiveWorkbook.Path & "*.ppt")
If fichiers = "" Then
MsgBox "Pas de fichiers !"
Else
MsgBox fichiers
End If
End Sub
Ca marche ! Pas d'erreurs
Bonjour à toutes et tous.
J'ai quelques petits soucis avec l'instruction "Dir" qui ne semble pas
réagir de la même façon selon le système d'exploitation.
Lorsqu'elle est exécutée sur un dossier inexistant sous W2000Pro elle
renvoie bien "Vide" ( ce qu'elle est censée faire d'après l'aide et ce
que j'aimerai bien qu'elle fasse tout le temps !!!!)
Sous XP la même instruction bug invariablement pour cause de conflit de
type.
Si quelqu'un/quelqu'une a une idée, je suis preneur !!
Tout ça m'a l'air pas mal du tout !!! Je m'en vais essayer ça de ce pas
En tout cas merci A+
"JLuc" a écrit dans le message de news:
*Bonjour V!nce*, Dans ce cas, essaie peut etre avec :
*DriveExists, méthode*
Description
Renvoie la valeur True si le lecteur spécifié existe, False dans le cas contraire.
Syntaxe
object.DriveExists(drivespec)
La syntaxe de la méthode DriveExists comprend les éléments suivants :
Élément Description object Correspond toujours au nom d'un objet FileSystemObject. drivespec Une lettre désignant un lecteur ou une spécification de chemin complète.
Remarques
Pour les lecteurs de supports amovibles, la méthode DriveExists renvoie True même si le lecteur ne contient pas de support. Utilisez la propriété IsReady de l'objet Drive pour déterminer si un lecteur est prêt.
Ou :
*FolderExists, méthode*
Description
Renvoie la valeur True si un dossier spécifié existe, False dans le cas contraire.
Syntaxe
object.FolderExists(folderspec)
La syntaxe de la méthode FolderExists comprend les éléments suivants :
Élément Description object Correspond toujours au nom d'un objet FileSystemObject. folderspec Le nom du dossier dont l'existence doit être déterminée. Une spécification de chemin complet (absolue ou relative) est nécessaire si le dossier ne se trouve pas dans le dossier courant.
Salut,
Ok, effectivement j'ai essayé ta sub et ça fonctionne chez moi aussi, sauf quand tu "vise" un disque qui n'existe pas et c'est en fait ce que je veux faire. J'essaie de pointer vers un répertoire réseau, si je ne le trouve pas ( dir(réseau) = "") je pointe alors vers un autre emplacement sur un disque local...
Y a t'il un moyen de détecter ou non la présence d'un répertoire autrement que par l'instruction dir ???
En tout cas merci de ta réponse qui m'a permis d'éclaircir un peu le problème !
A+
"JLuc" a écrit dans le message de news:
*Bonjour V!nce*, J'ai fais un petit test : XP Home, Excel 2000 Sub test() fichiers = Dir(ActiveWorkbook.Path & "*.ppt") If fichiers = "" Then MsgBox "Pas de fichiers !" Else MsgBox fichiers End If End Sub Ca marche ! Pas d'erreurs
Bonjour à toutes et tous.
J'ai quelques petits soucis avec l'instruction "Dir" qui ne semble pas réagir de la même façon selon le système d'exploitation. Lorsqu'elle est exécutée sur un dossier inexistant sous W2000Pro elle renvoie bien "Vide" ( ce qu'elle est censée faire d'après l'aide et ce que j'aimerai bien qu'elle fasse tout le temps !!!!) Sous XP la même instruction bug invariablement pour cause de conflit de type.
Si quelqu'un/quelqu'une a une idée, je suis preneur !!
