Bonjour,
Cette macro fonctionne bien quand j'ai seulement un fichier Excel ouvert : elle permet de fermer la fenêtre du dossier nommé "Expérimentation - Septembre 2015" qui est en fait un dossier qui se trouve sur un site de collaboration dans Sharepoint. Dès que j'ai un autre fichier Excel ouvert, elle ne fonctionne plus: la fenêtre reste ouverte et il n'y a aucun message d'erreur. Pourtant, il ne peut pas y avoir confusion avec le nouveau fichier Excel ouvert puisque qu'il n'est pas placé dans le même dossier et le nom de son dossier est différent. Comment puis-je faire pour faire en sorte que ma macro fonctionne tout le temps?


Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
Sub OuvrirFenetreAvecDossier()
 
Shell "explorer.exe \\sharepoint.ca \Expérimentation - Septembre 2015", vbMinimizedFocus
Application.Wait (Now + TimeValue("0:00:04"))
HandleNum = FindWindowA(vbNullString, "Expérimentation - Septembre 2015")
ShowWindow HandleNum, SW_HIDE
 
 
End Sub