Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Autres Réouverture d'un classeur Excel déjà ouvert

  • Initiateur de la discussion Initiateur de la discussion job75
  • Date de début Date de début

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 !

job75

XLDnaute Barbatruc
Bonsoir à tous,

Merci de faire le test suivant :

- téléchargez les 2 fichiers joints dans le même dossier (le bureau).

- ouvrez le fichier Pilote.xls et cliquez sur le bouton qui lance cette macro :
VB:
Sub Ouvrir() ')
Dim fichier$
fichier = ThisWorkbook.Path & "\A ouvrir.xls"
Workbooks.Open (fichier) '1ère ouverture
ActiveWorkbook.Sheets(1).[D4] = "aaaaa" 'modification
Workbooks.Open (fichier) '2ème ouverture
End Sub
Ma question : recevez-vous un message d'alerte et quelle est votre version Excel ?

Chez moi sur Excel 2019 pas de message mais je crois bien me souvenir que sur mes versions antérieures (2003, 2010, 2013) il y en avait un.

Bonne nuit.
 

Pièces jointes

Re,
La modif s'effectue aussi chez moi.
J'ai mis un point d'arrêt dans le code sur la ligne devant ouvrir çà nouveau le fichier.
Avant de relancer , j'ai rempli une cellule du classeur ouvert.
Après relance, la cellule est toujours renseignée ce qui signifierait que la 2ème ouverture n'a pas eu lieu ????
 
Re Gérard et tous,

J'ai refait l'opération : Office365
1 - fichier "A ouvrir" fermé
2 - clic sur "Ouvrir et rouvrir l'autre fichier" dans fichier "Pilote"
Résultat :
- Ouvre le fichier "A ouvrir"
- Pas de message

1 - fichier "A ouvrir" déjà ouvert
2 - clic sur "Ouvrir et rouvrir l'autre fichier" dans fichier "Pilote"
Résultat :
- Affiche le fichier "A ouvrir"
- Pas de message

dans les 2 cas, j'ai "aaaaa" en D4
@+,
lionel 🙂
 
Dernière édition:
- 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

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…