Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
michdenis
Bonjour André,
Ceci peut toujours t'aider :
On Error Resume Next Set a = Workbooks.Open("c:a motdepasse", , , , "mds")
mds = mot de passe.
Si le mot de passe n'est pas valide, le classeur ne s'ouvre pas et tu n'as pas de message d'erreur concernant le mauvais mot de passe à cause de On error resume next et la procédure va continuer de s'exécuter ....au besoin....
Salutations!
<andre.l' a écrit dans le message de news: Bonjour,
J'aimerais savoir, par VBA, si un fichier contient un password. Si oui, je ne fait rien, autrement, j'ouvre le fichier.
ex:
If fichier ne contient pas de password then Ouvre le fichier End if
Est-ce possible? André
Bonjour André,
Ceci peut toujours t'aider :
On Error Resume Next
Set a = Workbooks.Open("c:a motdepasse", , , , "mds")
mds = mot de passe.
Si le mot de passe n'est pas valide, le classeur ne s'ouvre pas et
tu n'as pas de message d'erreur concernant le mauvais mot de
passe à cause de On error resume next et la procédure va
continuer de s'exécuter ....au besoin....
Salutations!
<andre.l'hoir@ext.cec.eu.int> a écrit dans le message de news: dqnkou0l3m@drn.newsguy.com...
Bonjour,
J'aimerais savoir, par VBA, si un fichier contient un password.
Si oui, je ne fait rien, autrement, j'ouvre le fichier.
ex:
If fichier ne contient pas de password then
Ouvre le fichier
End if
On Error Resume Next Set a = Workbooks.Open("c:a motdepasse", , , , "mds")
mds = mot de passe.
Si le mot de passe n'est pas valide, le classeur ne s'ouvre pas et tu n'as pas de message d'erreur concernant le mauvais mot de passe à cause de On error resume next et la procédure va continuer de s'exécuter ....au besoin....
Salutations!
<andre.l' a écrit dans le message de news: Bonjour,
J'aimerais savoir, par VBA, si un fichier contient un password. Si oui, je ne fait rien, autrement, j'ouvre le fichier.
ex:
If fichier ne contient pas de password then Ouvre le fichier End if
Est-ce possible? André
andre.l'hoir
Bonjour,
Merci, cela fonctionne pour la plus part des fichiers sauf un. Le petit malin à crypté et je pense qu'il a placé une macro que si le mot de passe est mauvais, il ferme tous les fichiers Excel actuellement en mémoire.
Merci quand même.
André
In article <#, michdenis says...
Bonjour André,
Ceci peut toujours t'aider :
On Error Resume Next Set a = Workbooks.Open("c:a motdepasse", , , , "mds")
mds = mot de passe.
Si le mot de passe n'est pas valide, le classeur ne s'ouvre pas et tu n'as pas de message d'erreur concernant le mauvais mot de passe à cause de On error resume next et la procédure va continuer de s'exécuter ....au besoin....
Salutations!
<andre.l' a écrit dans le message de news:
Bonjour,
J'aimerais savoir, par VBA, si un fichier contient un password. Si oui, je ne fait rien, autrement, j'ouvre le fichier.
ex:
If fichier ne contient pas de password then Ouvre le fichier End if
Est-ce possible? André
Bonjour,
Merci, cela fonctionne pour la plus part des fichiers sauf un. Le petit malin à
crypté et je pense qu'il a placé une macro que si le mot de passe est mauvais,
il ferme tous les fichiers Excel actuellement en mémoire.
Merci quand même.
André
In article <#WXhGaRHGHA.1032@TK2MSFTNGP15.phx.gbl>, michdenis says...
Bonjour André,
Ceci peut toujours t'aider :
On Error Resume Next
Set a = Workbooks.Open("c:a motdepasse", , , , "mds")
mds = mot de passe.
Si le mot de passe n'est pas valide, le classeur ne s'ouvre pas et
tu n'as pas de message d'erreur concernant le mauvais mot de
passe à cause de On error resume next et la procédure va
continuer de s'exécuter ....au besoin....
Salutations!
<andre.l'hoir@ext.cec.eu.int> a écrit dans le message de news:
dqnkou0l3m@drn.newsguy.com...
Bonjour,
J'aimerais savoir, par VBA, si un fichier contient un password.
Si oui, je ne fait rien, autrement, j'ouvre le fichier.
ex:
If fichier ne contient pas de password then
Ouvre le fichier
End if
Merci, cela fonctionne pour la plus part des fichiers sauf un. Le petit malin à crypté et je pense qu'il a placé une macro que si le mot de passe est mauvais, il ferme tous les fichiers Excel actuellement en mémoire.
Merci quand même.
André
In article <#, michdenis says...
Bonjour André,
Ceci peut toujours t'aider :
On Error Resume Next Set a = Workbooks.Open("c:a motdepasse", , , , "mds")
mds = mot de passe.
Si le mot de passe n'est pas valide, le classeur ne s'ouvre pas et tu n'as pas de message d'erreur concernant le mauvais mot de passe à cause de On error resume next et la procédure va continuer de s'exécuter ....au besoin....
Salutations!
<andre.l' a écrit dans le message de news:
Bonjour,
J'aimerais savoir, par VBA, si un fichier contient un password. Si oui, je ne fait rien, autrement, j'ouvre le fichier.
ex:
If fichier ne contient pas de password then Ouvre le fichier End if