Passer au contenu principal

 Comment vérifier si un classeur est enregistré?

Lorsque vous ouvrez un nouveau classeur, vous risquez d'oublier de l'enregistrer, ce sera ennuyeux si vous fermez le classeur accidentellement. Mais comment pouvez-vous vérifier si un Excel le classeur a-t-il été enregistré ?

Vérifiez si un classeur est enregistré ou non avec le code VBA


flèche bleue bulle droite Vérifiez si un classeur est enregistré ou non avec le code VBA

En vérifiant si un classeur est enregistré ou non, le code VBA suivant peut vous rendre service, procédez comme suit:

1. Maintenez le ALT + F11 clés pour ouvrir le Microsoft Visual Basic pour applications fenêtre.

2Cliquez sur insérer > Moduleet collez le code suivant dans le Module Fenêtre.

Code VBA: vérifiez si un classeur est enregistré ou non:

Sub filesaved()
'Updateby Extendoffice 20161109
    Dim sLastTime As String
    On Error GoTo EHandler
    sLastTime = ActiveWorkbook.BuiltinDocumentProperties("last save time")
    MsgBox sLastTime, vbInformation, "Kutools for Excel"
    Exit Sub
EHandler:
    MsgBox "File not saved", vbInformation, "Kutools for Excel"
End Sub

3. Puis appuyez F5 clé pour exécuter ce code, vous obtiendrez les boîtes d'invite suivantes:

(1.) Si le classeur a été enregistré, une boîte de dialogue apparaîtra pour vous rappeler la dernière heure enregistrée de votre classeur:

doc si fichier enregistré 1

(2.) Si le classeur n'a pas été enregistré, vous obtiendrez la boîte d'invite suivante:

doc si fichier enregistré 2

Meilleurs outils de productivité bureautique

Prend en charge le bureau/Excel 2007-2021 et 365 | Disponible en 44 langues | Facile à désinstaller complètement

Caractéristiques populaires: Rechercher/mettre en surbrillance/identifier les doublons   |  Supprimer les lignes vides   |  Combinez des colonnes ou des cellules sans perdre de données   |   Tour sans formule 
Super recherche: VSearchup à critères multiples    VSearch à valeurs multiples  |   Recherche virtuelle sur plusieurs feuilles   |   Recherche floue ....
Liste déroulante avancée: Créez rapidement une liste déroulante   |  Liste déroulante dépendante   |  Liste déroulante à sélection multiple ....
Gestionnaire de colonnes: Ajouter un nombre spécifique de colonnes     Déplacer les colonnes   |   Afficher les colonnes   |   Comparer les colonnes à Sélectionnez des cellules identiques et différentes 
Caractéristiques en vedette: Mise au point de la grille   |  Voir Design   |   Grande barre de formule    Gestionnaire de classeurs et de feuilles   |  Centre de ressources (Texte automatique)   |  Sélecteur de date   |  Combiner des feuilles de travail   |  Crypter/déchiffrer les cellules    Envoyer des e-mails par liste   |  Super filtre   |   Filtre spécial (filtre gras/italique/barré...) ...
Les 15 meilleurs ensembles d'outils12 Texte Outils (Ajouter du texte, Supprimer les caractères, ...)   |   50+ Graphique Types (Diagramme de Gantt, ...)   |   40+ Pratique Formules (Calculer l'âge en fonction de l'anniversaire, ...)   |   19 Insertion Outils (Insérer le code QR, Insérer une image à partir du chemin, ...)   |   12 Conversion Outils (Des chiffres à Words, Conversion des devises, ...)   |   7 Fusionner et fractionner Outils (Lignes de combinaison avancées, Cellules divisés, ...)   |   ... et plus

Kutools for Excel Possède plus de 300 fonctionnalités, Assurez-vous que ce dont vous avez besoin est à portée de clic...

Boostez votre Excel Compétences: Faites l’expérience d’une efficacité comme jamais auparavant avec Kutools for Excel  (Essai gratuit complet de 30 jours)

onglet kte 201905

Garantie de remboursement inconditionnelle de 60 joursLire la suite... Téléchargement Gratuit... Achat... 

Office Tab Apporte une interface à onglets à Office et facilite grandement votre travail

  • Activer l'édition et la lecture par onglets Word, Excel, Power Point, Publisher, Access, Visio et Project.
  • Ouvrez et créez plusieurs documents dans de nouveaux onglets de la même fenêtre, plutôt que dans de nouvelles fenêtres.
  • Augmente votre productivité de 50 % et réduit des centaines de clics de souris chaque jour ! (Essai gratuit complet de 30 jours)
Garantie de remboursement inconditionnelle de 60 joursLire la suite... Téléchargement Gratuit... Achat... 
 
Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations