Sujet Précédent Sujet Suivant

Programmation VBA/Excel

Fermé
giiu10 Messages postés 4 Date d'inscription lundi 25 mars 2013 Statut Membre Dernière intervention 27 mars 2013 - 25 mars 2013 à 09:13
lermite222 Messages postés 8724 Date d'inscription dimanche 8 avril 2007 Statut Contributeur Dernière intervention 22 janvier 2020 - 28 mars 2013 à 00:49
Bonjour,

J'ai réaliser une macro à l'aide de VBA qui produit le résultat souhaité; cependant, ma macro fait intervenir des ouvertures de fichiers successives et à chaque ouverture de fichier une boite de dialogue s'ouvre me demandait si je souhaite l'ouvrir en lecture seule ou non.

Ma question est de savoir si il existe un code VBA qui permettrait de répondre automatiquement à cette boite de dialogue ?

La boite de dialogue est la suivante: 'calcul prob.xlsm' (mon fichier) devrait être ouvert en lecture seule à moins que vous n'ayez besoin d'enregistrer des modifications. Voulez-vous l'ouvrir en lecture seule ?

J'aimerai donc une ligne de code qui répondrait non à cette question.

Je vous remercie d'avance pour votre aide.

Julien.

A voir également:

3 réponses

Réponse 1 / 3
michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 310
25 mars 2013 à 10:52
Bonjour

En étant aussi flou, cela parait difficile de t'aider

envoie la macro en questions ou mieux le classeur sans donnérs confidentielles
0
giiu10 Messages postés 4 Date d'inscription lundi 25 mars 2013 Statut Membre Dernière intervention 27 mars 2013
25 mars 2013 à 12:32
En fait la macro est très longue et compliquée et cela importe peu que vous la voyez pour me répondre.

Il faut juste savoir que dans celle-ci il ya des formules qui ouvrent d'autres classeurs. Celle-ci par exemple:
Workbooks.Open ("T:\Users\Julien\Test Macro\Calcul Prob.xlsm")

A chaque fois que la macro arrive à cette ligne, je dois répondre à un message s'affichant me demandant si je souhaite l'ouvrir en lecture seule. Je voulais simplement savoir s'il était possible d'insérer une instruction qui répondrait directement à cette question sans mon intervention.
0
Réponse 2 / 3
MiB
25 mars 2013 à 12:28
Bonjour,

Application.DisplayAlerts = False

' ... to code

Application.displayAlerts = True

devrait fonctionner

Michel B.
Cdt
0
giiu10 Messages postés 4 Date d'inscription lundi 25 mars 2013 Statut Membre Dernière intervention 27 mars 2013
25 mars 2013 à 12:34
merci. Je met ceci après l'instruction:

Workbooks.Open ("T:\Users\Julien\Test Macro\Calcul Prob.xlsm")
0
MiB
25 mars 2013 à 17:32
avant :
Application.DisplayAlerts = False

après :
Application.displayAlerts = True

Michel B.
Cdt
0
giiu10 Messages postés 4 Date d'inscription lundi 25 mars 2013 Statut Membre Dernière intervention 27 mars 2013
27 mars 2013 à 16:02
Merci cela marche super ! Cependant en mettant cela, que donne t'il comme réponse à la question ?
0
Réponse 3 / 3
lermite222 Messages postés 8724 Date d'inscription dimanche 8 avril 2007 Statut Contributeur Dernière intervention 22 janvier 2020 1 190
28 mars 2013 à 00:49
Bonjour,
Une toute petite réflexion te donneras la solution...
Sauve le classeur en question et tu verras ce qui en résulte.
A+
0