excel suppression fichier excel

Version imprimable

20/11/2007, 18h03
yakup.67

excel suppression fichier excel

Bonjour à tous,
je voulais savoir comment peut on traduire cette phrase en vb :
si le fichier excel essais.xls se trouvant dans le répertoire C:\TP existe alors
on supprime ce fichier excel.

J'en ai une autre : comment savoir si ce même fichier excel est ouvert ou pas en vb?

Merci d'avance à tous !!

bonjour,
A ta 1ére question

Code:

1
2
3
4
5
6
7
8
9
10
Dim Txt as string, Bf as string
Bf = "C:\TP\essais.xls "
Txt= Dir Bf
If Txt = "" then
    msgBox "Le fichier n'existe pas"
else
    msgBox " Le fichier existe"
    'Supprime le fichier
    Kill Bf
end if

Pour la 2ém je regarde
A+
Edit:
Ouvert dans la même instance de Excel ou pas ?

20/11/2007, 18h44
pgz
Bonjour.

Citation:

si le fichier excel essais.xls se trouvant dans le répertoire C:\TP existe alors
on supprime ce fichier excel.

En utilisant la bibliothèque IWSH, du genre
Code:

1 2 3 4 5 Dim fso as IwshRuntimeLibrary.FileSystemObject Set fso = New IWSH...filesystemobject if fso.fileexists("C:\TP\essais.xls") then call fso.DeleteFile("C:\TP\essais.xls") set fso = Nothing
Citation:

J'en ai une autre : comment savoir si ce même fichier excel est ouvert ou pas en vb?

Si tu sais dans quelle application le classeur serait ouvert, c'est facile : consulter la collection Workbooks de l'appli.

Sinon, ... c'est compliqué.

Bon courage,

PGZ
21/11/2007, 14h18
cavo789
Citation:
Envoyé par pgz

Bonjour.

En utilisant la bibliothèque IWSH, du genre

Code:

1 2 3 4 5 Dim fso as IwshRuntimeLibrary.FileSystemObject Set fso = New IWSH...filesystemobject if fso.fileexists("C:\TP\essais.xls") then call fso.DeleteFile("C:\TP\essais.xls") set fso = Nothing

Si tu sais dans quelle application le classeur serait ouvert, c'est facile : consulter la collection Workbooks de l'appli.

Sinon, ... c'est compliqué.

Bon courage,

PGZ
C'est même carrément impossible : ouvert par qui ? Par toi sur ton PC ou par quelqu'un d'autre.

Si c'est par toi, tu peux analyser quelles sont les instances de MSExcel qui sont running sur ton PC (il peut y en avoir plusieurs). Pour chaque instance, tu peux déterminer quelles sont les classeurs ouvert et vérifier le Workbook.FullName.

Si c'est sur un autre PC, hum hum.... C'est carrèment impossible (du moins je crois).

Un test idiot : par programmation, essaie de renommer le fichier. Si cela fonctionne, c'est que personne ne l'a ouvert. Si pas OK, tu sais que quelqu'un est dedans.