chewi
XLDnaute Junior
Bonjour à tout le forum,
Je crée un fichier, via un bouton de commande d'un UserForm, portant le nom de ma ComboBox.
Problème: dans le cas où le classeur existe déjà, je souhaiterais qu' Excel ne m'affiche pas de message " Ce fichier existe déjà, désirez-vous le remplacer" mais affiche une MsgBox que je crée moi-même "Ce fichier existe déjà, voulez-vous l'ouvrir?" oui - non
oui: l'ouvrir
non: revenir à ma ComboBox de départ
Quelque chose du genre:
Il faut en gros tester si le fichier existe ou pas.
S'il existe, il se trouve obligatoirement sur mon Desktop.
Mais je ne sais pas quel code dois-je écrire pour tester l'existence de mon fichier?
Il faut apparement utiliser la fonction dir mais je ne sais comment l'utiliser
Merci à vous
Chewi
Je crée un fichier, via un bouton de commande d'un UserForm, portant le nom de ma ComboBox.
Problème: dans le cas où le classeur existe déjà, je souhaiterais qu' Excel ne m'affiche pas de message " Ce fichier existe déjà, désirez-vous le remplacer" mais affiche une MsgBox que je crée moi-même "Ce fichier existe déjà, voulez-vous l'ouvrir?" oui - non
oui: l'ouvrir
non: revenir à ma ComboBox de départ
Quelque chose du genre:
Code:
If "C:\Documents and Settings\moi\Desktop\" & ComboBox1 exist Then
Open "C:\Documents and Settings\moi\Desktop\" & ComboBox1
Else Set wk = Workbooks.Add
wk.SaveAs ...
...
End If
Il faut en gros tester si le fichier existe ou pas.
S'il existe, il se trouve obligatoirement sur mon Desktop.
Mais je ne sais pas quel code dois-je écrire pour tester l'existence de mon fichier?
Il faut apparement utiliser la fonction dir mais je ne sais comment l'utiliser
Merci à vous
Chewi