close a shell of a windows explorer window

[Puertorekinsam]

Greetings,

I use Shell to open a folder path because if the folder is not open, I can't 'kill' a file in it.

I want to close the folder after I'm done with the kill. I tried this:

If FileOrDirExists(Sheet2.Cells(Me.FileTypeList, 2) & "\" & Sheet2.Cells(Me.FileTypeList, 1) & "0." & FileType) Then
Call Shell("explorer.exe " & Sheet2.Cells(Me.FileTypeList, 2), vbMinimizedNoFocus)
Kill (Sheet2.Cells(Me.FileTypeList, 2) & "\" & Sheet2.Cells(Me.FileTypeList, 1) & "0." & FileType)
Close #1
End If

but the window stays open, can someone help me with closing the open window?

 

[Andrew Poulsom]

I don't believe it's necessary to open a folder in Windows Explorer if you want to delete a file in that folder in VBA. Why do you think it's necessary?

 

[Puertorekinsam]

Normally you would be correct. However, there is a corprate security measure that prevents a kill statement from running in the folder is not open. Don't know how it's acomplished, but if I try to kill a file from a networked drive and the folder is closed, it tells me it's a unauthorized command. But if I open the folder it seems to correct this issue.

 

[RSXchin]

You just need to make sure you kill the full path

kill "C:\\replace\withyour\path.xls"

 

[Puertorekinsam]

I wish that was all. On a local drive (C i don't have the issue, but when dealing with a network drive, i need to have the folder open. My kill statement is fully qualified.

I just need to a way to close a windows explorer window opened with a shell statement.

 

[RSXchin]

you need to add

chdrive "whatever the drive is"

and THEN chdir

 

[John_w]

I just need to a way to close a windows explorer window opened with a shell statement.

See http://www.mrexcel.com/forum/showthread.php?t=454995.

 

[Puertorekinsam]

Thanks John W that helped a lot.