Ouverture fichier Excel protégé sous VB6

Résolu/Fermé
wa7ch3000 Messages postés 336 Date d'inscription jeudi 21 août 2008 Statut Membre Dernière intervention 19 juillet 2015 - 26 mai 2010 à 15:32
wa7ch3000 Messages postés 336 Date d'inscription jeudi 21 août 2008 Statut Membre Dernière intervention 19 juillet 2015 - 26 mai 2010 à 17:06
Bonjour

Je souhaite utiliser une fichier excel comme mini base de données dans mon application écrite en Visual Basic,
je sait comment piloter excel depuis VB6 mais ca ne fonctionne que si la fichier excel n'est pas protéger par mot de passe
alors, pourrez vous SVP m'aider dans ces points :

1 - ouvrir un fichier Excel protégé par mot de passe
2 - puis de modifier une donnée
3 - refermer ce fichier en le protégeant à nouveau par le même mot de
passe
J'ai déjà écrit la partie 2 qui concerne mes besoins.

tout ce que je trouve dans les forums, c'est une explication pour
l'ouverture des feuilles ou onglets protégés par un mot de passe dans
un fichier ; alors que mon souhait est l'ouverture du fichier.
A voir également:

4 réponses

lermite222 Messages postés 8702 Date d'inscription dimanche 8 avril 2007 Statut Contributeur Dernière intervention 22 janvier 2020 1 190
26 mai 2010 à 15:38
Bonjour,
Et tu connais le mot de passe ?
A+
1
lermite222 Messages postés 8702 Date d'inscription dimanche 8 avril 2007 Statut Contributeur Dernière intervention 22 janvier 2020 1 190
Modifié par lermite222 le 26/05/2010 à 16:05
Workbooks.Open "NomDuClasseur", Password:="Code"

Bien sûr, WorkBook doit être rempalcer par le nom que tu a donné à l'objet WoorkBook.
A+
L'expérience instruit plus sûrement que le conseil. (André Gide)
Si tu te cogne à un pot et que ça sonne creux, c'est pas forcément le pot qui est vide. ;-)(Confucius)
1
wa7ch3000 Messages postés 336 Date d'inscription jeudi 21 août 2008 Statut Membre Dernière intervention 19 juillet 2015 17
26 mai 2010 à 16:33
merci,
votre bout de code est correcte avec une petite modification :
Set wbExcel = appExcel.Workbooks.Open("C:\BD.xls", Password:="XXXXXXXXXX")

mais la problème c'est que si je ferme l'application tous les données que j'ai écrit dans mon fichier excel serons perdu :(


y a t'il une solution ??????
0
wa7ch3000 Messages postés 336 Date d'inscription jeudi 21 août 2008 Statut Membre Dernière intervention 19 juillet 2015 17
26 mai 2010 à 16:42
plutot, si je ferme l'application elle m'affiche un message voulez vous enregistrer ??

je veux que l'enregistrement soit automatique, sans confirmation !!!!!!!
0
lermite222 Messages postés 8702 Date d'inscription dimanche 8 avril 2007 Statut Contributeur Dernière intervention 22 janvier 2020 1 190
26 mai 2010 à 16:44
Comment ça perdue, tu n'a que de le sauver avant de le fermer !!!
0
lermite222 Messages postés 8702 Date d'inscription dimanche 8 avril 2007 Statut Contributeur Dernière intervention 22 janvier 2020 1 190
26 mai 2010 à 16:46
wbExcel .save
0
wa7ch3000 Messages postés 336 Date d'inscription jeudi 21 août 2008 Statut Membre Dernière intervention 19 juillet 2015 17
26 mai 2010 à 16:50
merci beaucoup lermite222 pour votre assistance :)

Résolu
0
lermite222 Messages postés 8702 Date d'inscription dimanche 8 avril 2007 Statut Contributeur Dernière intervention 22 janvier 2020 1 190
26 mai 2010 à 16:55
Alors tu dois spécifier où..
wbExcel .saveAs "C:\Répertoir\NomFichier.xls"
1
wa7ch3000 Messages postés 336 Date d'inscription jeudi 21 août 2008 Statut Membre Dernière intervention 19 juillet 2015 17
26 mai 2010 à 17:06
oui oui,
merci
0
wa7ch3000 Messages postés 336 Date d'inscription jeudi 21 août 2008 Statut Membre Dernière intervention 19 juillet 2015 17
26 mai 2010 à 15:43
Rebonjour,
merci pour votre réponse rapide :),
donc, bien sure que oui, moi j'ai créer la fichier

j
0