Enregistrement, fermeture fichier sans messages

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

malabarbe

XLDnaute Occasionnel
Enregistrement, fermeture fichier sans messages - [RESOLU]

Bonjour,

Ce que je voudrais faire, c'est par Macro,
enregistrer et fermer un fichier XLS et ceci
sans les boites de dialogue.

Je m'explique :
1° - J'ouvre 11111.xls (une seule feuille)
2° - Je fais un petit traitement dans cette feuille
3° - Je sélectionne tout
4° - J'ouvre 22222.xls (une seule feuille)
5° - Je colle la copie de "11111.xls"
6° - Enregistrement de 22222.xls
7° - Fermeture de 22222.xls
8° - Retour 11111.xls cellule A1

C'est tout bête, mais je voudrais éviter les messages
lors de l'enregistrement :
1° - Un fichier du mème nom existe, voulez-vous.....
2° - Enregistrer les modifications.....

J'ai fais des recherches, mais les codes sont contradictoires,
et quand ils tournent, j'ai toujours un message sur deux ou
ne me ferme pas le bon classeur !

Un petit coup de main serai le bienvenu

Bonne journée à tous
 
Dernière édition:
Re : Enregistrement, fermeture fichier sans messages

bonjour,

application.displayalerts = false 'à mettre avant le message
et remettre à true après le message

(sinon tu ne verras aucun message d'alerte par la suite et tu risques de louper kkchose

bing, Salut Pierrot

sinon, quand tu as le classeur 2222 actif, tu peux aussi faire : activeworkbook.save, ce qui ne génère pas de message d'erreur et ensuite, activeworkbook.close
 
Dernière édition:
Re : Enregistrement, fermeture fichier sans messages

Bonjour Malabarbe

essaye peut être comme ceci, ferme le classeur1 en enregistrant les modifications :

Code:
Application.DisplayAlerts = False
Workbooks("classeur1.xls").Close True
Application.DisplayAlerts = True

bonne journée
@+
 
Re : Enregistrement, fermeture fichier sans messages

Merci à vous deux pour les conseils

J'ai repris le code de Pierrot93 avec la mème
instruction que mutzik, mais, j'ai une erreur !

Erreur d'exécution 9
L'indice n'appartien pas a la sélection

Ceci à la ligne : Workbooks("C:\22222.xls").Close True
 
Re : Enregistrement, fermeture fichier sans messages

Re

par contre pour enregistrer le classeur actif sous un autre nom, sans message d'alerte, ce code devrait être plus approprié...

Code:
Application.DisplayAlerts = False
ActiveWorkbook.SaveAs "C:\22222.xls"
Application.DisplayAlerts = True

@+
 
Re : Enregistrement, fermeture fichier sans messages

Ok, Merci Pierrot93

Cela fontionne (il falait le savoir !)

C'est la méthode 1 qu'il me faut, car dans
22222.xls, je fait un ajout de données.

En parlant d'ajout, saurai-tu comment
a partir de 22222.xls mettre à jour
un fichier Access ?
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
13
Affichages
897
Réponses
3
Affichages
1 K
Compte Supprimé 979
C
Réponses
11
Affichages
786
Réponses
4
Affichages
708
Retour