IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Macros et VBA Excel Discussion :

Empêcher l'ouverture d'un fichier XLSX sous Excel 2003 [XL-2003]


Sujet :

Macros et VBA Excel

  1. #1
    Membre habitué
    Homme Profil pro
    Assistant technique
    Inscrit en
    Février 2007
    Messages
    336
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 43
    Localisation : France, Seine Saint Denis (Île de France)

    Informations professionnelles :
    Activité : Assistant technique
    Secteur : Services à domicile

    Informations forums :
    Inscription : Février 2007
    Messages : 336
    Points : 197
    Points
    197
    Par défaut Empêcher l'ouverture d'un fichier XLSX sous Excel 2003
    Bonjour,

    Dans mon entreprise nous avons Excel 2003 et 2007
    Excel 2003 est configuré par défaut pour l'ouverture de fichier

    Donc lorsque j'envoi à mes collègues des fichiers XLSX (car l'extraction est trop grosse pour tenir dans un XLS), ils ne voient pas toutes les lignes car Excel 2003 s'arete à 65 536 lignes

    Ce que j'aimerais faire, c'est d'intégrer un code VBA pour bloquer l'ouverture du fichier lorsqu'ils essaient de l'ouvrir avec Excel 2003 et afficher le message suivant "Veuillez ouvrir le fichier avec Excel 2007 s'il vous plaît"

    Merci par avance !!

  2. #2
    Expert éminent
    Homme Profil pro
    Inscrit en
    Août 2010
    Messages
    3 453
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations forums :
    Inscription : Août 2010
    Messages : 3 453
    Points : 6 871
    Points
    6 871
    Par défaut
    Bonjour,

    A mettre dans le module du classeur (ThisWorkbook) :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
     
    Private Sub Workbook_Open()
     
        If Rows.Count < 65537 Then
            MsgBox "Veuillez ouvrir ce fichier avec Excel 2007 Svp !"
            Application.Quit
        End If
     
    End Sub
    Hervé.

  3. #3
    Membre habitué
    Homme Profil pro
    Assistant technique
    Inscrit en
    Février 2007
    Messages
    336
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 43
    Localisation : France, Seine Saint Denis (Île de France)

    Informations professionnelles :
    Activité : Assistant technique
    Secteur : Services à domicile

    Informations forums :
    Inscription : Février 2007
    Messages : 336
    Points : 197
    Points
    197
    Par défaut
    Merci !!

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. Réponses: 9
    Dernier message: 27/01/2013, 18h20
  2. Réponses: 0
    Dernier message: 21/01/2013, 22h45
  3. [XL-2003] Problème d'ouverture d'un fichier SVG sous Excel (bis)
    Par SkyCorp dans le forum Excel
    Réponses: 7
    Dernier message: 03/09/2011, 00h37
  4. WPF & Spring - Exécution Spring à l'ouverture d'un fichier .xaml sous Visual Studio
    Par Cecile5 dans le forum Windows Presentation Foundation
    Réponses: 2
    Dernier message: 24/11/2008, 12h18
  5. Ouverture d'un fichier .mdb sous Access depuis MATLAB
    Par amalirou dans le forum MATLAB
    Réponses: 3
    Dernier message: 16/11/2007, 22h58

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo