Table des matières
Nous stockons les informations importantes dans Excel Nous effectuons également diverses opérations en fonction de nos besoins. Il est donc nécessaire de sauvegarder le fichier une fois qu'il a été mis à jour. Sinon, nous risquons de perdre des données précieuses. Il existe des moyens efficaces de sauvegarder le fichier. Sauvez un Cahier de travail Excel En outre, la sauvegarde d'un Excel selon nos souhaits Format ou de stocker le fichier dans le dossier Localisation est une autre tâche essentielle. Dans cet article, nous vous montrerons les exemples les plus utiles de Excel VBA Enregistrer sous format de fichier .
Télécharger le cahier d'exercices
Téléchargez le cahier d'exercices suivant pour vous exercer par vous-même.
VBA Enregistrer sous format de fichier.xlsm12 exemples de format d'enregistrement de fichiers Excel VBA
Pour illustrer notre propos, nous allons utiliser l'ensemble de données suivant, qui représente par exemple les données suivantes Vendeur , Produit et Ventes nettes d'une entreprise. Ici, nous allons sauvegarder ce classeur en appliquant Excel VBA Enregistrer sous le format de fichier .
1. VBA pour enregistrer en tant que fichier Excel
Dans notre premier exemple, nous allons vous montrer une simple Code VBA pour sauvegarder un Excel Par conséquent, suivez les étapes ci-dessous pour effectuer cette tâche.
ÉTAPES :
- Tout d'abord, rendez-vous sur le site Onglet Développeur.
- Ensuite, sélectionnez Visual Basic .
- Par conséquent, le VBA s'ouvrira.
- Après cela, cliquez sur Insérer .
- Ensuite, sélectionnez le Module .
- Par conséquent, le Module apparaît.
- Ensuite, copiez le code suivant et collez-le dans la boîte.
Sub Exemple_1() ActiveWorkbook.SaveAs End Sub 
- Maintenant, exécutez le code en appuyant sur F5 .
- Par conséquent, vous devrez saisir le nom du fichier, le format et d'autres informations comme demandé.
- Enfin, le fichier sera enregistré dans l'emplacement que vous avez spécifié.
Lire la suite : Comment enregistrer une feuille de calcul comme nouveau fichier en utilisant Excel VBA
2. spécifier l'extension du fichier avec Excel VBA
Dans l'exemple précédent, nous avons dû spécifier manuellement l'option Format de fichier après avoir appuyé sur la commande run. Mais ici, nous allons montrer une manière plus efficace d'appliquer Excel VBA Enregistrer sous format de fichier pour sauvegarder les classeurs dans le format souhaité. Nous allons simplement spécifier l'extension du fichier après le nom du fichier. Ainsi, insérez le code ci-dessous dans le fichier Module fenêtre.
Sub Example_2() Dim location As String location = "D:\SOFTEKO\excel vba save as file format.xlsm" ActiveWorkbook.SaveAs Filename:=location End Sub 
De cette manière, vous pouvez exécuter le code pour obtenir le fichier dans le format et l'emplacement souhaités. Pour enregistrer le fichier au format xlsx, type xlsx à la place de xlsm .
Lire la suite : Macro Excel VBA pour enregistrer un PDF dans un dossier spécifique (7 exemples idéaux)
3. code Excel VBA pour utiliser le format de fichier
Cependant, nous pouvons saisir le Numéro de code du format de fichier au lieu de spécifier l'extension du fichier. Voici quelques codes utiles : .xlsx = 51 , . xlsm = 52 , .xlsb = 50 , .xls = 56 Par conséquent, copiez le code suivant et collez-le dans le champ Module boîte.
Sub Example_3() Dim location As String location = "D:\SOFTEKO\excel vba save as file format" ActiveWorkbook.SaveAs Filename:=location, FileFormat:=52 End Sub 
Lire la suite : [Pourquoi Excel n'enregistre-t-il pas mes mises en forme (7 raisons possibles) ?)
4. enregistrer dans le même répertoire avec VBA
Dans cet exemple, nous allons montrer comment Sauvez dans le Même répertoire où le fichier se trouve déjà avec Excel VBA Par conséquent, insérez le code dans la section Module fenêtre.
Sub Example_4() ActiveWorkbook.SaveAs Filename:="excel vba save as file format" End Sub 
Lire la suite : Excel VBA : choisir l'emplacement et enregistrer au format PDF
5. VBA pour stocker dans un nouveau répertoire
Cependant, nous pouvons aussi avoir besoin d'enregistrer le fichier dans un fichier Nouveau répertoire Ainsi, tapez le code suivant dans la fenêtre Module et l'exécuter.
Sub Example_5() Dim location As String location = "D:\SOFTEKO\excel vba save as file format" ActiveWorkbook.SaveAs Filename:=location End Sub 
6. demander un mot de passe pour ouvrir un fichier Excel
En outre, vous pouvez demander Excel VBA Enregistrer sous format de fichier pour demander un Mot de passe à Ouvrir un fichier Excel Donc, insérez et exécutez le code ci-dessous.
Sub Example_6() ActiveWorkbook.SaveAs _ Filename:="D:\SOFTEKO\excel vba save as file format.xlsm", Password:="one" End Sub 
Lire la suite : Comment enregistrer un fichier Excel avec un mot de passe
Lectures similaires
- Excel VBA pour enregistrer un fichier avec un nom de variable (5 exemples)
- Comment enregistrer Excel en tant que paysage PDF (avec des étapes rapides)
- Excel VBA pour enregistrer dans un fichier en utilisant le chemin d'accès de la cellule (avec des étapes rapides)
- Code VBA pour le bouton Enregistrer dans Excel (4 variantes)
- [Le fichier Excel CSV n'enregistre pas les modifications (6 solutions possibles)
7. ajouter un mot de passe pour l'édition dans Excel
En outre, vous pouvez demander un Mot de passe pour Modification de sur Excel Sans le mot de passe, il ne s'ouvrira qu'en lecture seule. Copiez le code et collez-le. Ensuite, exécutez le code.
Sub Example_7() ActiveWorkbook.SaveAs _ Filename:="D:\SOFTEKO\excel vba save as file format.xlsm", WriteRes:="one" End Sub 
8. ouvrir en format lecture seule
Encore une fois, pour ouvrir un fichier dans En lecture seule Format tapez le code ci-dessous et appuyez sur F5 pour l'exécuter.
Sub Example_8() ActiveWorkbook.SaveAs _ Filename:="D:\SOFTEKO\excel vba save as file format.xlsm", _ ReadOnlyRecommended:=True End Sub 
Lire la suite : Comment ouvrir un document Word et l'enregistrer en tant que PDF ou Docx avec VBA Excel
9. générer une boîte de dialogue "Enregistrer sous".
Une autre opération utile de Excel VBA pour enregistrer le format de fichier est de générer Boîte de dialogue Enregistrer sous Insérez donc le code ci-dessous.
Sub Example_9() Application.GetSaveAsFilename End Sub 
Lire la suite : Macro Excel pour enregistrer en PDF (5 exemples concrets)
10. VBA pour créer et sauvegarder un nouveau classeur.
Outre l'enregistrement d'un fichier, nous pouvons également Créer et enregistrer un nouveau classeur avec VBA Pour accomplir cette tâche, tapez le code ci-dessous dans le champ de saisie de l'image. Module et appuyez sur F5 .
Sub Example_10() Dim book As Workbook Set book = Workbooks.Add Application.DisplayAlerts = False book.SaveAs Filename:="D:\SOFTEKO\excel vba save as file format.xlsm" Application.DisplayAlerts = True End Sub 
Lire la suite : Excel VBA : enregistrer la feuille comme nouveau classeur sans l'ouvrir
11. enregistrer le classeur actif dans Excel
De même, nous pouvons sauvegarder le classeur actif là où il est déjà stocké. Pour effectuer l'opération, insérez le code très simple.
Sub Example_11() ActiveWorkbook.Save End Sub 
Lire la suite : Comment enregistrer une macro pour tous les classeurs dans Excel (avec des étapes faciles)
12. VBA pour enregistrer au format PDF dans Excel
Enfin, nous pouvons utiliser le PDF dans notre VBA code à sauvegarder dans Format PDF Donc, appliquer Excel VBA Enregistrer sous le format de fichier Ensuite, exécutez le code en appuyant sur F5 .
Sub Example_12() ActiveSheet.SaveAs Filename:="excel vba save as file format.pdf" End Sub 
Lire la suite : Comment enregistrer Excel au format PDF (6 façons utiles)
Conclusion
Désormais, vous pourrez enregistrer les fichiers avec Excel VBA Enregistrer sous format de fichier en suivant les exemples décrits ci-dessus. Continuez à les utiliser et faites-nous savoir si vous avez d'autres façons d'accomplir la tâche. Suivez-nous. l'ExcelWIKI N'oubliez pas de laisser vos commentaires, vos suggestions ou vos questions dans la section des commentaires ci-dessous.
