Le claseur SUICIDAIRE

Mi_

XLDnaute Occasionnel
Bonjour le forum,

Eh oui, je me demandais si c'est possible qu'à l'impression d'un classeur (ActiveWindow.SelectedSheets.PrintOut), celui-ci (le fichier) soit automatiquement éffacé.

Drôle d'idée, n'est-ce pas ? :)

Mais quand même, est-il possible ?

Cordialement,
Mi_
 

tontoncarton

XLDnaute Occasionnel
bonsoir ,

ca pourra peut etre t'aider un peu




Cet exemple utilise l'instruction Kill pour supprimer un fichier d'un disque.

' Suppose que le fichier FICHTEST contient des données.
Kill 'FichTest' ' Supprime le fichier.

' Supprime tous les fichiers *.TXT du dossier courant.
Kill '*.TXT'

l'aide excel est bien faite kan meme lol @ +

Message édité par: tontoncarton, à: 24/08/2005 20:29
 

tontoncarton

XLDnaute Occasionnel
re ,
en effet on peux difficilement demander a la macro de s'auto killer , c'est comme demander a windows de se formater lol

alors peut etre que si a la fin de ta macro tu ouvrais un autre classeur que tu planques avec les instructions de fermer et detruire le precedent alors ca devrait marcher ensuite tu fini ta macro avec un application.quit et le tour et jouer non?

@ + créateur de classeur manico dépressif a tendance sucidaire lol
 

Mi_

XLDnaute Occasionnel
tontoncarton écrit:
si a la fin de ta macro tu ouvrais un autre classeur que tu planques avec les instructions de fermer et detruire le precedent alors ca devrait marcher
Bonjour bonjour,

Hé oui, c'est un excellente idée, notamment que j'envisagais de faire une archive .xls de la feuille à l'impression, alord je vais inserer de manière automatique, à l'archivage, le code necéssaire pour qu'il détruise (éfface) son fichier parent !

C'est du vrai sadisme Excellien ! :evil:

Merci beaucoup tontoncarton !
 

Mi_

XLDnaute Occasionnel
Re bonjour à tous

MichelXld, je suis surpris par le débat morbide sur l'euthanasie des classeurs, que tu as indiqué.

C'est si éfficace, que'on se pose des problèmes:
- est-ce juste ?
- est-ce normal ?
- mais ou vas-t-on ?

Avec des tels codes, on crée l'apocalypse, on tue notre propre travail.

Heu au fait il est passé où mon fichier ? Au secours !!!!!!!!!! :S
 

Discussions similaires

Réponses
39
Affichages
1 K

Statistiques des forums

Discussions
299 878
Messages
1 979 748
Membres
206 855
dernier inscrit
soiaf