Supprimer classeur à sa fermeture

[ascal44]

Bonjour le forum ,

J'ai un classeur temporaire ( classeur qui se crée pour une impression) , je voudrais qu'il se supprime lors de sa fermeture.
Est il possible d'intégrer un code pour qu'il se supprime de son point d'origine ?

Merci pour vos conseils et solutions

 

[kjin]

Re : Supprimer classeur à sa fermeture

Bonjour,

J'ai un classeur temporaire ( classeur qui se crée pour une impression) , je voudrais qu'il se supprime lors de sa fermeture.

On suppose qu'il est créé par maco(?) et que s'il est temporaire, c'est qu'il n'est pas enregistré (?)
Pourquoi ne pas intégrer sa suppression dans la macro qui l'a créé ou à la rigueur à la fermeture du classeur qui l'a créé

Est il possible d'intégrer un code pour qu'il se supprime de son point d'origine ?

Comprends pas ce que ça veut dire
Dans tous les cas, qq précisions s'imposent (macro)
A+
kjin

 

[tototiti2008]

Re : Supprimer classeur à sa fermeture

Bonjour ascal44, Bonjour kjin

Une autre question pourrait être : si on crée un classeur par macro pour l'imprimer, pourquoi l'enregistrer si on en a plus besoin après ?


Edit : En fait, ça correspond aux remarques de kjin, pas bien lu

 

[ascal44]

Re : Supprimer classeur à sa fermeture

Bonjour , voici le code qui génère le classeur :

Private Sub CommandButton7_Click()
    On Error Resume Next
    If Liste2.ListCount = 0 Then
        MsgBox "Aucune enveloppe à traiter", , "Enveloppe"
        Exit Sub
    End If
    If OptionButton1 = True And Liste3.ListIndex < 0 Then
        MsgBox "Enveloppe non séléctionnée", , "Enveloppe"
        Exit Sub
    End If
    If OptionButton2 = True And LargEnvel = "" Then
        MsgBox "Largeur Enveloppe non renseignée", , "Enveloppe"
        Exit Sub
    End If
    If OptionButton2 = True And HautEnvel = "" Then
        MsgBox "Hauteur Enveloppe non renseignée", , "Enveloppe"
        Exit Sub
    End If
    Workbooks.Add
    ActiveWindow.DisplayGridlines = False
    FormatEnvel
    Unload Envel
   End Sub

 

[pierrejean]

Re : Supprimer classeur à sa fermeture

Bonjour ascal44
Salut kjin
Salut Tototiti

A tester

......
    [COLOR=blue]Set Wk=[/COLOR]Workbooks.Add
    ActiveWindow.DisplayGridlines = False
    FormatEnvel
    Unload Envel
    [COLOR=blue]Wk.close[/COLOR]

 

[kjin]

Re : Supprimer classeur à sa fermeture

Bonjour,
Salut pierrejean, tototiti
Qui génère le classeur soit, mais une fois créé, que se passe t-il ?

    FormatEnvel  [COLOR="Red"]'???[/COLOR]
    Unload Envel[COLOR="Red"] '???[/COLOR]

A+
kjin

 

[ascal44]

Re : Supprimer classeur à sa fermeture

J'ai une variable non définie avec le code de Pierrejean.

En fait je voudrais simplifier : Quand je ferme le classeur2 ( après l'avoir utilisé ) le supprimer .

 

[pierrejean]

Re : Supprimer classeur à sa fermeture

Re

Ajouter en debut de macro

Dim Wk As Workbook

 

[ascal44]

Re : Supprimer classeur à sa fermeture

Avec "Dim Wk As Workbook" cela retire le Bug.

Mais je voudrais supprimer le classeur 2 créé de son emplacement d'origine : Documents lorsque je clique sur la croix de fermeture

 

[kjin]

Re : Supprimer classeur à sa fermeture

re,
Je vois l'intérêt que tu portes à mon intervention, et de ce pas je me retire en m'excusant pour le dérangement
kjin