Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel Fichier .DIF

Fichier .DIF

2 réponses
Avatar
Régis MATHIEU
Bonjour,

Par macro, j'ouvre un nouveau fichier, ensuite je le sauve sous le format
.DIF et je veux fermer ce fichier.DIF.
Excel me pose la question :
"Voulez-vous enregistrer les modifications apportées à "Test.dif" ?
Je réponds "Non".

Quelle instruction ajouter pour by-passer la question ??

Merci de votre aide.

Workbooks.Add
ActiveCell.FormulaR1C1 = "Mathieu"
Range("B1").Select
ActiveCell.FormulaR1C1 = "Régis"
Range("A1").Select
ActiveWorkbook.SaveAs Filename:= _
"C:\Documents and Settings\Administrateur\Bureau\Test.dif",
FileFormat:=xlDIF _
, CreateBackup:=False
ActiveWorkbook.Close
Signaler un problème avec ce contenu

2 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
PMO
Bonjour,

Remplacez la ligne
ActiveWorkbook.Close
par
ActiveWorkbook.Close savechanges:úlse

Cordialement.
--
PMO
Patrick Morange



Bonjour,

Par macro, j'ouvre un nouveau fichier, ensuite je le sauve sous le format
.DIF et je veux fermer ce fichier.DIF.
Excel me pose la question :
"Voulez-vous enregistrer les modifications apportées à "Test.dif" ?
Je réponds "Non".

Quelle instruction ajouter pour by-passer la question ??

Merci de votre aide.

Workbooks.Add
ActiveCell.FormulaR1C1 = "Mathieu"
Range("B1").Select
ActiveCell.FormulaR1C1 = "Régis"
Range("A1").Select
ActiveWorkbook.SaveAs Filename:= _
"C:Documents and SettingsAdministrateurBureauTest.dif",
FileFormat:=xlDIF _
, CreateBackup:úlse
ActiveWorkbook.Close



Avatar
Régis MATHIEU
Merci beaucoup !
ça fonctionne bien !!



Bonjour,

Remplacez la ligne
ActiveWorkbook.Close
par
ActiveWorkbook.Close savechanges:úlse

Cordialement.
--
PMO
Patrick Morange



Bonjour,

Par macro, j'ouvre un nouveau fichier, ensuite je le sauve sous le format
.DIF et je veux fermer ce fichier.DIF.
Excel me pose la question :
"Voulez-vous enregistrer les modifications apportées à "Test.dif" ?
Je réponds "Non".

Quelle instruction ajouter pour by-passer la question ??

Merci de votre aide.

Workbooks.Add
ActiveCell.FormulaR1C1 = "Mathieu"
Range("B1").Select
ActiveCell.FormulaR1C1 = "Régis"
Range("A1").Select
ActiveWorkbook.SaveAs Filename:= _
"C:Documents and SettingsAdministrateurBureauTest.dif",
FileFormat:=xlDIF _
, CreateBackup:úlse
ActiveWorkbook.Close