Application VBA.Commande Quit à ne pas fermer la totalité de l'Application Excel

J'ai code suivant sous une botton. Quand j'ai cliqué, il suffit de le ferme l'feuille excel, mais ne pas fermer toute application excel.

Application.DisplayAlerts = False
ThisWorkbook.Save
Application.DisplayAlerts = True
Application.Quit

Remarque: je n'ai pas d'autres feuilles ouvrir

fenêtre suivante s'affiche toujours après la fermeture par dessus le Code VBA .
Application VBA.Commande Quit à ne pas fermer la totalité de l'Application Excel

Pourriez-vous avoir plus d'une application Excel ouverts en même temps??
Pas., je n'ai pas d'autres feuilles ouvrir
Vous pourriez avoir les classeurs ouverts en arrière-plan (pas visible).
rien dans le Workbook_BeforeClose() événement?
vérifier le gestionnaire des tâches pour les autres instances d'excel.

OriginalL'auteur logan | 2013-09-11

  1. 4

    J'ai eu ce problème et je l'ai résolu en mettant dans la Workbook_BeforeClose():

    ThisWorkbook.saved = true
    C'est plus que probable que la réponse, car il semble que vous avez une boîte de dialogue qui n'est pas traitée et est, par conséquent, la prévention de l'application de cesser de fumer. Cela permettra d'éviter une boîte de dialogue enregistrer d'apparaître pendant le classeur de clôture.
    Ne pas résoudre le problème

    OriginalL'auteur FranckH

  2. 1

    supprimer la Application.DisplayAlerts = True de la routine.

    de l'aide pour Application.Quit Method:

    Si non enregistrées classeurs sont ouverts lorsque vous utilisez cette méthode, Microsoft Excel affiche une boîte de dialogue vous demandant si vous souhaitez enregistrer les modifications. Vous pouvez éviter cela en enregistrant tous les classeurs avant d'utiliser le Quitter de la méthode ou par l'établissement de la DisplayAlerts propriété Faux. Lorsque cette propriété est Faux, Microsoft Excel n'affiche pas la boîte de dialogue lorsque vous quittez avec non enregistrées classeurs; il se ferme sans enregistrer.

    Cela permettra d'éviter tout (éventuellement cachée) invites à partir de l'arrêt de excel de se fermer complètement

    mon excel sera ouvert en lecture seulement que c'est un dossier public. Donc, je ne veux pas les invite ! J'ai ur suggesstion mais même résultat. Probablement, ce n'est pas ma réponse

    OriginalL'auteur SeanC

  3. 0

    La fenêtre ne se ferme pas parce que vous êtes à l'aide de personnels.xlsb. Personnelle De Coupe.xlsb et la coller dans un autre emplacement.

    Au lieu de Personnels.xlsb créer et de travailler sur les modules. C'est une meilleure option.

    OriginalL'auteur Tomek B.

  4. 0

    "ThisWorkbook.Saved = True" après "de l'Application.Quitter" fonctionne sur Excel 2016

    Private Sub Workbook_BeforeClose(Cancel As Boolean)

    Application.Quit
    ThisWorkbook.Saved = True

End Sub

    OriginalL'auteur Tristan Molinié

  5. -1

    C'est étrange, j'espère que quelqu'un va trouver cette réponse utile. Je suis tombé sur quelque chose de très similaire à l'aide d'Excel 2010 (14.0). Je suis tombé de ma réponse par le biais de l'expérimentation. C'est une mauvaise réponse pour usage général.

    Pour quelque raison que ce soit de l'Application.Quittez échoue silencieusement si l'option AccessVBOM n'est pas activé. Il n'est pas permis de sortir de la boîte et peut-être définir/annuler par votre administrateur réseau par windows de la politique.

    Vous pouvez trouver cette option dans l'interface graphique en parcourant "Options Excel" -> "Centre de gestion" -> "Centre de gestion de Paramètres" - > "Paramètres des Macros" -> "la Confiance de l'accès à l'objet du projet VBA modèle". Ou par programmation.

    Application VBA.Commande Quit à ne pas fermer la totalité de l'Application Excel
    .

    Puisque nous aimons tous le code, dans cet exemple, nous exécutez Excel à partir de C# de l'interopérabilité et de l'appel de la quitter la fonction.

    using Excel = Microsoft.Office.Interop.Excel;
using Marshal = System.Runtime.InteropServices.Marshal;

Excel.Application app = new Excel.Application();
app.Visible = false;
app.DisplayAlerts = false;

//this will hang if AccessVBOM is not enabled
app.Quit();
Marshal.ReleaseComObject(app);
    Ce paramètre est rien à voir avec la Application.Quit() méthode en VBA, c'est purement pour permettre l'accès à la VBIDE et VBProject modèles d'objet. C'est potentiellement dangereux si l'option est activée pour aucune bonne raison et c'est pourquoi il est délibérément caché à l'intérieur de la boîte de dialogue paramètres. Aussi la question n'a rien à voir avec C#.NET et/ou du Bureau de l'interopérabilité
    Ne pas résoudre le problème

    OriginalL'auteur Cheng Tsai

  6. -1

    Ont passé MacroName de fichier bat et j'ai essayé le code ci-dessous son travail. Mais une chose que j'ai observé est de savoir si nous sommes à la fermeture du classeur(ActiveWorkbook.Près) avant l'Application.Quittez ensuite, il n'est pas de travail.

    Private Sub Auto_Open()
Dim strMacroName As String
strMacroName = 
VBA.CreateObject("WScript.Shell").Environment("process").Item("MacroName")
If strMacroName <> "" Then Run strMacroName
Application.DisplayAlerts = False
ThisWorkbook.Save
Application.DisplayAlerts = True
If strMacroName <> "" Then Application.Quit
End Sub

Sub Button1_Click()
MsgBox ("done")
End Sub

    OriginalL'auteur ram

  7. -1

    Assurez-vous que vos draps n'ont pas un lien externe références, en particulier les liens cassés.

    J'ai du mal avec ce problème depuis plus d'une semaine, la réécriture et commentant beaucoup de code pour essayer d'isoler le problème. Je l'ai enfin fait un examen de toutes les tables externes et les références à des feuilles dans mon classeur, ce matin. J'ai supprimé tous les liens inutiles et brisé les références et le classeur maintenant ferme, sans retomber dans la mémoire.

    OriginalL'auteur Joel Mazza