Error 70 Permission Denied

sharky12345

Well-known Member
Joined
Aug 5, 2010
Messages
3,422
Office Version
  1. 2016
Platform
  1. Windows
I'm randomly getting an error 70, Permission Denied when I try to execute the following routine;

Code:
Sub DeleteFiles()

'Raw Data
    If FileFolderExists(ThisWorkbook.Path & "\Toolbox Files\System Files\Raw Data*.xlsx") Then
        Kill ThisWorkbook.Path & "\Toolbox Files\System Files\Raw Data*.xlsx"
    End If
    'Handover Documents
    If FileFolderExists(ThisWorkbook.Path & "\Toolbox Files\System Files\Handover*.pdf") Then
        Kill ThisWorkbook.Path & "\Toolbox Files\System Files\Handover*.pdf"
    End If


End Sub

I don't know which line it is failing on because it fails when the routine itself is called from the Workbook Close event.

The odd thing is that sometimes it works with no errors at all.

Can anyone offer advice?
 

Excel Facts

Excel Wisdom
Using a mouse in Excel is the work equivalent of wearing a lanyard when you first get to college
Does somebody have the file open?
 
Upvote 0
Thanks Fluff - the file will be in the users own account, so in theory not - but the user may have inadvertently left it open. Is there a method to check if it's open first before it's deleted?
 
Upvote 0

Forum statistics

Threads
1,224,521
Messages
6,179,285
Members
452,902
Latest member
Knuddeluff

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top