Using VBA to delete an existing .htm file from a directory prior to saving an updated version into its place.

My question regards a process I am trying to develop for an excercise that must be performed 3-25 times per day.  Basically we track approx 2200 stock using Excel's RTD functionality.  At sporadic times during the market day, our monitoring formulas will detect trading entry conditions, extract those conditions and add them to a sheet in the workbook named "2 Alert Report".

With the coding below, we're able to perform the following actions
1    turn DisplayAlerts off
2    select "2 Alert Report" sheet, hide specific columns
3    copy "2 Alert Report" sheet to a new book
4    change directories and save the "new book" as "dar_current.htm"
5    turn DisplayAlerts back on

Everything works well on the first pass since the is no previously existing "dar_current.htm" file

So what I am having trouble figuring out is how to use VBA form within my macro to delete an existing "dar_current.htm" file from a directory prior to saving an updated version into its place.

Thanks in advance for any guidance you could share with me.
Ed
I have attached my code below:
Sub a105__Move_ALERT_REPORT_Sheet_to_SMOOTHTRADES_Directory_for_Webposting()

'TURN REFRESH & ALERTS OFF
    Application.ScreenUpdating = False
    Application.DisplayAlerts = False
    Application.Calculation = xlCalculationManual
   
'SELECT "ALERT REPORT" and HIDE SPECIFICS COLUMNS
    Sheets("2 Alert Report").Select
    Range("E:E,F:F,G:G,H:H,J:J,K:K,L:L,N:N,V:V,Y:Y,AA:AA,AB:AB,AC:AC").Select
    Range("AC1").Activate
    Selection.EntireColumn.Hidden = True
   
'COPY ALERT REPORT SHEET to NEW BOOK
    Sheets("2 Alert Report").Select
    Sheets("2 Alert Report").Copy
   
'????
'Is there a way I could DELETE the file named dar_current.htm (located at the pathway below)
'so that the "save as" statements will not need to overwrite the previously existing file?
   
    ChDir "C:\Program Files\Yahoo SiteBuilder\sites\sites\smoothtrades.com"
    ActiveWorkbook.SaveAs Filename:= _
        "C:\Program Files\Yahoo SiteBuilder\sites\sites\smoothtrades.com\dar_current.htm" _
        , FileFormat:=xlHtml, ReadOnlyRecommended:=False, CreateBackup:=False

'RETURN TO PREVIOUS WINDOW and CONTINUE PROCESSING
    Windows("S3_Watch.xlsm").Activate
        ActiveWindow.WindowState = xlNormal
        ActiveWindow.WindowState = xlNormal
    Range("A1").Select

'TURN REFRESH & ALERTS BACK ON
    Application.ScreenUpdating = True
    Application.DisplayAlerts = True
    Application.Calculation = xlCalculationAutomatic
   
End Sub





Start Free Trial

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:
35:
36:
37:
38:

Sub a105__Move_ALERT_REPORT_Sheet_to_SMOOTHTRADES_Directory_for_Webposting()
 
'TURN REFRESH & ALERTS OFF
    Application.ScreenUpdating = False
    Application.DisplayAlerts = False
    Application.Calculation = xlCalculationManual
    
'SELECT "ALERT REPORT" and HIDE SPECIFICS COLUMNS
    Sheets("2 Alert Report").Select
    Range("E:E,F:F,G:G,H:H,J:J,K:K,L:L,N:N,V:V,Y:Y,AA:AA,AB:AB,AC:AC").Select
    Range("AC1").Activate
    Selection.EntireColumn.Hidden = True
    
'COPY ALERT REPORT SHEET to NEW BOOK
    Sheets("2 Alert Report").Select
    Sheets("2 Alert Report").Copy
    
'????
'Is there a way I could DELETE the file named dar_current.htm (located at the pathway below)
'so that the "save as" statements will not need to overwrite the previously existing file?
    
    ChDir "C:\Program Files\Yahoo SiteBuilder\sites\sites\smoothtrades.com"
    ActiveWorkbook.SaveAs Filename:= _
        "C:\Program Files\Yahoo SiteBuilder\sites\sites\smoothtrades.com\dar_current.htm" _
        , FileFormat:=xlHtml, ReadOnlyRecommended:=False, CreateBackup:=False
 
'RETURN TO PREVIOUS WINDOW and CONTINUE PROCESSING
    Windows("S3_Watch.xlsm").Activate
        ActiveWindow.WindowState = xlNormal
        ActiveWindow.WindowState = xlNormal
    Range("A1").Select
 
'TURN REFRESH & ALERTS BACK ON
    Application.ScreenUpdating = True
    Application.DisplayAlerts = True
    Application.Calculation = xlCalculationAutomatic
    
End Sub