Flux rss
Collection CommentCaMarche.net
Rechercher : dans
Par : Pertinence Date Nom d'utilisateur
Statut : Résolu

Petit bout de code pour fermeture excel svp

d1102, le lundi 3 juillet 2006 à 15:04:59
Bonjour , j'ai besoin d'un petit bout de code VBA pour fermer deux fenêtres EXCEL ouvertes sans les modifier (c'est à dire sans qu on me demande :"Voulez-vous enregistrer les modifications à SSS.xls ? ma réponse étant "non" à répondre deux fois(car il y a deux fenêtres ouvertes))
Je ferai un bouton dans la page et j'y affecterai cette macro .
Merci beaucoup
Répondre à d1102  Signaler ce message aux modérateurs Aller au dernier message

1


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
sebsauvage, le lundi 3 juillet 2006 à 16:01:57
Quelquechose du genre:
workbook.Close(SaveChanges=False)

(Enfin, en Python en tous cas.)
Répondre à sebsauvage

2


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
d1102, le lundi 3 juillet 2006 à 16:42:59
Application.Quit
SaveChanges = False

et ca marche pas ; excel me demande toujours si je veux sauvegarder
merci
Répondre à d1102

3


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
Kobaya, le lundi 3 juillet 2006 à 16:53:09
salut,

en fait c'est presque ça, mais dans l'autre sens :
Application.SaveChanges = False
Application.Quit 

A+,
Kobaya.
Répondre à Kobaya

4


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
d1102, le lundi 3 juillet 2006 à 17:02:38
Non ca marche pas encore ...
Je ne comprends pas , j'ai l'impression que application.savechanges n'existe pas
merci
a+
Répondre à d1102

5


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
Kobaya, le lundi 3 juillet 2006 à 17:27:49
Oooooppppsssss! désolé.....

j'm'ai trompé :
ActiveWorkbook.SaveChanges = False
' pour fermer Excel
Application.Quit
' ou pour fermer le fichier seulement
' ActiveWorkbook.Close
A+,
Kobaya.
Répondre à Kobaya

6


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
d1102, le lundi 3 juillet 2006 à 17:34:21
Décidément excel est têtu il ne veux pas de :

ActiveWorkbook.SaveChanges = False
Application.Quit

a+
Répondre à d1102

7


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
Kobaya, le lundi 3 juillet 2006 à 17:45:02
décidément, je suis mal réveillé :
ActiveWorkbook.Saved = False


mais c'est lundi, et samedi on a gagné alors je plaide les circonstances atténuantes...

A+,
Kobaya.
Répondre à Kobaya

8


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
d1102, le lundi 3 juillet 2006 à 17:57:40
le pire c'est qu on va regagner mercredi ...
Ca ferme bien excel , mais j ai toujours cette satanée box : "voulez-vous enregistrer les modifications " et j'en veux plus car les gens avec qui je travaille sont foutu de répondre "oui" ....
A+
Répondre à d1102

9


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
Kobaya, le lundi 3 juillet 2006 à 18:02:22
alors là, rien ne va plus : je suis hyper-super-méga-ultra fatigué :

c'est :
ActiveWorkbook.Saved = False


:-(

je vais me coucher de ce pas!
A+,
Kobaya.
Répondre à Kobaya

10


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
Armojax, le mardi 4 juillet 2006 à 09:25:27
Hello,

Saved est un indicateur positionné à True si on n'a effectué aucune modif, ou si une sauvegarde a été effectuée. Dès qu'on modifie le classeur, Excel le bascule à False. C'est ce qui lui permet de savoir si, à la fermeture, il doit ou non poser la question : Voulez-vous enregistrer etc.
Si les utilisateurs ont fait des modifs, Saved est déjà à False, et Excel pose la question.

On peut, au contraire, mettre l'indicateur à True. Dans ce cas, Excel ne pose pas la question, et ne fait pas d'enregistrement, puisqu'on lui dit que le classeur n'a pas été modifié, ou a déjà été sauvegardé.
ActiveWorkbook.Saved = True
ActiveWorkbook.Close

Sinon, on peut aussi écrire :
Application.DisplayAlerts = False
ActiveWorkbook.Close savechanges:=False
Application.DisplayAlerts = True
Le première solution est plus courte.
Répondre à Armojax

11


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
Kobaya, le mardi 4 juillet 2006 à 12:33:38
salut tout le monde,

je revenais pour quelques précisions après une bonne nuit de sommeil, et les idées un peu plus claires, mais Armojax est déjà passé par là alors...

A+,
Kobaya.
Répondre à Kobaya

12


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
 d1102, le mardi 4 juillet 2006 à 13:15:30
merci beaucoup
ca marche
Répondre à d1102

Résultats pour petit bout de code pour fermeture excel svp

Desactiver la fermeture de session sur XP (Résolu) Bonjour, Voila je voudrais bloquer un poste en enlevant le bouton fermeture de session (et meme le bouton arreter si vous savez comment faire :-) ). J'ai mis la clé de registre Nologoff à 1, mais ca ne desactive mon bouton de fermeture de session... www.commentcamarche.net/forum/affich-2193008-desactiver-la-fermeture-de-session-sur-xp
Code Excel (Résolu) Bonjour, J'ai ce bout de code en Excel que je n'arrive pas a gérer : =NOMPROPRE(NumText(G43;"franc")) Il me donne le résultat des chiffres en lettre mais je voudrais ajouter le signe € a la fin de la formule Si j'ai 15000 ca me donne... www.commentcamarche.net/forum/affich-8829689-code-excel

Résultats pour petit bout de code pour fermeture excel svp

[vba-excel] ouverture d'un .pdf via excel (Résolu)Bonjour, j'aurais voulu savoir comment créer un bouton vba sous excel afin de lancer uniquement en lecture un fichier pdf. j'ai regarder un peu près tout les topic mais aucun code ne fonctionne. quelqu'un pourrait-il m'aider merci ? :) www.commentcamarche.net/forum/affich-8390891-vba-excel-ouverture-d-un-pdf-via-excel
Suppression de lignes si condition remplie (Résolu)bonjour, j’ai fait un code sur Excel qui me permet de rentrer un nouvel emprunt à chaque fois que je clique sur un bouton : Private Sub CmdOK_Click() Sheets("SGBBE").Select ActiveSheet.[AA].Select Selection.End(xlDown).Select If Selection.Address =... www.commentcamarche.net/forum/affich-3537903-suppression-de-lignes-si-condition-remplie
Code postal ds fusion publipostage word 2003 (Résolu)Bonjour, j'ai créé des étiquettes d'adresses avec word à partir d'un fichier excel et tout va bien SAUF QUE, pour le code postal: excel mettait bien le zéro au début (exemple 04650) sur l'étiquette word supprime le zéro et ça... www.commentcamarche.net/forum/affich-6733151-code-postal-ds-fusion-publipostage-word-2003