R
remes
Guest
Bonjour à tous,
j'ai une macro capricieuse, si je la comprend à peu prés elle est sencé vérifier que le rep devis existe ou qu'il contiend un classeur et si oui : 1er msgbox, si non 2eme msg box puis activation macro ferme classeur.
Ca foctionne comme je veux sur mon pc perso mais à mon boulot, même si le dossier devis n'existe pas dans c: c'est la 1er msgbox qui vient et ce quoi que je met comme chemin. Je comprend pas. QQ'un aurai une explication? et si possible la traduction de cette mcro. D'avance merci.
Private Sub Workbook_Open()
rep = "C:\devis"
With Application.FileSearch
.LookIn = rep
.SearchSubFolders = False
If .Execute Then
MsgBox "SI VOUS RENCONTREZ DES DIFFICULTES D'UTILISATION, veuillez contacter M. DEBUS REMI"
Else
MsgBox "manque coorespondance"
Call FermeClasseur
End If
End With
j'ai une macro capricieuse, si je la comprend à peu prés elle est sencé vérifier que le rep devis existe ou qu'il contiend un classeur et si oui : 1er msgbox, si non 2eme msg box puis activation macro ferme classeur.
Ca foctionne comme je veux sur mon pc perso mais à mon boulot, même si le dossier devis n'existe pas dans c: c'est la 1er msgbox qui vient et ce quoi que je met comme chemin. Je comprend pas. QQ'un aurai une explication? et si possible la traduction de cette mcro. D'avance merci.
Private Sub Workbook_Open()
rep = "C:\devis"
With Application.FileSearch
.LookIn = rep
.SearchSubFolders = False
If .Execute Then
MsgBox "SI VOUS RENCONTREZ DES DIFFICULTES D'UTILISATION, veuillez contacter M. DEBUS REMI"
Else
MsgBox "manque coorespondance"
Call FermeClasseur
End If
End With