OVH Cloud OVH Cloud

Supprimer un fichier ouvert

7 réponses
Avatar
Zambohanga
Bonjour à tous,
Je suis à la recherche d'un code qui permet de supprimer un fichier en cours
d'utilisation pour ne pas avoir à retourner via l'explorateur dans le
dossier et effacer l'élément.
Je sais que c'est possible, car j'ai déjà utilisé cette macro en postant
cette question il y a 1 ou 2 ans sur le forum, et il me semble qu'AV m'avait
donné une réponse. Mais voila, un formattage est passé par là ;(((

Bref, pour ce que je m'en rappelle, la macro fermait le fichier en cours
d'utilisation puis l'effaçait (certes définitivement, mais c'est le but). Ce
code me permettrait de faire du ménage parmi la centaine de fichiers que je
dois archiver.

D'avance merci à tous

Z

7 réponses

Avatar
anomymousA
bonjour,

utilises la commande Kill "nom complet du fichier" après l'avoir fermé.
effectivement, cela supprimera définitivement ton fichier ( ne sera même plus
dans corbielle).

A+


Bonjour à tous,
Je suis à la recherche d'un code qui permet de supprimer un fichier en cours
d'utilisation pour ne pas avoir à retourner via l'explorateur dans le
dossier et effacer l'élément.
Je sais que c'est possible, car j'ai déjà utilisé cette macro en postant
cette question il y a 1 ou 2 ans sur le forum, et il me semble qu'AV m'avait
donné une réponse. Mais voila, un formattage est passé par là ;(((

Bref, pour ce que je m'en rappelle, la macro fermait le fichier en cours
d'utilisation puis l'effaçait (certes définitivement, mais c'est le but). Ce
code me permettrait de faire du ménage parmi la centaine de fichiers que je
dois archiver.

D'avance merci à tous

Z





Avatar
Zambohanga
Ok, mais comment déclarer le nom du fichier sachant que la macro ne peut
supprimer ce fichier qu'une fois celui-ci fermé.
En fait je souhaite ouvrir plusieurs fichiers d'un dossier, les consulter et
les supprimer au fur et à mesure
Z
"anomymousA" a écrit dans le message
de news:
bonjour,

utilises la commande Kill "nom complet du fichier" après l'avoir fermé.
effectivement, cela supprimera définitivement ton fichier ( ne sera même
plus

dans corbielle).

A+


Bonjour à tous,
Je suis à la recherche d'un code qui permet de supprimer un fichier en
cours


d'utilisation pour ne pas avoir à retourner via l'explorateur dans le
dossier et effacer l'élément.
Je sais que c'est possible, car j'ai déjà utilisé cette macro en postant
cette question il y a 1 ou 2 ans sur le forum, et il me semble qu'AV
m'avait


donné une réponse. Mais voila, un formattage est passé par là ;(((

Bref, pour ce que je m'en rappelle, la macro fermait le fichier en cours
d'utilisation puis l'effaçait (certes définitivement, mais c'est le
but). Ce


code me permettrait de faire du ménage parmi la centaine de fichiers que
je


dois archiver.

D'avance merci à tous

Z







Avatar
anomymousA
re,

lorsque tu as ouvert ce fichier ou lorsque tu le fermes (si c'est par
programmation) , tu es bien obligé de désigner à VBA lequel , donc d'une
manière comme d'une autre tu peux en récupérer le nom et le chemin
complet.(Activeworkbook.fullname ou workbooks(I).fullname ou si dans une
boucle for each wbk..., wbk.fullname).
Il te suffit de stocker ce nom dans ta macro qui va procéder à la
suppression puis de faire Kill Tampon ( en supposant que tampon a recu
l'information du nom complet du fichier à supprimer).

A+


Ok, mais comment déclarer le nom du fichier sachant que la macro ne peut
supprimer ce fichier qu'une fois celui-ci fermé.
En fait je souhaite ouvrir plusieurs fichiers d'un dossier, les consulter et
les supprimer au fur et à mesure
Z
"anomymousA" a écrit dans le message
de news:
bonjour,

utilises la commande Kill "nom complet du fichier" après l'avoir fermé.
effectivement, cela supprimera définitivement ton fichier ( ne sera même
plus

dans corbielle).

A+


Bonjour à tous,
Je suis à la recherche d'un code qui permet de supprimer un fichier en
cours


d'utilisation pour ne pas avoir à retourner via l'explorateur dans le
dossier et effacer l'élément.
Je sais que c'est possible, car j'ai déjà utilisé cette macro en postant
cette question il y a 1 ou 2 ans sur le forum, et il me semble qu'AV
m'avait


donné une réponse. Mais voila, un formattage est passé par là ;(((

Bref, pour ce que je m'en rappelle, la macro fermait le fichier en cours
d'utilisation puis l'effaçait (certes définitivement, mais c'est le
but). Ce


code me permettrait de faire du ménage parmi la centaine de fichiers que
je


dois archiver.

D'avance merci à tous

Z












Avatar
Zambohanga
ok, je crois avoir compris. Mais, par exemple, quand le classeur 1 se ferme
par la macro, c'est un autre qui devient actif. Comment va réagir la macro
avec l'instruction Activeworkbook ?

"anomymousA" a écrit dans le message
de news:
re,

lorsque tu as ouvert ce fichier ou lorsque tu le fermes (si c'est par
programmation) , tu es bien obligé de désigner à VBA lequel , donc d'une
manière comme d'une autre tu peux en récupérer le nom et le chemin
complet.(Activeworkbook.fullname ou workbooks(I).fullname ou si dans une
boucle for each wbk..., wbk.fullname).
Il te suffit de stocker ce nom dans ta macro qui va procéder à la
suppression puis de faire Kill Tampon ( en supposant que tampon a recu
l'information du nom complet du fichier à supprimer).

A+


Ok, mais comment déclarer le nom du fichier sachant que la macro ne peut
supprimer ce fichier qu'une fois celui-ci fermé.
En fait je souhaite ouvrir plusieurs fichiers d'un dossier, les
consulter et


les supprimer au fur et à mesure
Z
"anomymousA" a écrit dans le
message


de news:
bonjour,

utilises la commande Kill "nom complet du fichier" après l'avoir
fermé.



effectivement, cela supprimera définitivement ton fichier ( ne sera
même



plus
dans corbielle).

A+


Bonjour à tous,
Je suis à la recherche d'un code qui permet de supprimer un fichier
en




cours
d'utilisation pour ne pas avoir à retourner via l'explorateur dans
le




dossier et effacer l'élément.
Je sais que c'est possible, car j'ai déjà utilisé cette macro en
postant




cette question il y a 1 ou 2 ans sur le forum, et il me semble qu'AV
m'avait


donné une réponse. Mais voila, un formattage est passé par là ;(((

Bref, pour ce que je m'en rappelle, la macro fermait le fichier en
cours




d'utilisation puis l'effaçait (certes définitivement, mais c'est le
but). Ce


code me permettrait de faire du ménage parmi la centaine de fichiers
que




je
dois archiver.

D'avance merci à tous

Z














Avatar
Zambohanga
Re-salut,
J'ai trouvé, merci pour l'idée du Kill
voici le bout de code
Sub supprime()
'macro écrite par Zambohanga 02/05
'sert à supprimer définitivement le classeur ouvert
'attention, pas de corbeille
'merci au MPFE et excelabo
'à placer dans le perso.xls
Dim Bill As String
Bill = ActiveWorkbook.FullName
ActiveWorkbook.Close savechanges:úlse
Kill Bill
End Sub

A tester, mais chez moi ca fonctionne nickel
Z

"anomymousA" a écrit dans le message
de news:
bonjour,

utilises la commande Kill "nom complet du fichier" après l'avoir fermé.
effectivement, cela supprimera définitivement ton fichier ( ne sera même
plus

dans corbielle).

A+


Bonjour à tous,
Je suis à la recherche d'un code qui permet de supprimer un fichier en
cours


d'utilisation pour ne pas avoir à retourner via l'explorateur dans le
dossier et effacer l'élément.
Je sais que c'est possible, car j'ai déjà utilisé cette macro en postant
cette question il y a 1 ou 2 ans sur le forum, et il me semble qu'AV
m'avait


donné une réponse. Mais voila, un formattage est passé par là ;(((

Bref, pour ce que je m'en rappelle, la macro fermait le fichier en cours
d'utilisation puis l'effaçait (certes définitivement, mais c'est le
but). Ce


code me permettrait de faire du ménage parmi la centaine de fichiers que
je


dois archiver.

D'avance merci à tous

Z







Avatar
anomymousA
re,

content de voir que tu y es arrivé.

A+


Re-salut,
J'ai trouvé, merci pour l'idée du Kill
voici le bout de code
Sub supprime()
'macro écrite par Zambohanga 02/05
'sert à supprimer définitivement le classeur ouvert
'attention, pas de corbeille
'merci au MPFE et excelabo
'à placer dans le perso.xls
Dim Bill As String
Bill = ActiveWorkbook.FullName
ActiveWorkbook.Close savechanges:úlse
Kill Bill
End Sub

A tester, mais chez moi ca fonctionne nickel
Z

"anomymousA" a écrit dans le message
de news:
bonjour,

utilises la commande Kill "nom complet du fichier" après l'avoir fermé.
effectivement, cela supprimera définitivement ton fichier ( ne sera même
plus

dans corbielle).

A+


Bonjour à tous,
Je suis à la recherche d'un code qui permet de supprimer un fichier en
cours


d'utilisation pour ne pas avoir à retourner via l'explorateur dans le
dossier et effacer l'élément.
Je sais que c'est possible, car j'ai déjà utilisé cette macro en postant
cette question il y a 1 ou 2 ans sur le forum, et il me semble qu'AV
m'avait


donné une réponse. Mais voila, un formattage est passé par là ;(((

Bref, pour ce que je m'en rappelle, la macro fermait le fichier en cours
d'utilisation puis l'effaçait (certes définitivement, mais c'est le
but). Ce


code me permettrait de faire du ménage parmi la centaine de fichiers que
je


dois archiver.

D'avance merci à tous

Z












Avatar
Zambohanga
Re tous
Il convient de complèter le code par une petite ligne qui evite un plantage
si aucun fichier n'est ouvert dans excel
Après Dim Bill as string, placer :
on error resume next

voila

"Zambohanga" a écrit dans le message de
news:
Re-salut,
J'ai trouvé, merci pour l'idée du Kill
voici le bout de code
Sub supprime()
'macro écrite par Zambohanga 02/05
'sert à supprimer définitivement le classeur ouvert
'attention, pas de corbeille
'merci au MPFE et excelabo
'à placer dans le perso.xls
Dim Bill As String
Bill = ActiveWorkbook.FullName
ActiveWorkbook.Close savechanges:úlse
Kill Bill
End Sub

A tester, mais chez moi ca fonctionne nickel
Z

"anomymousA" a écrit dans le
message

de news:
bonjour,

utilises la commande Kill "nom complet du fichier" après l'avoir fermé.
effectivement, cela supprimera définitivement ton fichier ( ne sera même
plus

dans corbielle).

A+


Bonjour à tous,
Je suis à la recherche d'un code qui permet de supprimer un fichier en
cours


d'utilisation pour ne pas avoir à retourner via l'explorateur dans le
dossier et effacer l'élément.
Je sais que c'est possible, car j'ai déjà utilisé cette macro en
postant



cette question il y a 1 ou 2 ans sur le forum, et il me semble qu'AV
m'avait


donné une réponse. Mais voila, un formattage est passé par là ;(((

Bref, pour ce que je m'en rappelle, la macro fermait le fichier en
cours



d'utilisation puis l'effaçait (certes définitivement, mais c'est le
but). Ce


code me permettrait de faire du ménage parmi la centaine de fichiers
que



je
dois archiver.

D'avance merci à tous

Z