Macro qui ouvre un fichier et saisit son mot de passe

Bonjour le Forum,

J'utilise des mots de passe sur certains fichiers qui sont stockés sur mon ordi au bureau mais que j'utilise aussi chez moi.

Mais à la maison je n'ai pas besoin de mot de passe. J'aimerais donc inclure la saisie automatique du mot de passe dans les macros qui ouvrent ces fichiers, dont voici un exemple :

(et merci encore à ceux qui m'avaient aidé ici : https://forum.excel-pratique.com/post388768.html#p388768 )

Sub Fichier_Ouvrir_test()

Dim CL As Workbook

On Error Resume Next
Set CL = Workbooks("test.xls")
If Err <> 0 Then
   Err.Clear
   Workbooks.Open "D:\MEMOS\test.xls"
   Set CL = ActiveWorkbook
End If
CL.Activate
End Sub

Quelqu'un sait-il ce qu'il faudrait ajouter ?

Merci !!!

Bonjour Gloub, bonjour le forum,

Essaie comme ça :

Workbooks.Open "D:\MEMOS\test.xls", Password:="Ton_Mot_de_passe"

Plutôt que de perdre du temps dans les forums, commence par utiliser l'aide VBA. En l'occurrence, sélectionner le mot Open et utiliser la touche [F1]...

Merci ThauThème, ça marche.

Pour ce qui est de regarder dans l'aide, je le fais beaucoup pour Excel, mais pour le VBA je suis très vite largué.

Pour ce coup-ci, j'ai cherché, mais pas su utiliser ce qui m'était proposé...