Ouvrir un word protégé avec VBA

Résolu/Fermé
PSM - 28 juin 2021 à 17:13
 PSM - 28 juin 2021 à 18:37
Bonjour,

J'ai trouver de code VBA sur internet, il est dit qu'il peu ouvrir un fichier sélectionné même si on ne connais pas le mdp. Je suis sceptique.

Sinon j'ai une erreur à la ligne
Line2: If Error Then GoTo Line1
mais je ne vois pas le pblm.

Sub test()
Dim i As Long
i = 0
Dim FileName As String
Application.FileDialog(msoFileDialogOpen).Show
FileName = Application.FileDialog(msoFileDialogOpen).SelectedItems(1)
ScreenUpdating = False
Line2: If Error Then GoTo Line1
Documents.Open FileName, , True, , i & ""
MsgBox "The password is" & i
Application.ScreenUpdating = True
Exit Sub
Line1: i = i + 1
Resume Line2
ScreenUpdating = True
End Sub


Merci d'avance pour votre aide,
PSM

Configuration: Windows / Firefox 89.0
A voir également:

2 réponses

michel_m Messages postés 16591 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 3 février 2023 3 288
28 juin 2021 à 18:00
0
Je ne vous demande pas de trouver le mot de passe mais de m’expliquer pourquoi ma ligne de code ne marche pas et idéalement comment faire pour que ça marche. x)

PSM
0