Plantage Workbook_open

bonjour, j'ai un plantage

Sub Workbook_open()

Workbooks.Open Filename:= _

"\\atlas.edf.fr\CO\45dam-dpn\restreint.007\ps.004\Pap_pcp\LISTES\Planning_EP.xlsm"

Windows("Planning equipe 3x8 2019.xlsm").Activate

UserForm1.Show

Application.CutCopyMode = False

End Sub

merci

Bonjour chris45,

d'abord, vérifie soigneusement le nom des fichiers (y compris le chemin éventuel) :

1) "\\atlas.edf.fr\CO\45dam-dpn\restreint.007\ps.004\Pap_pcp\LISTES\Planning_EP.xlsm" : peut-être y'a oubli d'un dossier ?

2) "Planning equipe 3x8 2019.xlsm" : c'est peut-être : "Planning équipe 3x8 2019.xlsm" ? ou une autre année que 2019 ?

à tout hasard : si le classeur dans lequel tu as placé ta sub Workbook_Open() est le fichier "Planning equipe 3x8 2019.xlsm", remplace Windows("Planning equipe 3x8 2019.xlsm").Activate par ThisWorkbook.Activate

si ces infos t'ont permis de résoudre ton problème, merci de passer le sujet en résolu : clic sur le bouton (coin haut droit).

sinon, donne plus de précision sur ton plantage : quel est le message d'erreur ? quelle ligne de code VBA est mise en jaune ?

dhany

Salut,

Question bête mais tu n’essayes pas d’ouvrir le fichier que tu viens d’ouvrir justement à tout hasard?

Car ouvrir un autre fichier en ouvrant un fichier c’est une utilisation peu banale je trouve donc le fait d'ouvrir un fichier dans un workbook_open() me pertube ^^

ECG