Essaye ça : With Application .DisplayAlerts = False .Quit End With
Bertrand d'Aubais (Gard) Ha...Aubais...
Saussines...Sommières.... AV qui a des attaches par là
Jacky
Bonsoir Bertrand
Application.Quit Pour quitter avec éventuellement le message d'alerte de sauvegarde et Application.DisplayAlerts = False Application.Quit Application.DisplayAlerts = True Sans message d'alerte
Salutations JJ
"Bertrand" a écrit dans le message de news:ckm6cf$c93$
Me revoilà....
J'ai affecté cette macro à XL : ChDir "C:Documents and SettingsBertrandBureauTest FMP Word" ActiveWorkbook.SaveAs Filename:= _ "C:Documents and SettingsBertrandBureauTest FMP WordExportFMP.txt", _ FileFormat:=xlText, CreateBackup:úlse
Jusque la parfait mais Application.Quit xlDoNotSaveChanges Cette ligne (qui fonctionne sous word) plante ??
Si quelqu'un à une explication
Un grand Merci
Bertrand d'Aubais (Gard)
Bonsoir Bertrand
Application.Quit
Pour quitter avec éventuellement le message d'alerte de sauvegarde
et
Application.DisplayAlerts = False
Application.Quit
Application.DisplayAlerts = True
Sans message d'alerte
Salutations
JJ
"Bertrand" <beps@aubais30.com> a écrit dans le message de
news:ckm6cf$c93$1@news.tiscali.fr...
Me revoilà....
J'ai affecté cette macro à XL :
ChDir "C:Documents and SettingsBertrandBureauTest FMP Word"
ActiveWorkbook.SaveAs Filename:= _
"C:Documents and SettingsBertrandBureauTest FMP
WordExportFMP.txt", _
FileFormat:=xlText, CreateBackup:úlse
Jusque la parfait mais
Application.Quit xlDoNotSaveChanges
Cette ligne (qui fonctionne sous word) plante ??
Application.Quit Pour quitter avec éventuellement le message d'alerte de sauvegarde et Application.DisplayAlerts = False Application.Quit Application.DisplayAlerts = True Sans message d'alerte
Salutations JJ
"Bertrand" a écrit dans le message de news:ckm6cf$c93$
Me revoilà....
J'ai affecté cette macro à XL : ChDir "C:Documents and SettingsBertrandBureauTest FMP Word" ActiveWorkbook.SaveAs Filename:= _ "C:Documents and SettingsBertrandBureauTest FMP WordExportFMP.txt", _ FileFormat:=xlText, CreateBackup:úlse
Jusque la parfait mais Application.Quit xlDoNotSaveChanges Cette ligne (qui fonctionne sous word) plante ??
Si quelqu'un à une explication
Un grand Merci
Bertrand d'Aubais (Gard)
michdenis
Bonjour Bertrand,
" Si quelqu'un à une explication "
Les équipes de programmation qui crée les logiciels de la suite Microsoft office ne sont pas les mêmes pour chaque application. Il n'est pas étonnant qu'il existe des variantes, des paramètres différents à certaines méthodes d'une application à une autre.
En ce qui concerne excel :
La méthode Quit n'accepte pas de paramètres.
Pour fermer excel :
Application.Quit
Si cette dernière commande est précédée de Application.DisplayAlerts = False
excel devient amnésique et oublie de poser la question : "Voulez-vous enregistrer vos changements ?"
L'utilisation des constantes suivantes s'utilisent de cette façon :
Dim x As XlSaveAction 'Regroupe 2 constantes x = xlDoNotSaveChanges ' OU xlSaveChanges
Avec Excel, on peut utiliser simplement ceci pour fermer un classeur sans enregistrement
ThisWorkbook.close False
Salutations!
"Bertrand" a écrit dans le message de news:ckm6cf$c93$ Me revoilà....
J'ai affecté cette macro à XL : ChDir "C:Documents and SettingsBertrandBureauTest FMP Word" ActiveWorkbook.SaveAs Filename:= _ "C:Documents and SettingsBertrandBureauTest FMP WordExportFMP.txt", _ FileFormat:=xlText, CreateBackup:úlse
Jusque la parfait mais Application.Quit xlDoNotSaveChanges Cette ligne (qui fonctionne sous word) plante ??
Si quelqu'un à une explication
Un grand Merci
Bertrand d'Aubais (Gard)
Bonjour Bertrand,
" Si quelqu'un à une explication "
Les équipes de programmation qui crée les logiciels de la suite Microsoft office ne sont pas les mêmes pour chaque
application. Il n'est pas étonnant qu'il existe des variantes, des paramètres différents à certaines méthodes d'une
application à une autre.
En ce qui concerne excel :
La méthode Quit n'accepte pas de paramètres.
Pour fermer excel :
Application.Quit
Si cette dernière commande est précédée de
Application.DisplayAlerts = False
excel devient amnésique et oublie de poser la question :
"Voulez-vous enregistrer vos changements ?"
L'utilisation des constantes suivantes s'utilisent de cette façon :
Dim x As XlSaveAction
'Regroupe 2 constantes
x = xlDoNotSaveChanges ' OU xlSaveChanges
Les équipes de programmation qui crée les logiciels de la suite Microsoft office ne sont pas les mêmes pour chaque application. Il n'est pas étonnant qu'il existe des variantes, des paramètres différents à certaines méthodes d'une application à une autre.
En ce qui concerne excel :
La méthode Quit n'accepte pas de paramètres.
Pour fermer excel :
Application.Quit
Si cette dernière commande est précédée de Application.DisplayAlerts = False
excel devient amnésique et oublie de poser la question : "Voulez-vous enregistrer vos changements ?"
L'utilisation des constantes suivantes s'utilisent de cette façon :
Dim x As XlSaveAction 'Regroupe 2 constantes x = xlDoNotSaveChanges ' OU xlSaveChanges
Avec Excel, on peut utiliser simplement ceci pour fermer un classeur sans enregistrement
ThisWorkbook.close False
Salutations!
"Bertrand" a écrit dans le message de news:ckm6cf$c93$ Me revoilà....
J'ai affecté cette macro à XL : ChDir "C:Documents and SettingsBertrandBureauTest FMP Word" ActiveWorkbook.SaveAs Filename:= _ "C:Documents and SettingsBertrandBureauTest FMP WordExportFMP.txt", _ FileFormat:=xlText, CreateBackup:úlse
Jusque la parfait mais Application.Quit xlDoNotSaveChanges Cette ligne (qui fonctionne sous word) plante ??
Si quelqu'un à une explication
Un grand Merci
Bertrand d'Aubais (Gard)
Bertrand
Bonjour Bertrand,
" Si quelqu'un à une explication "
Les équipes de programmation qui crée les logiciels de la suite Microsoft office ne sont pas les mêmes pour chaque application. Il n'est pas étonnant qu'il existe des variantes, des paramètres différents à certaines méthodes d'une application à une autre.
En ce qui concerne excel :
La méthode Quit n'accepte pas de paramètres.
Pour fermer excel :
Application.Quit
Si cette dernière commande est précédée de Application.DisplayAlerts = False
excel devient amnésique et oublie de poser la question : "Voulez-vous enregistrer vos changements ?"
L'utilisation des constantes suivantes s'utilisent de cette façon :
Dim x As XlSaveAction 'Regroupe 2 constantes x = xlDoNotSaveChanges ' OU xlSaveChanges
Avec Excel, on peut utiliser simplement ceci pour fermer un classeur sans enregistrement
ThisWorkbook.close False
Salutations!
"Bertrand" a écrit dans le message de news:ckm6cf$c93$ Me revoilà....
J'ai affecté cette macro à XL : ChDir "C:Documents and SettingsBertrandBureauTest FMP Word" ActiveWorkbook.SaveAs Filename:= _ "C:Documents and SettingsBertrandBureauTest FMP WordExportFMP.txt", _ FileFormat:=xlText, CreateBackup:úlse
Jusque la parfait mais Application.Quit xlDoNotSaveChanges Cette ligne (qui fonctionne sous word) plante ??
Si quelqu'un à une explication
Un grand Merci
Bertrand d'Aubais (Gard)
Un grand merci pour cette réponse parfaitement clair,
Amicalement,
Bertrand
Bonjour Bertrand,
" Si quelqu'un à une explication "
Les équipes de programmation qui crée les logiciels de la suite Microsoft office ne sont pas les mêmes pour chaque
application. Il n'est pas étonnant qu'il existe des variantes, des paramètres différents à certaines méthodes d'une
application à une autre.
En ce qui concerne excel :
La méthode Quit n'accepte pas de paramètres.
Pour fermer excel :
Application.Quit
Si cette dernière commande est précédée de
Application.DisplayAlerts = False
excel devient amnésique et oublie de poser la question :
"Voulez-vous enregistrer vos changements ?"
L'utilisation des constantes suivantes s'utilisent de cette façon :
Dim x As XlSaveAction
'Regroupe 2 constantes
x = xlDoNotSaveChanges ' OU xlSaveChanges
Les équipes de programmation qui crée les logiciels de la suite Microsoft office ne sont pas les mêmes pour chaque application. Il n'est pas étonnant qu'il existe des variantes, des paramètres différents à certaines méthodes d'une application à une autre.
En ce qui concerne excel :
La méthode Quit n'accepte pas de paramètres.
Pour fermer excel :
Application.Quit
Si cette dernière commande est précédée de Application.DisplayAlerts = False
excel devient amnésique et oublie de poser la question : "Voulez-vous enregistrer vos changements ?"
L'utilisation des constantes suivantes s'utilisent de cette façon :
Dim x As XlSaveAction 'Regroupe 2 constantes x = xlDoNotSaveChanges ' OU xlSaveChanges
