ÔTER PROTECTION FEUILLE D'UN CLASSEUR EXCEL & TROUVER MOT DE PASSE FICHIER

astouz2000k Messages postés 50 Date d'inscription samedi 2 juillet 2005 Statut Membre Dernière intervention 2 mai 2013 - 23 nov. 2009 à 20:46
stef68600 Messages postés 42 Date d'inscription vendredi 31 juillet 2009 Statut Membre Dernière intervention 26 juillet 2013 - 22 mars 2012 à 22:12
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/50883-oter-protection-feuille-d-un-classeur-excel-trouver-mot-de-passe-fichier

stef68600 Messages postés 42 Date d'inscription vendredi 31 juillet 2009 Statut Membre Dernière intervention 26 juillet 2013
22 mars 2012 à 22:12
Bonjour,
il faut vbNet et compiler le projet pour avoir un exe.
je ne suis pas certain que cela fonctionne avec excel 2010.
et marche pas avec un xslx
Cordialement.
MagaDit Messages postés 1 Date d'inscription mercredi 21 mars 2012 Statut Membre Dernière intervention 21 mars 2012
21 mars 2012 à 15:05
Bonjour...
Pareil que FERGUSEB, J'ai un classeur de x feuilles protégées par le même mot de passe et sur une il ne marche pas ! j'ai téléchargé votre appli mais comment la mettre en exécution ??? moi pas savoir... je ne sais pas si j'ai Framework par contre.
Cordialement,
MagaDit
ferguseb Messages postés 2 Date d'inscription mardi 28 octobre 2003 Statut Membre Dernière intervention 16 février 2012
16 févr. 2012 à 02:47
Bonjour, je n'y connais absolument rien mais j'ai égaré mon mot de passe pour mon fichier excel... Je ne sais pas quoi faire avec le fichier téléchargé. Pouvez-vous me dire la démarche pour faire fonctionner la macro svp car je suis perdu. Merci beaucoup
stef68600 Messages postés 42 Date d'inscription vendredi 31 juillet 2009 Statut Membre Dernière intervention 26 juillet 2013
30 nov. 2009 à 19:25
désolé mais ça m'énerve de voir des commentaires comme robroc.

je lui est donc envoyé un petit mail:

Bonjour robroc,

suite à votre commentaire très constructif (dommage pour votre 1er message depuis 2ans), je me suis permis d'apporter le mien afin de vous éclairer.

1) vous n'avez pas regardé la source et regardé l'historique.
2) la source est déposé sous : Accueil > Code > Optimisation du code ...
3) je ne me suis jamais attribué le code de déprotection d'une feuille et encore moins sont explication.

ce que j'ai fait c'est uniquement un tout en un en VB et non en VBA.

Cordialement.
stef68600 Messages postés 42 Date d'inscription vendredi 31 juillet 2009 Statut Membre Dernière intervention 26 juillet 2013
30 nov. 2009 à 18:49
Bonjour robroc,

je pense que tu as survolé ma source...

que fait en faite le prog :

1) il recherche un mot de passe si le fichier est protégé et le donne
2) il recherche un mot de passe si le fichier est protégé en lecture seule et le donne
3) il fait exactement ce que fait http://www.codes-sources.com/code.aspx?ID=36857 (deprotege les feuilles du classeur) !

donc il n'est pas juste de dire "Ce sujet a déjà fait l'objet d'une publication géniale le :02/04/2006" puisque le dit sujet est incapable de fonctionner si le point 1 et 2 est inconnu.

pour citer US-30 qui à laisser un commentaire de cette source :
"Petite précision au passage... La fonction n'est censée supprimer la protection en lecture d'un fichier Excel, mais supprime la protection d'une feuille ou d'un classeur d'Excel. Ce qui n'est pas la même chose !"

cordialement.
Robroc Messages postés 1 Date d'inscription lundi 5 novembre 2007 Statut Membre Dernière intervention 30 novembre 2009
30 nov. 2009 à 07:50
Ce sujet a déjà fait l'objet d'une publication géniale le :02/04/2006, qui permet de tout déverrouiller y compris le VBA voici le lien:

http://www.codes-sources.com/code.aspx?ID=36857
stef68600 Messages postés 42 Date d'inscription vendredi 31 juillet 2009 Statut Membre Dernière intervention 26 juillet 2013
27 nov. 2009 à 21:32
Merci ASTOUZ2000K, j'ai ajouté ta suggestion et d'autres choses...
astouz2000k Messages postés 50 Date d'inscription samedi 2 juillet 2005 Statut Membre Dernière intervention 2 mai 2013
24 nov. 2009 à 23:54
pour le nom des feuilles j'ai modifier ton code pour recuperer le nom de l'onglet comme ceci :

TextBox1.Text = TextBox1.Text & vbCrLf & "feuille : " & oSheet(Nbsheet).Name() & " enlevement clé en cours..."

bonne soirée.
stef68600 Messages postés 42 Date d'inscription vendredi 31 juillet 2009 Statut Membre Dernière intervention 26 juillet 2013
24 nov. 2009 à 23:01
ah oui j'ai pas fait attention effectivement les numéros sont inversés.
je vais revoir ça demain et guider au niveau interface.

merci pour les remarques
astouz2000k Messages postés 50 Date d'inscription samedi 2 juillet 2005 Statut Membre Dernière intervention 2 mai 2013
24 nov. 2009 à 20:14
oui c'est sur mais j'avais pas beaucoup de temps pour en dire plus.

c'est bon cela fonctionne...

par contre les numeros des feuilles sont inversé et l'interface est pas tres clair.

sinon c'est une tres bonne base.
stef68600 Messages postés 42 Date d'inscription vendredi 31 juillet 2009 Statut Membre Dernière intervention 26 juillet 2013
24 nov. 2009 à 15:57
voila un commentaire bien stérile...

version excel ?
les mini requis ?
qu'elle est l'erreur ?

etc..
astouz2000k Messages postés 50 Date d'inscription samedi 2 juillet 2005 Statut Membre Dernière intervention 2 mai 2013
23 nov. 2009 à 20:46
Bonjour,

cela ne marche pas chez moi.
Rejoignez-nous