Mot de passe saisi automatiquement par macro

[Titi]

Bonsoir le forum,

Comment puis-je (par code VBA) ouvrir un fichier .xls en y tapant directement le mot de passe correspondant, lequel est 1971 (donc sans avoir à le taper manuellement..)


Voici mon code actuel, la macro s'arrête au moment de taper le code..
En fait le "SendKeys" n'envoie pas mon code d'accès 1971



===================================================
Sub Prog
' Ouverture du programme Galette de Steph "Campagne 2004-05.xls" sur le poste de STEPH via le serveur
Dim codeacces As Integer
Dim ProgSteph As String
Dim oWbk As Workbook

'Définir le classeur à ouvrir
ProgSteph = "\\Steph\MSLOG\GALETTES\GALETTE\2004-05\Campagne 2004-05.xls"

'Ouvrir le classeur
Set oWbk = Workbooks.Open(ProgSteph)

codeacces = 1971
Application.SendKeys (codeacces)

Exit Sub
===================================================


Merci de votre réponse

Titi

 

[tiotway]

t'as essayé de mettre des "" à 1971 comme ceci :

"1971" ou encore #1971#