Discussion :

[roseau]

bonjour,

je souhaite enregistrer un classeur excel(que l'on apellera B) depuis un autre classeur excel (que l'on appellera A).

tout est par programmation VBA dans A

B est ouvert en modification

je modifie des cellules de B via A (en fait je modifie des mots de passe ou des droits d'accès ou j'ajoute ou supprime des utilisateurs)
jusque là pas de problème.

je quitte A (on ferme et on enregistre A et B), les modifications ne sont pas prises en compte.

j'ai essayer B.save
B.saveas (B)
B.close savechanges:=true
à chaque fois Excel m'envoie un message (que je sais bloquer) me demandant confirmation.je répond oui à chaque fois

A et B sont fermés. Si je réouvre A ou B aucune de mes modifications ne sont prises en compte.

j'ai même essayer d'appeler depuis A des auto_macro de B sans succès.

En fait mon erreur ressemble un peu à B qui serait en lecture seule or ce n'est pas le cas.

soit je fais quelque chose de faux, soit je n'utilise pas les bons code,...

merci de m'aider.
je ne suis en mesure de répondre et tester que du lundi au vendredi courant de la journée

[helios77]

PEut être bête qce que je vais te dire mais çà peut être une erreur

Est-ce que par hasard, tu ne ferais pas ton A.quit avant le B.Save ??
Si c'est le cas, c'est normal qu'il enregistre rien car il quitte tout avant la sauvegarde.....

Fait d'abord les sauvegardesavant de quitter ton fichier

[roseau]

non je l'ai vérifier. j'y avais déjà pensé mais merci d'avoir essayer

[helios77]

Essaie de mettre en commentaire la partie A.Quit et vérifie si ton classeur B est bien sauvegardé avant de tout fermé...
Es-tu sûr du chemin où tu le sauvegardes ????

[alsimbad]

c'est peut etre une histoire de priorité ou d'activeworkbook
puisque tu fermes tout en même temps tu peux essayer ça

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Dim Wb As Workbook
For Each Wb In Application.Workbooks
    If Not Wb.Name = ActiveWorkbook.Name Then Wb.Close True
Next Wb

là, il va te fermer (et enregistrer)tout classeur excel ouvert à l'exeption du classeur actif, donc ton A, et donc, si ça marche et qu'il enregistre, c'est que ça ne viens pas du classeur B mais de ton code

[roseau]

je vous remercie

j'essaierai lundi et je vous dirais si cela à fonctionner.

merci et bon WE

[AlainTech]

c'est peut etre une histoire de priorité ou d'activeworkbook
puisque tu fermes tout en même temps tu peux essayer ça

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Dim Wb As Workbook
For Each Wb In Application.Workbooks
    If Not Wb.Name = ActiveWorkbook.Name Then Wb.Close True
Next Wb

là, il va te fermer (et enregistrer)tout classeur excel ouvert à l'exeption du classeur actif, donc ton A, et donc, si ça marche et qu'il enregistre, c'est que ça ne viens pas du classeur B mais de ton code

Attention à ne pas confondre le classeur actif (celui qui est affiché, qui a le focus) et le classeur où tourne la macro.
Celui où tourne le code s'appelle ThisWorkbook!

[alsimbad]

yes, oeuf corse
c'est this workbook

[roseau]

c'était bien une histoire de priorité comme vous l'aviez dit.
je pensais qu'en étant sur une feuille active on pouvait l'enregistrer

mais apparement non.

merci à tous