fermer docRésolu

Question

bonjour,
Je suis sous vba word et je souhaite, quand je clique sur un bouton, fermer tous mon document dans lequel j'ai mon user form...
j'ai mis  Application.Quit mais ca marche pas il me dis qu'il faut fermer une boite de dialogue avant...donc je sais pas comment faire..

fixou81 · Accepted Answer

j'ai trouvé c bon. En fait dans mon bouton je fais activedocument.quit puis sous mon document je fais
Sub document_close
application.quit
end sub

jrivet · Answer

Salut,
Je comprends pas ton problème. 
"il me dis qu'il faut fermer une boite de dialogue avant" ca veut dire quoi exactement
fermer tous mon document dans lequel j'ai mon user form... si tu as plusieurs document,; application.quit devrait fermer Word et non uniquement les documents.

Explique un peu mieux ce que tu souhaites faire.
@+: Ju£i?n
Pensez: Réponse acceptée

fixou81 · Answer

beh en fait j'ai odnc ouvert mon document qui automatiquement lance un userform. J'utilise mon userform classique puis je souhaite avoir un bouton "quitter" qui me ferme tout mon document et quitte donc word pour revenir sous windows...voila c tout bete mais je sais pas le faire donc voila...merci..

drikce06 · Answer

Salut, à mettre dans ton boutton


z = MsgBox("Etes vous sûr de vouloir quitter cette application?", vbYesNo, "Confirmer l'annulation")
  
  If z = 6 Then


TonDocument.Close SaveChanges:=False ou True
     
  End If

 Drikce 06

Si la réponse vous convient: Réponse acceptée. Si la réponse vous convient pas:

fixou81 · Answer

ok mais il trouve pas mon document. le document sur lequel je clique pour ouvrir automatiquement mon userform s'appelle "modifiable".j'ai mis ce que tu mas dit avec
modifiable.close SaveChanges:=False mais il me dit objet requis. FAut que je mette le chemin d'accés non quelque part non?

jrivet · Answer

Salut,
Si tu as un seul document ouvert utilises alors ActiveDocument.Close

@+: Ju£i?n
Pensez: Réponse acceptée

drikce06 · Answer

ou encore Document("modifiable.doc").close!

 Drikce 06

Si la réponse vous convient: Réponse acceptée. Si la réponse vous convient pas:

drikce06 · Answer

J'ai oublié le s à documents:

Documents("modifiable.doc").close!

 Drikce 06

Si la réponse vous convient: Réponse acceptée. Si la réponse vous convient pas:

fixou81 · Answer

ok merci mais ca ca me ferme mon document mais word reste ouvert et j'aimerais carrement tout quitter pour revenir sos windows donc j'ai essayé de fermer le doc comme vous dites puis de fermer l'application mais marche pas...

drikce06 · Answer

Application.quit mais après avoir fermé ton document.

 Drikce 06

Si la réponse vous convient: Réponse acceptée. Si la réponse vous convient pas:

fixou81 · Answer

j'ai mis
Private Sub quitter_Click()
ActiveDocument.Close
Application.Quit
End Sub
mais ca marche passais pas

Fermer doc

11 réponses

Votre réponse

Discussions similaires